excel 如何把选择性粘贴（无格式文本）设置为快捷键？-excel粘贴不要格式,excel粘贴的时候保留格式

“工具”→
自定义→
常用→
选择其中的“粘贴”→
上调右边的“
无格式文本”
到默认位置

右击工具栏》自定义》命令》（C），类别下面选择编辑，右边（命令）下面找到粘贴数值（有个带12字的图标），将它拖到工具栏当地方（如粘贴图标旁边），关闭自定义对话框。
请按照以下方法操作:
1,excel复制数据
2,在word中粘贴复,选择性粘贴文本
3,ctrl H,查找值输入 ^p,替换值不输
4，全部替换就制OK！

另：直接粘贴在数据量大的情况下很慢，可以将excel另存为text文件，zhidao然后在word中打开这个文本文件，然后用上面的查找替换就可以。

1、使用excel自带的快捷键

Ctrl+Alt+V，V

第一次操作调出选择性粘贴，第二个操作选择文本。

2、运用VBA设置快捷键。

复制如下代码到模块中。

而后回到sheet页面进行如下设置：

开发工具>宏>选中该宏>选项>设定快捷键，输入I，确定，运行即可（运行错误可忽略）。

设置的快捷键为Ctrl+Shift+I。也可选择其它快捷键，但是不要与常用快捷键产生冲突。

打开文件后，设置一次方可。快捷键同样适用于本台电脑的其它excel文件。

但本文件关闭e799bee5baa6e59b9ee7ad94333后，快捷键失效。再次打开方才有效（无需再次设置）。

Sub HotKey()
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub

也可使用excel事件省略之前各项设置。
代码1：放置在workbook事件代码中。
Private Sub Workbook_Open()
Application.OnKey "+^I", "HotKey"
End Sub
代码2：放在在模块中。
Sub HotKey()
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
本excel打开后，快捷键生效，关闭后失效。