excel vba 运行时错误"91"？

• EXCEL VBA运行时错误'91'
• Excel vba 运行时错误91 对象变量或with块变量未设置
• EXCEL VBA 运行是错误"91" 对象变量或WITH变量未设置 怎么解决?
• VBA运行时错误“91”是怎么回事

EXCEL VBA运行时错误'91'

这是我自己写的一个程序，你试一下看

Sub to今天()

Dim m, d

m = Format(Date, "m月")

d = Day(Now())

For Each Rng In ActiveSheet.UsedRange

If Rng = m And Rng.Offset(1, 0) = d Then

Rng.Resize(2, 1).Select

End If

Next

End Sub

Excel vba 运行时错误91 对象变量或with块变量未设置

没有活动的worksheet对象。

EXCEL VBA 运行是错误"91" 对象变量或WITH变量未设置 怎么解决?

你的代码没有这样的错误。

你可以按F8单上运行你的代码，一句一句检查一下。

VBA运行时错误“91”是怎么回事

你的

还没指定，所以没有这个对象，更没有它的单元格了。

可以在这句话之前加一句赋值，比如说：Set

mc

=

Worksheets("Sheet1")