『壹』 求助:關於EXCEL 運行宏的時候出現錯誤提示運行時錯誤'91'
這個代碼經調試沒有發現問題,不知道你說的搜索欄是不是你所指的G列。
『貳』 EXCEL VBA 運行時錯誤91
..這個一般是對象調用時出現的錯誤..比如:
Set aa = Range("A1")
Set aa = Nothing
Set Rng = aa
Rng.Value = "123"
這里的rng值為nothing則會發生這個錯誤.
搞不清楚你的程序掛再哪一行..
估計是在:Set c = .Find(Sheets(3).Cells(h, "F"), LookIn:=xlValues)
如果沒有找到.那麼 C則是nothing..同時再去調用C做什麼事的時候就會報警的...
『叄』 excel 運行時錯誤91
模塊個數不是你這樣統計的。
Subaa()
n=ActiveWorkbook.VBProject.VBComponents.Count
Fori=1Ton
IfActiveWorkbook.VBProject.VBComponents.Item(i).Type=1Thens=s+1
Next
MsgBox"模塊個數:"&s
EndSub
這樣OK。
『肆』 求助:急!!EXCEL運行宏時,提示:運行時錯誤'91';對象變數或With塊變數未設置
nowJob = standard.Range("E1:j2").Find(file.Cells(i, 2)).Column
標准 這個文件的 E1:J2 找不到 模板文件 第二列的 值 就會 提示這個錯誤
你是要屏蔽 這個提示,繼續運行,
還是 自己修改 模板第二列的值, 讓他能在 標准 E1:J2 范圍內找到?
『伍』 Excel中VBA報錯91是什麼原因
ExcelVBA報錯91是指找不到對象所指,也就是說在你所選擇的區域找不到BB在什麼地方,那麼你要去激活它,肯定就會報錯啦!
把Activate換一下,再設定一個變數,最後加一個IF判斷。或者在代碼前加一句Error錯誤語句試試。
第一種:
Set Ran=Selection.Find(代碼).Range
If Not Ran Is Noting Then
Ran.Activate
第二種:
在代碼前加一句:On Error Resume Next
這兩種試試看吧!
『陸』 EXCEL運行時錯誤"91"對象變數或WITH塊變數未設置
With 語句後面只能是 Object,而不是 Object 的 Action:
Syntax
Withobject[statements]End With
TheWithstatement syntax has these parts:
SYNTAX
Part
Description
object Required. Name of an object or a user-defined type.
statements Optional. One or more statements to be executed onobject.
With Statement (VBA)
所以,建議你把這句代碼更改一下:
With ActiveSheet.Pictures.Insert(sPath & sFileName)
改成:
With ActiveSheet.Pictures
.Insert(sPath & sFileName) ……
『柒』 EXCEL VBA運行時錯誤'91'
不土,新手寫成這樣也不錯了。。
我給你改改吧。
Sub to今天()
'()
x = ActiveCell.Row
Range("N1:HA1")..Find(Month(Now) &"月", LookIn:=xlValues, LookAt:=xlPart).Activate
y = ActiveCell.Column
Cells(x, y + Day(Now) - 1).Select
End Sub
『捌』 Excel VBA錯誤代碼91,對象變數或with塊變數未設置
解決辦法:
rng = Range(Cells(2, 1), Cells(2, 13)).Offset(j - 1, 0)
改為如下即可:
SET rng = Range(Cells(2, 1), Cells(2, 13)).Offset(j - 1, 0)
Visual Basic for Applications(VBA)是Visual Basic的一種宏語言,是微軟開發出來在其桌面應用程序中執行通用的自動化(OLE)任務的編程語言。主要能用來擴展Windows的應用程式功能,特別是Microsoft Office軟體。也可說是一種應用程式視覺化的Basic 腳本。
『玖』 EXCEl運行時錯誤91 對象變數或with塊變數未設置
代碼不全。
For i10 = 46 To i9
Sheet7.Range("A46:E46").Select
Selection.ListObject.ListRows(2).Delete
Next
這段你再好好瞅瞅。無意義的for循環?
『拾』 我打開excel後彈出對話框"運行時錯誤'91',未設置對象變數或with block變數",請問如何解決
估計是那個 工作簿裡面有WORKBOOK_OPEN 事件代碼,並且代碼有錯! 按ALT+F11進入VBE編輯窗口,點THISWORKBOOK 模塊,看看,是不有代碼,有的話,刪了就可以了