在Excel中粘贴特殊内容作为标准

在Excel中粘贴特殊内容作为标准,excel,paste,vba,Excel,Paste,Vba,有没有一种方法可以让我制作一个Excel文件,当你从中复制一些东西时,它会自动使用“粘贴特殊格式的值”?即使您粘贴到另一个Excel文件中。只需将“粘贴特殊”图标添加到快速访问工具栏,即可在任何电子表格中使用。作为一个额外的功能,它也可以通过键盘快捷键轻松访问,只需按ALT键和给定的字母数字键即可。请参见下面的图片 复制时,信息会传递到剪贴板,但是,恕我直言,无法传递参数,更不用说修改粘贴函数了 我找到了一个解决方案,在其中运行一个键事件宏,如下所示: Sub Paste_Special()

有没有一种方法可以让我制作一个Excel文件,当你从中复制一些东西时,它会自动使用“粘贴特殊格式的值”?即使您粘贴到另一个Excel文件中。

只需将“粘贴特殊”图标添加到快速访问工具栏,即可在任何电子表格中使用。作为一个额外的功能,它也可以通过键盘快捷键轻松访问,只需按ALT键和给定的字母数字键即可。请参见下面的图片

复制时,信息会传递到剪贴板,但是,恕我直言,无法传递参数,更不用说修改粘贴函数了


我找到了一个解决方案,在其中运行一个键事件宏,如下所示:

Sub Paste_Special()
  On Error Resume Next

If Err = 1004 Then
  Exit Sub
Else
  Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
  Application.CutCopyMode = False
End If

Err.Clear
On Error GoTo 0
End Sub

只要宏的源文件是打开的,它就可以在Excel文件之间工作。

是的,我知道,但是我必须告诉所有使用我的Excel工作表的人这样做,或者使用有点不方便的快捷方式。你可以做的不多,因为所有解决方案都需要一些用户培训。我唯一建议的另一件事是在文件中包含以下宏
Sub Paste_Values()Selection.Paste特殊粘贴:=xlPasteValues,Operation:=xlNone,SkipBlanks:=False,Transpose:=False End Sub
,将其另存为启用宏,将宏指定给键盘快捷键(例如CTRL+SHIFT+V)然后向用户提供说明。(我一直在使用这个宏,所以它保存在我的personal.xlsm文件中。)是的,这是我想要实现的目标的一个良好开端,但我仍然希望对此进行优化。