如何利用VBA 选择指定的单元格？

Question

如题所述

Answer 1

Dim i As Integer
For i = 1 To Sheet1.UsedRange.Rows.Count Step 1
If Cells(i, 1).Value = "否" Then
Range("a" & i).Select
Exit For
End If
Next i
我用的是A列做列子 具体那一列你把它换了就行

如何选择当前工作表中的单元格？
例如，可以使用下面的代码选择当前工作表中的单元格D5：
ActiveSheet.Cells(5, 4).Select
或：ActiveSheet.Range("D5").Select
如何选择同一工作簿中其它工作表上的单元格？
例如，要选择同一工作簿中另一工作表上的单元格E6，可以使用下面的代码：
Application.Goto ActiveWorkbook.Sheets("Sheet2").Cells(6, 5)
或：Application.Goto (ActiveWorkbook.Sheets("Sheet2").Range("E6"))
也可以先激活该工作表，然后再选择：
Sheets("Sheet2").Activate
ActiveSheet.Cells(6, 5).Select
如何选择不同工作簿中的单元格？
例如，要选择另一工作簿中的一个工作表上的单元格F7，可以使用下面的代码：
Application.Goto Workbooks("BOOK2.XLS").Sheets("Sheet1").Cells(7, 6)
或：Application.Goto Workbooks("BOOK2.XLS").Sheets("Sheet1").Range("F7")