
Sub 定位()
Range("A" & Cells(6, 15)).Select
ActiveWindow.ScrollRow = Cells(6, 15)
ActiveWindow.ScrollColumn = 1
End Sub
当我在SHEET2插入模块3,代码如下
Sub 定位()
Range("A" & Cells(5, 41)).Select
ActiveWindow.ScrollRow = Cells(5, 41)
ActiveWindow.ScrollColumn = 1
End Sub
当我在”宏”中选定“模块3:定位”时,系统提示:“发现二义性的名称:定位”错误
不知怎样解决?
将sheet2的代码中Sub 定位()
改成Sub 定位1()
即可