excel 运行宏时总是提示编译错误:缺少 End Sub

2024-12-03 15:55:46
推荐回答(2个)
回答1:

For j = 1 To Range("xdf1").End(xlToLeft).Column
这一行,Range("xdf1")不存在,应该是Range("vf1")吧。

这个代码应该是在列A里面搜索和单元格B32内容一致的表格,并且把表格地址和内容在C32以后打印出来。
可以测试一下,给A列一组数据,在B32里面输入一个值,会自动查找。

回答2:

粘贴的代码是不需要end sub的,如果系统提示缺少end sub,那可能是前面的代码缺少了。