VBA 菜问题2

来源:百度知道 编辑:UC知道 时间:2024/06/14 00:29:19
在A列里选择A1(这个是定死的)单元格, 到A列里第一个包含"TOTAL"这个单词的行. 比如说,第一个"TOTAL"A8,就把A1:A8选定

CODE怎么写?
录宏只能录死了A8, 我需要A8是个变量. 将来TOTAL可能会在A8,A9,或是A5之类

tinyd的不太对. currentdb 的这句出错:i=i+1

Dim i As Integer
i = 1
Do While Worksheets(1).Cells(i, 1).Value <> "Total"
i = i + 1
Loop

Worksheets(1).Range("A1:A" & i).Select

Sub Macro1()
'
' Macro1 Macro
'
Dim i As Integer
For i = 1 To 9999
If Sheet1.Cells(i, "A").Value = "Total" Then
Range("A1:A" & i).Select
Exit For
End If
Next
End Sub