我想将一系列单元格(仅值/文本)复制到剪贴板,这样用户只有在将它们粘贴到另一个电子表格时才必须粘贴特殊值 .
这是我到目前为止:
Private Sub CommandButton1_Click()
With New DataObject
.SetText Range("A32:Q32").Text
.PutInClipboard
End With
'Range("A32:Q32").Copy
End Sub
这给了我一个运行时错误
94无效使用Null
如果我只是使用注释掉的代码 Range.("A32:Q32").Copy
它会复制公式,除非用户进行特殊粘贴,否则它们会产生各种参考错误 .
2 回答
我不知道dataobject,所以我提出了一个解决方法,让用户也选择目标单元格
这有点令人费解,但获取文本>清除剪贴板>放回文本:
当范围中的单个单元格文本不同时,
Range.Text
返回Null
.