【问题标题】:Copy and paste Excel Macro复制和粘贴 Excel 宏
【发布时间】:2014-10-16 13:49:33
【问题描述】:

我有一个用于在 Excel 中粘贴的宏,它可以正常工作,除非从一个单元格复制和粘贴到另一个单元格。换句话说,它适用于网页中的文字,但不适用于从一个单元格到另一个单元格。错误消息说Run time error '1004': PasteSpecial method of Worksheet class failed. 这是代码:

Sub MousePaste()
'
' MousePaste Macro
'
' Keyboard Shortcut: Ctrl+Shift+M
'
    ActiveCell.Select
    ActiveSheet.PasteSpecial Link:=False, DisplayAsIcon:= _
        False, NoHTMLFormatting:=True

End Sub

【问题讨论】:

  • 当您将一个单元格复制到另一个单元格时,您正在尝试做什么,但使用热键 Ctrl+V 无法完成?注意:你可以去掉ActiveCell.Select——这是多余的。

标签: vba excel


【解决方案1】:

PasteSpecial 方法有两种实现。

Worksheet.PasteSpecial 从剪贴板粘贴和

Range.PasteSpecial 从/粘贴到某个范围。

您可能需要后者,上面链接中的示例。

【讨论】:

  • 有没有办法动态使用 Range.PasteSpecial?我希望它粘贴到我选择的任何单元格中。谢谢,加勒特。
  • 类似这样的 ActiveCell.Copy 然后分隔行 .Range("D1:D5").PasteSpecial Operation:=xlPasteSpecialOperationAdd
  • 每次我希望它粘贴到我碰巧选择的任何单元格时,它都会粘贴到 D1:D5 中。
  • 啊,我以为您希望复制 ActiveCell,而不是接收复制的值。那你要复制什么?是的,在我的示例中,您必须指定要复制到的范围。
  • 我有两个单独的宏,一个用于复制,一个用于粘贴。这些设置为使用鼠标滚轮的快捷方式,因此我将其移至左侧进行复制,移至右侧进行粘贴。所以我的粘贴宏只需要粘贴当时剪贴板上的任何内容。它还需要特殊粘贴,所以我只粘贴值,以后不必修复格式。谢谢,加勒特。
猜你喜欢
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 2017-12-16
  • 1970-01-01
  • 1970-01-01
相关资源
最近更新 更多