Error 'Object variable or With block variable not set' - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » Error 'Object variable or With block variable not set'

返回列表下一主題上一主題發帖

[發問] Error 'Object variable or With block variable not set'

大學生 Rank: 4

帖子: 1018
主題: 15
精華: 0
積分: 1058
點名: 0
作業系統: win7 32bit
軟體版本: Office 2016 64-bit
閱讀權限: 50
性別: 男
來自: 桃園
註冊時間: 2012-5-9
最後登錄: 2022-9-28

1^# 跳轉到 »

發表於 2014-2-9 18:51 | 顯示全部帖子

回復 1# zxcxz
可改成這樣，因為c為nothing時無法再判斷c.address

With Worksheets(1).Range("a1:a500")
Set c = .Find(2, LookIn:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
c.Value = 5
Set c = .FindNext(c)
If c Is Nothing Then Exit Do
Loop While c.Address <> firstAddress
End If
End With

複製代碼

靜思自在 : 有時當思無時苦，好天要積雨來糧。

返回列表下一主題上一主題