我正在尝试找到一种方法来使用剪切和粘贴特殊值。从我目前所读的内容来看,这似乎是不可能的。所以我找到的另一种方法是使用 vba,仅在电子表格上复制和粘贴值。现在我想在粘贴后添加一行以删除源。
这是我目前发现的(抱歉,我对 vba 完全不熟悉)。
Sub PasteAsValue()
Selection.PasteSpecial Paste:=xlPasteValues
End Sub
然后在宏名称“PasteAsValue”下输入快捷键 ctrl+v
谢谢您的帮助。
答案1
由于您没有指定要剪切、粘贴和删除的行,因此我假设了源行和目标行。最好根据需要更改范围。
Sub CutPaste()
Worksheets("Sheet1").Activate
Range("A2").Select
Selection.Cut
Range("A10").Select
ActiveSheet.PasteSpecial Paste:=xlPasteValues
Range("A2").EntireRow.Delete
End Sub
希望这对你有帮助。