excel - vba中的公式作为变量

Question

我试图简单地将这些公式作为 VBA 中的变量。

单元格 C1 合并到 F1。以下返回所需的值。

公式:
=LEFT(C1,FIND(" ",C1)-1) = 第一字
=MID(C1,SEARCH(" - ",C1)+3,4) = 123

VBA:

Dim SUBname, SUBnum As String
SUBname = Formula = "=LEFT(Selection,FIND("" "",Selection)-1)"
SUBnum = Formula = "=MID(Selection,SEARCH("" - "",Selection)+3,4)"
Debug.Print "SubName: "; SUBname
Debug.Print "Sub#: "; SUBnum & vbNewLine

调试返回 False对彼此而言。

我的代码的前一部分选择了合并的标题。如果可以的话，我想坚持选择。

我究竟做错了什么？

Answer 1

Left 和 Mid 是 vba 函数使用它们:

SUBname = LEFT(Selection,INSTR(Selection," ")-1)

和

SUBnum = MID(Selection,INSTR(Selection," - ")+3,4)

你得到 False 的原因结果是询问是否 Formula等于公式字符串。它不是因此它返回 False到变量。