Vba Maro在Excel中默认情况下始终作为公式复制和粘贴

我需要帮助来检查这个宏，它打算复制和粘贴而不格式化。它不好用

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    On Error Resume Next
    Target.PasteSpecial xlPasteFormulas
    Application.CutCopyMode = True
End Sub

如何使Ctrl-V在没有任何格式的情况下粘贴？我希望保持excel干净整洁，这样用户就可以复制和粘贴值和公式，而无需格式化

谢谢

试试这个：

您将需要了解用户如何访问宏-有几种方法可以做到这一点，我不太确定在您的环境中什么可以工作，也不确定您的访问级别可以使这些选项工作

我想我会构建一个非常简单的外接程序，在其中嵌入宏，并将宏快捷方式指定为覆盖CTRL+V。然后根据公司策略部署外接程序

---

但是，我们需要您提供更多详细信息，以全面实施解决方案。

如果您想拥有自己的自定义Ctrl-V，那么您可以通过以下方式实现：

' Code Module ThisWorkbook
Private Sub Workbook_Open()
    Application.OnKey "^v", "ThisWorkbook.PasteWithoutFormat"
End Sub
Private Sub PasteWithoutFormat()
    If Application.CutCopyMode Then Application.Selection.PasteSpecial xlPasteFormulas
End Sub

---

我选择了最简单的方法。我将Ctr-v（在宏的选项中）设置为运行以下代码：

Sub Pstfrmul() 
    Selection.PasteSpecial xlPasteFormulas 
End Sub 

非常感谢您的回答和评论。最好的，

---

Gerónimo

这很混乱，您想使用

Ctrl+V

或

Workbook\u Sheet SelectionChange

？所以。。。日期应为整数，百分比应为小数（即浮点数或双精度），货币应仅显示相关的小数位数，而不显示货币符号？相关：。如果查看xlPasteType枚举，您将看到可以粘贴的内容有许多不同的组合。确保您确切地知道要粘贴什么和不想粘贴什么，并使用适当的值。为了得到你想要的东西，你需要不止一次地粘贴特别的东西。。。如果用户只使用

粘贴特殊版

，情况会怎样。由于您引用了

Ctrl+V

，他们已经在使用键盘快捷键了。因此，

Alt+E+S

加载paste special非常简单（如果您想使用ribbon，可以使用Alt+H+V`）。他们可以从中选择

公式

，

值

。不确定重新发明轮子的目的。你不认为这更像是一个评论而不是一个答案吗？我已经添加了一些细节。。。但基于这个问题，我不确定还需要补充什么，因为至少我觉得，这个链接是答案的基础。要我删除答案吗？