if rg is nothing 表示刚才赋值为空,即find找不到 那么if not rg is nothing就是找得到了。
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 这里的判别...
(ptName) If Not pt Is Nothing Then pt.TableRange2.Clear ' 清除数据透视表内容 ws.PivotTables(ptName).Delete ' 删除数据透视表 End If On Error GoTo 0 ' 创建数据透视缓存 Set pc = ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:=dataRange) ' 创建数据透视表 Set pt = pc...
End If 这里的判别式Not rng Is Nothing,断句是Not (rng Is Nothing),意思是判断rng是否不为空。 为了方便例子,本文后续的代码会默认能找到单元格。 FindNext方法 一张工作表里可能有多个同样的数据,我们如果想接着上一个找到的单元格去找下一个单元格,就可以使用FindNext: ...
Like Is 2. if not c is nothing 先运算 is 比较运算符,再进行not 逻辑非运算。 比较运算符,即Is运算符,可用于判断两个对象变量是否指向同一个对象,其语法为: 结果=对象1 Is 对象2 如果对象1和对象2都指向同一个对象,其结果为True;否则,结果为False。
可以理解为salary 在不为空、有数值或者不超出范围的时候可以在Do中循环,直到salary 为空、没有数值或者超出范围后停止循环。
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...