[转]VBA语句集400句

y2121577 · 发表于 2013-5-15 20:45

分享
VBA语句集400句【转】
。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。
工作簿
(102) ThisWorkbook.BuiltinDocumentProperties(“Last Save Time”)
   或Application.Caller.Parent.Parent.BuiltinDocumentProperties(“Last Save Time”) ‘返回上次保存工作簿的日期和时间
(103) ThisWorkbook.BuiltinDocumentProperties("Last Print Date")
   或Application.Caller.Parent.Parent.BuiltinDocumentProperties(“Last Print Date”) ‘返回上次打印或预览工作簿的日期和时间
(104) Workbooks.Close ‘关闭所有打开的工作簿
(105) ActiveWorkbook.LinkSources(xlExcelLinks)(1) ‘返回当前工作簿中的第一条链接
(106) ActiveWorkbook.CodeName
   ThisWorkbook.CodeName  ‘返回工作簿代码的名称
(107) ActiveWorkbook.FileFormat
   ThisWorkbook.FileFormat  ‘返回当前工作簿文件格式代码
(108) ThisWorkbook.Path
   ActiveWorkbook.Path ‘返回当前工作簿的路径(注:若工作簿未保存,则为空)
(109) ThisWorkbook.ReadOnly
   ActiveWorkbook.ReadOnly ‘返回当前工作簿的读/写值(为False)
(110) ThisWorkbook.Saved
   ActiveWorkbook.Saved ‘返回工作簿的存储值(若已保存则为False)
(111) Application.Visible = False ‘隐藏工作簿
   Application.Visible = True ‘显示工作簿
注:可与用户窗体配合使用,即在打开工作簿时将工作簿隐藏,只显示用户窗体.可设置控制按钮控制工作簿可见
。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。

VBA语句集400句.rar (24.79 KB, 下载次数: 4581)

banjinjiu · 发表于 2013-5-15 21:00

辛苦楼主，感觉对这样的菜鸟，具体的例子少了，还是说声谢谢。

banjinjiu · 发表于 2013-5-15 21:01

我是说自己是菜鸟，请大家别介意

xiaoqi6679 · 发表于 2013-6-3 21:47

xiexie louzhu

kiss被注册 · 发表于 2013-6-4 16:57

恩,虽然现在有了各种VBA翻译器,但这种实际的还是值得肯定,
感谢楼主

韦小宝188 · 发表于 2013-9-7 14:39

楼主有心，必须顶

hlssoft · 发表于 2013-9-7 15:11

谢谢楼主！

sunny_8848 · 发表于 2013-9-7 15:43

谢谢楼主分享！

badzbf · 发表于 2013-9-7 22:05

好东西，学习编写很有用

as42065300 · 发表于 2013-9-7 22:17

正在学习VBA谢谢楼主分享。

		自动登录	找回密码
密码			免费注册

[分享] [转]VBA语句集400句

评分