『壹』 求助:关于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 模块,看看,是不有代码,有的话,删了就可以了