VBA excel 中未设置变量

Question

我正在尝试使用 VBA 查看从电子表格中获取的文本框中的字段。 效果很好。 我想要做什么，如果我想更新所述电子表格，即我查看了文本框中的文本，但我想添加更新，我希望能够覆盖那里的文本并将其放回同一单元格中放置在电子表格中。 我在几年前使用以下代码制作的另一个电子表格上运行良好，但我一定做了其他事情，但我不记得了，而且我在代码中找不到它。

我使用了这段代码，它以前可以工作，但现在不起作用，我显然忘记了做一些事情。

Sheets("Table").Range("h1") = ComboBox3

Set r = Sheets("Data").Range("j9")
Set c = Sheets("Data").Range("j10")

Sheets("Table").Cells(r, c) = TextBoxtu.Value

请帮忙

Answer 1

Cells 需要行和列，因此您需要将 .Row 附加到 r 并将 .Column 附加到 c

Set r = Sheets("Data").Range("j9")
Set c = Sheets("Data").Range("j10")
Sheets("Table").Cells(r.Row, c.Column) = "111"