1、打开EXCEL，一个空白表，在开发工具中，点击录制宏。
2、在弹出的窗口中，名字随便取，快捷健也按个人喜好填写，完成以后点确定。我用的是Ctrl+q.
3、再去点击停止录制
4、再点击宏，
5、可以看到刚刚录制的宏列表，选中，点击右边的“编辑”按扭
6、可以看到如图的
7、复制如下代码到空白区，
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=True
点击保存
8、然后保存工作表，名字任意，下面的保存类型选 “EXCEL 加载宏”，确定。
9、然后再在开发工具里，找到“加载项”按扭、
10、在弹出的窗口的右边，选择浏览，找到刚刚保存的文件，点确定，就可以试试了。
11、选择复制后，按 Ctrl+q (按前面自己设置的快捷键)。效果如图。
完
