VBA如何在整列中进行FIND

VBA如何在整列中进行FIND

VBA在整列中进行FIND的方法如下：
在工作表中查找特定信息。
expression.Find(Arg1, Arg2, Arg3)
expression 必需。该表达式返回一个 WorksheetFunction对象。
Arg1 String 类型，必需。工作表名称。
Arg2 String 类型，必需。单元格区域名称。
Arg3 Variant 类型，可选。精确限制查询的参数名称。
应用于 Range对象的 Find方法。
在区域中查找特定信息，并返回 Range对象，该对象代表用于查找信息的第一个单元格。如果未发现匹配单元格，就返回 Nothing。本方法不影响选定区域或活动单元格。

VBA是Visual Basic的一种宏语言，是微软开发出来在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。主要能用来扩展Windows的应用程式功能，特别是Microsoft Office软件。也可说是一种应用程式视觉化的Basic 脚本。

set findstring = range("A:A").find("AA",lookat:=1)
精确查找，lookat:=1

For i =1 to 100
cells(i,2)=cells(i,1)+2
Next i

以上是指B列=A列+2，直到100行。不知道你怎么语句计算，只能如此简单假设，但愿您能明白。

For i =1 to 100
cells(i,2)=cells(i,1)+2
Next i
以上是指B列=A列+2，直到100行。不知道语句计算，只能如此简单假设。
【具体】

Sub aa()
Dim rng As Range
Dim t As String
Set rng = Range("A:A").Find("AA")
If Not rng Is Nothing Then
t = "True"
MsgBox t
Exit Sub
Else
t = "False"
End If
MsgBox t
End Sub

Sub aa()
Dim rng As Range
Dim t As String
Set rng = Range("A:A").Find("AA")
If Not rng Is Nothing Then
t = "True"
MsgBox t
Exit Sub
Else
t = "False"
End If
MsgBox t
End Sub