vba - 设置变量VBA

Question

这里完全是新手

几天前我开始学习 VBA，我有一个简单的问题，但似乎找不到我做错了什么。

我正在尝试制作一个按钮，它将获取事件单元格的坐标并将它们与另一个工作表进行比较，以从另一个表中检索特定值。我将变量设置为事件单元格的列和行，我想这样做，以便稍后可以将这些位置与另一个工作表进行比较，并获取另一个工作表上指定位置的值。

到目前为止，我只是简单地写了我在互联网上可以找到的内容，因为我没有接受过正式的培训。最后的msgbox只是为了测试它是否真正获取了引用。

Sub CommandButton1_Click()
Dim Arow As Range
Dim Acol As Range
Set Arow = Worksheets("Sheet1").Range(ActiveCell.Row)
Set Acol = Worksheets("Sheet1").Range(ActiveCell.Column)
MsgBox (Arow)
End Sub

到目前为止，我遇到错误运行时错误“1004”应用程序定义或对象定义错误，突出显示第 4 行。如果有人可以帮助我解决这个问题或将我重定向到一些帮助，我将不胜感激。

Answer 1

我认为这不起作用，你应该放在那里

Set arow = Worksheets("Sheet1").Range(ActiveCell.Row & ":" & ActiveCell.Row)

仅仅放数字是行不通的。对于该列，您应该在其中放置类似 C:C 的内容。要获取列字母，请参阅此问题:Function to convert column number to letter?

关于Range属性的更多信息请参见官方文档https://msdn.microsoft.com/en-us/library/office/ff836512.aspx 。

问题是，您必须提供所谓的 A1 引用中的地址，即“A1”或“$A$1”或单元格名称等，或者您必须提供两个 Range 对象，例如作为两个单元格 Worksheets("Sheet1").Range(Worksheets("Sheet1").Cells(1,1), Worksheets("Sheet1").Cells(2,2))，它定义第一个参数中从左上角开始，第二个参数中从右下角开始的区域。