admin管理员组文章数量:1534838
2024年6月28日发(作者：)
经典Excel VBA代码1
VBA基础在大家的关注声中即将告一段落了，有许多经典的VBA操作我们只是作了简要的介绍，
想要熟练地使用VBA还需要大家慢慢地去消化和吸收，然后在实践中总结和提高。最后我们收集了常
见的VBA代码以飨广大的读者，希望对大家有所启示。
Application（Excel程序）篇
Events= True/ False ’启用/禁用所有事件
yAlerts=True/False ’显示/关闭警告框提示框
Updating= True/False ’显示/关闭屏幕刷新
Bar = "软件报专用" ’在地址栏中显示文本，标题栏用Caption属性
= xlIBeam ‘设置光标形状为Ⅰ字形，xlWait为沙漏(等待)形，xlNormal
为正常
State = xlMinimized ‘窗口最小化，xlMaximized最大化，xlNormal为
正常
teMicrosoftApp xlMicrosoftWord ’开启Word应用程序
tesPath ‘获取工作簿模板的位置
ateFull ’重新计算所有打开的工作簿中的数据
1
m = 2 ’将最近使用的文档列表数设为2
Files(3).Open ’打开最近打开的文档中的第3个文档
lacement "sweek", "软件报" ’自动将输入的"sweek"更
正为"软件报"
s(xlDialogPrint).Show ‘显示打印文档的对话框
Now + TimeValue("00:00:45"), "process" ’45分钟后执行指定过程
TimeValue("14:00:00"), " process " ’下午2点执行指定过程
EarliestTime:=TimeValue("14:00:00"), _
Procedure:="process", Schedule:=False ’取消指定时间的过程的执行
工作簿/工作表篇
’获取活动工作薄中工作表数
urces(xlExcelLinks)(1) ‘返回当前工作簿中的第一条链接
eets(“sheet2”).Visible=xlSheetHidden ‘隐藏工作表，与在Excel
菜单中执行“格式—工作表—隐藏”操作一样
eets(“sheet2”).Visible=xlSheetVeryHidden ‘隐藏工作表，不能通
2
版权声明：本文标题：经典Excel VBA代码 内容由热心网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：https://m.elefans.com/dongtai/1719553277a784655.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。
发表评论