EXCEL中转置粘贴成值的快捷方法

打开EXCEL，一个空白表，在开发工具中，点击录制宏。

在弹出的窗口中，名字随便取，快捷健也按个人喜好填写，完成以后点确定。我用的是Ctrl+q.

再去点击停止录制

再点击宏，

可以看到刚刚录制的宏列表，选中，点击右边的“编辑”按扭

可以看到如图的

复制如下代码到空白区， Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=True 点击保存

然后保存工作表，名字任意，下面的保存类型选 “EXCEL 加载宏”，确定。

然后再在开发工具里，找到“加载项”按扭、

在弹出的窗口的右边，选择浏览，找到刚刚保存的文件，点确定，就可以试试了。

选择复制后，按 Ctrl+q (按前面自己设置的快捷键)。效果如图。 完