2024-10-18 07:43:40
把宏修改一下,大致几种方法
将代码直接放到sheet对象里面执行
添加几句代码例如:
sub macro1()
with activesheet
……录制宏,注意单元格引用加“.”如:.range("a1")、.cells(1,1)……
end with
end sub
将以上代码工作簿保存为加载项,就可以随意调用
追加:搞不好了,一贴代码就被删除。百度的答题涉及VBA的太麻烦了,很无奈,刚刚提交的追答被审核了
如何修改
能用可以另加500悬赏
Sub Macro1()
ActiveWindow.Split = False
With ActiveSheet
……
.Range("A1:G12").AutoFilter
……中间的range引用改成“.”+range的格式……
.Columns("A:G").Select
……
End With
End Sub
实话WPS的VBA没有测试,如果有activesheet(活动表格)对象,这个就没有问题
能否发个tXt文件18026268882
VX,
6444参1伍肆贰
Q
2024-10-18 05:44:22