1、在 Excel 里使用定时器 expression.OnTime(EarliestTime, Procedure, LatestTime, Schedule)
在下午 17:00:00 的时候显示一个对话框。
Sub Run_it()
Application.OnTime TimeValue("17:00:00"), "Show_my_msg" '设置定时器在 17:00:00 激活,激活后运行 Show_my_msg 。
End Sub
Sub Show_my_msg()
msg = MsgBox("现在是 17:00:00 !", vbInformation, "自定义信息")
End Sub
2、模仿 Excel 97 里的 "自动保存宏",定时 5 秒出现一次
Sub test()
Application.OnTime Now + TimeValue("00:00:05"), "saveit" ' Now + TimeValue("00:15:00") 指定在当前时间过 5 秒钟开始运行 Saveit 这个过程。
End Sub
Sub SaveIt()
msg = MsgBox("朋友,你已经工作很久了,现在就存盘吗?" & Chr(13) _
& "选择是:立刻存盘" & Chr(13) _
& "选择否:暂不存盘" & Chr(13) _
& "选择取消:不再出现这个提示", vbYesNoCancel + 64, "休息一会吧!") '提示用户保存当前活动文档。chr(13)回车,例图测试2
If msg = vbYes Then ActiveWorkbook.Save Else If msg = vbCancel Then Exit Sub
Call test '如果用户没有选择取消就再次调用 test
End Sub
Sub auto_open()
MsgBox " 欢迎你,在这篇文档里,每 5 秒出现一次保存的提示!", vbInformation, " 请注意!" ’例图测试1
Call test '打开文档时自动运行
End Sub
3、在Excel窗口下,同时按下Alt+F11,你将进入VB编辑器界面——Excel的编程界面。
4、如何定位:“开始”选项卡—“查找和选择——定位条件”
开始-清除-清除格式
5、工程窗口,属性窗口和代码窗口。
6、可以通过“选项”对话框(“工具”-“选项”-“编 辑器格式”)更改注释颜色
7、Range("A1:A3").Select 选择A1到A3单元格
Selection.EntireRow.Insert 往选中的区域中插入行。因为前面你选中的是三个单元格,VB将插入三行。
用下面的一句代码取代上面的两句代码: Range("A1:A3").EntireRow.Insert
ActiveCell.FormulaR1C1 = "Text" 往当前单元格里输入“Text
8、BorderAround
Range("A1:B3").BorderAround Weight:=xlThick
9、连接符用以表示键盘快捷键。将连接符放在你想显示下划线的字符之前。?
10、窗体中的组合框控件返回的值为筛选值在列表中的位置而控件工具箱中的组合框控件返回值就是筛选值
所以不同的控件类型,在做动态图表时选择的公式也是不同的,如果是窗体中的组合框控件我们选择OFFSET函数,
(或者更简单的情况下用CHOOSE也是完全可以的)就可以了。而控件工具箱中的组合框控件我们则常常要用到VLOOKUP和MATCH函数。
两者的不同2
窗体控件和控件工具箱中的控件还有一个不同点在于自定义设置上,窗体控件可以设置的内容仅限于控件大小和位置
而控件工具箱中的控件可以设置很多属性,包括字体的大小、颜色,控件的大小、颜色等等。
所以如果你需要创建个性化的控件还是用控件工具箱比较好。当然一般的使用中窗体控件就完全可以应付了。
控件工具箱里的控件就是人们熟知的ActiveX控件。你可以将ActiveX控件放在工作表或者你用VB编辑器创建的窗体上。然而, 窗体工具栏上的控件只对点击(Click)事件反应,ActiveX控件则有许多行为,或者说事件,发生于你使用它的时候。 当你使用窗体控件时,你给它指定宏。这个宏时储存在本工作表,新工作表或者个人宏工作簿的一个模块里。当你使用ActiveX 控件时,书写的宏代码时储存在控件本身的。
稍后看
11、在excel中ctrl+~,是用来显示单元格中的公式 作用等同于公式->显示公式
12、录制的宏设置当前窗口显示公式为真: ActiveWindow.DisplayFormulas = True
设置为“False”将关闭公式的显示: ActiveWindow.DisplayFormulas = False
为了在VBA里设置转换,你需要按照下面的方法来连接两语句: ActiveWindow.DisplayFormulas = Not ActiveWindow.DisplayFormulas
13、当你创建一个需要给别人使用的宏时,你可以使用VB编辑器工具菜单里的数字签名来确认这个宏不会带来病毒。请在Excel在线帮助里搜索如何安装和创建你自己的数字签名。输入“数字签名”就可以获得相关主题
14、通过键盘,按下Ctrl+R,工程浏览器窗口。按下F4,属性窗口。F7,代码窗口
15、 从其它工程调用过程,必须建立对该工程的引用。 在“ 引用 ”对 话框进行这些操作。选择“工具”-“引用”。当你调用一个过程,VB先在主调方的同一个模块里查找。如果没有找到被调过程,VB就 会在同一个工程的其它模块里查找。如果还是找不到,VB则会检查对其它工程的引用。
工程->模块->宏->函数
16、Application.Workbook.Worksheet.Range
17、VBA的一些基本组成要素(对象,属性和方法)
18、Range("A4").Value ActiveSheet.Shapes(2).Line.Weight 指向当前工作表里图形(Shapes)集合里的第二个对象里的直线(Line)对象的粗细(Weight)属性。
19、使用GoTo方法,可以快速地选择工作表里的任何区域。GoTo方法的句法为: Object.GoTo(Reference, Scroll) ‘对象.GoTo(参照, 窗口滚动)
Reference自变量是目标单元格或者区域,Scroll自变量可以设定为真(True)让Excel窗口滚动到该目标地址出现在窗口的 左上角;
或者设定为假(False),窗口不滚动(译者:系统默认为False) 。
例如,下面的VBA语句选择工作表Sheet1里的单元 格 P100,并且窗口滚动:
Application.GoTo _
Reference:=Worksheets("Sheet1").Range("P100"), _
Scroll:=True
你可以在下述几种情况中使用连续符:
运算符之前或者之后。例如:&,+,Like,NOT,AND
逗号之前或者之后
冒号和等号(:=)之前或者之后
等号之前或者之后
MsgBox "To continue the long instruction, use the " & _
"line continuation character."
20、,当Excel突出显示了正确的项目 名称,则回车,插入该项目到你的代码中去,并且开始新的一行;或者,你需要在同一行继续写代码,那么就按Tab键代替回 车。你也可以双击该项目来插入到代码中去。只要按Esc键就可以关闭这个弹出菜单,而不插入任何项目。当你按Esc键取消 了弹出菜单后,VB将不会对同样的对象显示该菜单。你可以通过以下方法来再次显示属性/方法弹出菜单: n
按Ctrl+J n 使用“backspace”(后退)键删除句号,然后重新输入句号 n
在代码窗口上单击右键(该对象,句号后),并且在快捷菜单上选择“属性/方法列表”
选择“编辑”-“属性/方法列表”
点击“编辑器”工具条上的“属性/方法列表”按钮
21、常数列表,Excel常数起名总是以“xl”开头。按下Ctrl+Shift+J或者点击“编辑器”工具条上的“常数列表”按钮,可以激活常数列表菜单。
22、参数信息,输入指令或函数,紧接着是左括号,然后按下Ctrl+Shift+I。你也可以点击编辑菜单上的参数 信息按钮或者选择“编辑”-“参数信息”。
23、快递信息,点击编辑工具条上的“快速信息”按钮(或者按下Ctrl+I),VB将会显示突出显示项目的语法和常数的值。