有什么好办法能快速把表一变成表二的形式吗？

我昨晚上写了一个这样的程序，功能和你要求的完全一样，你执行一下试试看：

Option Explicit

Sub 分类转向()

Dim db, i, arr, n, k, v

Set db = CreateObject(Scripting.Dictionary)

arr = Cells(1, 1).CurrentRegion

For i = 1 To UBound(arr)

k = arr(i, 1)

v = arr(i, 2)

If Not db.Exists(k) Then

db.Add k, CreateObject(Scripting.Dictionary)

db(k)(1) = db.Count

db(k)(2) = 6

Cells(db(k)(1), 5) = k

End If

Cells(db(k)(1), db(k)(2)) = v

db(k)(2) = db(k)(2) + 1

Next i

End Sub

直发马尾怎么扎好看直发马尾发型扎法步骤

如果还说马尾单调，你就QUT了！经过时尚圈的轮回洗涤，马尾从原本的简约状态，已经衍生出了许多的新鲜面貌。侧扣马尾，打结马尾，微卷马尾……每一款马尾都不拘于以往的形态，只要学会了这4款，扎起马尾也能让你美到爆！

蓬松侧扣马尾

简易指数：★★★☆

除了传统的直发马尾辫，原来也可以有这样复古风格的马尾，这款蓬松侧扣的马尾，结构突破了以往的单调，在这两季秀场上频繁出现，也得到了大牌明星们的青睐。如何打造这款绝美的发型？一起来看看DIY教程吧！

How to do

Step1：做这款发型头发可以是卷发或直发，洗完头发吹干后就可以开始了。

Step2：用手指梳理头发，把所有头发抓向你所需的侧面。

Step3：一方面喜欢你的头发，你要创建一个低侧马尾辫。

Step4：从你的耳后头发开始，把头发捻向前(朝你的脸)，位置从根部到耳垂正下方。

Step5：停止扭转后，将头发折叠在耳后，并用多个发夹将其稳固，以防散落。

扭转发夹固定。将在该基地的头发是您的扭曲，折叠在你的头皮针。最好保持唇的引脚，并将其推入，远离扭曲，然后把它推回的扭曲，对你的头皮。这将稳固地扭曲。

Step6：最后打理出内扣的弧度，涂抹上你喜欢的发胶即可。

低侧打结卷马尾

简易指数：★★★☆

一个浪漫的马尾，垂在一侧的肩膀是不错的选择。给头顶的头发增加蓬松度，再用个性的打结方式连接你的卷发，这种个性又甜美的发型，是今年超流行发式，也是好莱坞明星大爱的款式，爱浪漫的女生学起来吧。

How to do

Step1：为了让这款发型看起来更有质感。你可以添加一点点发胶喷雾或者凝胶，再尝试吹干，更能实现纹理感，然后

Step2：沿着发际把前额的头发汇成三角状，并用发夹夹起。

Step3：用橡皮筋固定一个松散的侧马尾辫。

Step4：留出一小束头发环绕结点，并用发夹固定。

Step5：放下前额的头发，保持蓬松感，整理与侧发辫的连接处。

Step6：扎好后，喷上喷雾或者发胶，保证头发的质感。

松散微卷中马尾

简易指数：★★★★

这款简单的微卷马尾非常适合棕黄发色的MM，给头发来个侧分会让这款马尾多几分动感之美，自然垂落的刘海很显随性的感觉。一款简单扎起的中卷发尾，搭配简洁干净的裸妆可以给你加分。

How to do

Step1：打造此款发型最好是中长的卷发，你可以在开始前喷上一些喷雾胶或摩丝，避免头发干燥粗糙。

Step2：沿着前额发际线，梳起你的前额刘海，在梳出后方蓬松感的卷发。

Step3：轻轻拉扯后面头发绑起一个马尾，高度位于后脑勺处，并用橡皮筋固定。

Step4：取一小部分侧面的头发，随着你的指尖，轻轻拉进，制造蓬松感。

Step5：耳前耳后的头发也可以随你所喜欢的风格进行整理打造。

Step6：放下前额的头发，梳理侧面散落的长刘海，一款气质卷发马尾就完成了。

高耸打结直马尾

简易指数：★★★★

马尾可不像外表看上去的这么简单，它可以搭配各种造型，休闲还是精致的look，马尾都能为整体造型更加分。并且绑的位置也十分考究，高低或松紧的不同，皆能创造出不一样的感觉。这款高马尾就在我们日常绑马尾的基础上升级了时尚(微博)度，一个结扣就绑出个人风味的马尾！

How to do

Step1：这款马尾辫的关键点在于顺滑感和利落感，so，在开始之前一定要把头发用梳子把你的头发梳得顺滑无毛躁感。

Step2：和平时梳马尾的方法一样，尽量拉高绑起发束，再留出一束头发环绕结点，注意环绕时保持规整性。

Step3：最后用发夹把结点固定住，此款高耸的发型就这么简单完成，不妨动手试试吧！