复制单元数据和粘贴到一个变量（PasteSpecial的）

欲将该数据复制到一个变量作为纯文本公式复制。我如何做到这一点

ActiveCell.Offset(0, 1).Copy 
COmp_Val =

我想只有CONET复制到该字符串变量COmp_Val

谢谢

来源

2015-09-26 siddharth taunk

您可以将单元格的值属性分配给一个变量。

Dim s As String 
s = ActiveCell.Offset(0,1).Value

在您的情况下更改s为您的变量名称。

来源

2015-09-26 19:55:22 Trimax

我还有一个情况，但不希望以打开该呼叫填充（Comp_Str，Comp_Val）线程当我excicute下面它说ByRef参数不匹配 CompStr和Comp_Val是字符串，这里是子定义 Sub Populate（Str As String，Tpry_Str As String） –

如果将变量声明为String：'Dim Comp_Str，Comp_Val As String'，因为该类型是自动的，所以不会出现任何错误。我想要得到一个更清晰的代码，您可以手动输入类型：'Comp_Val = CStr（ActiveCell.Offset（0,1）.Value）' – Trimax

复制单元数据和粘贴到一个变量（PasteSpecial的）

回答

相关问题