永发信息网

VBA如何在整列中进行FIND

答案:5  悬赏:10  手机版
解决时间 2021-11-20 04:49
  • 提问者网友:骨子里的高雅
  • 2021-11-19 15:45
VBA如何在整列中进行FIND
最佳答案
  • 五星知识达人网友:空山清雨
  • 2021-11-19 17:16
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 脚本。
全部回答
  • 1楼网友:雾月
  • 2021-11-19 20:53
set findstring = range("A:A").find("AA",lookat:=1)
精确查找,lookat:=1
  • 2楼网友:慢性怪人
  • 2021-11-19 20:42
For i =1 to 100
cells(i,2)=cells(i,1)+2
Next i

以上是指B列=A列+2,直到100行。不知道你怎么语句计算,只能如此简单假设,但愿您能明白。
  • 3楼网友:笑迎怀羞
  • 2021-11-19 19:43
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
  • 4楼网友:杯酒困英雄
  • 2021-11-19 18:23
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
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯