Excel 变量到文本框vba

我试图给一个变量添加一个范围，然后该变量就是文本框中显示的文本。到目前为止，我所做的是以下代码：

Private Sub TextBox1_Change()
Dim text1 As String
text1 = Sheet16.Range("C21:D40").Value
Sheet15.TextBox1.Value = text1
End Sub

---

当我尝试运行它时，我得到了错误“类型不匹配”。如果您有任何建议，我们将不胜感激。

您不能将范围赋值为字符串变量

如果要对范围进行相加或求和，您的代码将类似于以下代码：

Private Sub myAddingFunction()
    Dim text1As String
    text1= Application.Sum(Range("C21:D40"))
    Range("c1").Value = text1
End Sub

---

其中，可以为Sheet15.TextBox1.Value替换范围（“c1”）

如果不将

Dim text1指定为字符串，而只指定
Dim text1
，会发生什么情况？字符串只能是一个单元格的值，不能是cells@Kyle这是一个很好的观点。您希望在文本框中看到什么？范围内所有单元格中所有值的串联？