set rg 这一句给变量rg赋值为在f列查找所得到的单元格 if rg is nothing 表示刚才赋值为空，即find找不到 那么if not rg is nothing就是找得到了。
Like Is 2. if not c is nothing 先运算 is 比较运算符,再进行not 逻辑非运算。 比较运算符,即Is运算符,可用于判断两个对象变量是否指向同一个对象,其语法为: 结果=对象1 Is 对象2 如果对象1和对象2都指向同一个对象,其结果为True;否则,结果为False。 还可以用Is运算符来判断一个对象变量是否符合要求,...
Set rg = [f:f].Find(Range("c" & i) & "车管") If Not rg Is Nothing Then d = Replace(d, "车管", ***.offset(0, -1).Value) End If if not rg is nothing 和 set rg 这二句我不知道是什么意思,有人可以解释下吗?最好通俗点,因为我是新手,谢谢了。 古门道勿论北伐 采纳率:41...
Find方法如果没查到单元格，则rng对象就为Nothing，也就是空的对象，这种情况下我们使用针对rng的方法、属性如rng.Select、rng.value就会报错：所以为了避免查不到数据而产生的报错，我们一般需要使用一个If语句来判断rng是否为Nothing：If Not rng Is Nothing ThenRng.SelectElseMsgBox “没找到!”End If 这里的判别...
可以理解为salary 在不为空、有数值或者不超出范围的时候可以在Do中循环，直到salary 为空、没有数值或者超出范围后停止循环。
If Not Rng Is Nothing Then Application.Goto Rng, True Else MsgBox "没有找到该单元格!" End If End With End If End Sub 第77讲CreateTextFile方法代码:(积木3) Sub MyCreText() Dim MyFile As Object Dim myStr As String Dim j As Integer, iAs Integer ...
If Not 单元格 Is Nothing Then 第一个找到符合内容的地址 = 单元格.Address End If Do While Not 单元格 Is Nothing 列字母 = Left(Mid(单元格.Address, 2), InStr(Mid(单元格.Address, 2), "$") - 1) 列号= Range(列字母 & "1").Column ...
If Not c Is Nothing Then firstAddress = c.Address Do c.Value = 5 Set c = .FindNext(c) Loop While Not c Is Nothing And c.Address <> firstAddress End If End With 经修改后的示例代码如下,即在原代码中加了一句错误处理语句On Error Resume Next,忽略所发生的错误。
在VBA中,对于对象引用使用Not并不常见,只有在特定情况下才会使用。例如,我们可以使用Not来检查对象引用是否为空。例如: Dim obj As Object If Not obj Is Nothing Then MsgBox "对象引用不为空" Else MsgBox "对象引用为空" End If 在上述代码中,如果对象引用obj不为空,则使用Not将条件取反后得到的结果为Fals...
if not rg is nothing 和 set rg 这二句我不知道是什么意思,有人可以解释下吗?最好通俗点,因为我是新手,谢谢了。 无妄之地 博采众E 6 Set rg = [f:f].Find(Range("c" & i) & "车管") 在F列查找 “某某车管”,把找到的单元格定义给rg if not rg is nothing 如果rg不是一个空的对象...