admin 管理员组

文章数量: 1184232


2024年3月28日发(作者：七牛云服务)

经典Excel VBA代码 收藏

经典Excel 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 ’重新计算所有打开的工作簿中的数据

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 VBA代码 收藏 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.roclinux.cn/b/1711571190a600376.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。