将代码插入变量？

Question

下面的代码应该创建我正在尝试做的正确的图片，即将代码插入到稍后可以使用的变量中。

ALSO：

S1是String，fixedInterest是String

    S1 = ThisWorkbook.Sheets("Sheet1")
    fixedInterest = S1.Range("A1").Value

Answer 1

如果我没有弄错，你想将代码行本身（而不是值）存储在一个变量中，这样你就不必在每次需要它时都使用它。

实现这一目标的最可行方法是创建一个功能。

使用您的变量：

Function S1() as String

    S1 = ThisWorkbook.Sheets(1).Range("A1").Value

End Function

在主代码中，您可以将此函数返回的值赋给变量：

fixedInterest = S1()

另外要澄清：字符串变量始终只返回字符串值。你不能'将它转换回代码'。然而，它可以用于使我们成为字符串的方法。

e.g：

Dim strName as string

strName = "MyWorkbook"

Workbooks(strName).open
'is the same as
Workbooks("MyWorkbook").open

__ 编辑：

Dim S1 as worksheet

Set S1 = ThisWorkbook.Sheets(1)

S1.Range("A2").Value= "something"