用VBA来实现,把如下代码放在模块里:
鼠标放在下面的sheet1的表名上,右键积治容答够突育接刻年跟,查看代码,然后在左边工程资源管理器区,右键,插入模块,复制如下的代码:
Subzhuanzhi()
Selection.PasteSpecialPaste:=xlPasteValues,Operation:=xlNone,SkipBlanks_
:=False,Transpose:=True
EndSub
然后自定义工具栏,从宏中拖一个笑脸的按钮出来,可以放在格式刷一起,或者放在工具栏上你认为合适的位置,然后确定退出。
再去点这个自定义按钮,指定刚才的宏。就行了。
以后使用时,选择好区域,复制,然后到目标位置的左上角单元格,再点自定义的按钮,就转置粘贴了。