VBA对象.doc

VBA对象介绍：? 编写VBA代VBA对象，对这些VBA对象的属性或方法进行操作。另外，你也可以创建自定义函数，来对某些操作进行封装。既然是VBA，VB相同，如果会VB，那VBA的VBA程序；同VB，那VBA的? 以下分VBA各? 在一些可以包含其他表1 一些特殊的属性??对象名 含ActiveWorkbook 当前工作簿，即如果你打Excel文件，那Excel文件即ActiveWorkbookActiveSheet 当前工作簿中的当前工作表，即当前Excel文件中正在ActiveCell 当前工作表中活ActiveChart 当前工作簿中的活Selection 当前被??下面一、Application此Excel应用程序的工作环境。＜一＞属性??1.Caption属性? 含义：Excel应用程序标题栏显示的文本。? 举例：Application.caption=“船”，如Empty,则恢复Excel默2.Cursor属性? 含Excel中鼠????????????????????????????????????????????? 表2 Cursor属性属性 鼠xlDefault 缺少型xlWait 等待型xlNorthwestArrow 箭xlIBeam 文本型“I”字形以等待用? 操作：Application.Cursor=xlWait等。3、DisplayAlerts属性? 含义：用以确定是否显示系统的应用提示和警告信息，如果不想显示，则把些属性设为false，反之亦然。4、DisplayFormulaBar属性? 含义：用以确定是否显示公式编辑栏5、DisplayScrollBars属性? 含Excel的6、DisplayStatusBar属性? 含Excel的状7、EnableCancelkey属性? 含VBA程序。缺省情况下，在VBA程序执行过程中，用户按下Ctrl+Break能VBA程序的xlInterrupt。若要禁止中断VBA程序，由xlDisabled；若需要VBAxlErrorHandler8、ScreenUpdating属性? 含VBA程序的中9、StatusBar属性? 含义：设置状态栏的文本10、ActiveWorkbook属性? 含1介11、ActiveSheet? 含1介12、ActiveCell属性? 含义：如表1介13、ThisWorkBook属性? 含VBA程序所在的工作簿ActiveWorkbook属性返回当前工作簿ThisWorkbook返回正在运行着VBA程序所在工作簿14、PathSeparator属性? 含“\”，? 举例：Dim strPath as String?????? strPath=Application.ThisWorkbook.PathApplication.PathSeperator?????? Workbooks.Open strPathmyExcel.xls15、UserName属性? 含缺省用户是由Excel选项对话框的“常”选项卡中“用”决定的。用“工具”菜“选项”命令来打“常”选项卡的“用”文本框中重新＜二＞方法1、Calculate方法? 含义：对Excel打2、Goto方法? 含Range对象或一个VBA过程，格式如下：?????? Application.Goto Reference,Scroll? Reference参数表示Goto方法的目的地,Scroll参数若True,滚动条滚动以使Range对象出现在工作簿窗口左上角，为False，当前工作簿窗口不属性Galse? 举例：Application.Goto Range(C3),True3、InputBox方法? 含?? Application.InputBox(prompt,title,left,top,helpFile,helpContextID,type)?? prompt参数????????????? 用于?? title参数??????????????? 用于? default参数????????????? 用于?? left和top参数??????????? 用于?? helpFile参数???????????? 用于?? helpContextID参数??????? 用于?? type参数???????????????? 用于????? 举例：UserValue=Application.InputBox(请输入数据,数据,Type:=7)?4、Onkey方法? 含VBA代,也可看一下VBApplicatio.Onkey后