- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
VBA常用英单词
VBA常用英语单词
Sub 开始End结束Range单元格,单元格区域Msgbox 输出函数Inputbox输入函数Cells所有单元格Sheets工作表集合Worksheets工作表集合Workbooks工作簿集合Thisworkbook: 代码所在的工作簿Activeworkbook活动工作簿Ativecell活动单元格Dim定义变量关键字Redim重新定义变量关键字Integer整型,简写 %Long 长整型,简写Single单精度 简写!Double 双精度 简写#String字符串型 $Variant 变体型,有的叫做万能型,如果不定义就是这个变体型Object 对象Usedrange 用过的区域Union 联合Intersect 交叉Resize 重新定义区域大小CurrentRegion:相连的Value 值Call呼叫Visible可见性Rows所有的行Columns 所有列Createobject引用动态库文件函数Dictionary 字典Regexp 正则Application Excel里最高对象Format格式函数Timer记时器WorksheetFunction工作表函数Transpose工作表里的转置函数Add添加?Before前面After 后面Kye关键字Item条目对Remove清空Removeall清空所有Exists存在Count点数Array数组函数Preserve保存Ubound 上界Lbound下界Erase清空数组Split 分割Join 连接,组合Filter筛选Index 工作表引用函数Function函数Volatile易失性ColorIndex颜色索引Interior底纹Font字体Show显示Unload关闭窗体Onkey按钮事件Ontime事件Delete删除Open打开SaveSs保存? ?? ?? ?? ?? ?? ?? ???vba语句(1) Option Explicit 强制对模块内所有变量进行声明(2) Option Base 1 指定数组的第一个下标为1(3) On Error Resume Next 忽略错误继续执行VBA代码,避免出现错误消息(4) On Error GoTo 100 当错误发生时跳转到过程中的某个位置(5) On Error GoTo 0 恢复正常的错误提示(6) Application.DisplayAlerts=False 在程序执行过程中使出现的警告框不显示?(7) Application.DisplayAlerts=True 在程序执行过程中(8) Application.ScreenUpdating=False 关闭屏幕刷新(9) Application.ScreenUpdating = True 打开屏幕刷新(10)??Workbooks.Add() 创建一个新的工作簿(11)??Workbooks(“book1.xls”).Activate 激活名为book1的工作簿(12) ThisWorkbook.Save 保存工作簿(13) ThisWorkbook.close 关闭当前工作簿(14)??ActiveWorkbook.Sheets.Count 获取活动工作薄中工作表数(15)??ActiveWorkbook.name??返回活动工作薄的名称(16) ThisWorkbook.Name ‘返回当前工作簿名称(17) ThisWorkbook.FullName ‘返回当前工作簿路径和名(18) (18) ActiveSheet.UsedRange.Rows.Count ‘当前工作表中已使用的行数(19) Rows.Count ‘获取工作表的行数(注:考虑兼容性)(20)??Sheets(Sheet1).Name= “Sum” 将Sheet1命名为Sum(21)??ThisWorkbook.Sheets.Add Before:=Worksheets(1) 添加一个新工作表在第一工作表前(22)??ActiveSheet.Move After:=ActiveWorkbook.Sheets(ActiveWorkbook.Sheets.Count) 将当前工作表移至工作表的最后(23)??Worksheets(Array(“sheet1”,”sheet2”)).Select 同时选择工作表1和工作表2(24)??Sheets(“sheet1”).Delete或 Sheets(1).Delete 删除工作表1(25)??ActiveShe
您可能关注的文档
最近下载
- 2025年院感知识理论考试题库+答案.docx VIP
- 配合协调与服务承诺.docx VIP
- 14《称空气》课件 科学三年级上册(苏教版2025).pptx
- 晚期消化道肿瘤临床规范诊疗新进展题库答案-2025年华医网继续教育.docx VIP
- 工程协调配合措施及承诺.docx VIP
- 医院信息科笔试、面试题(附答案).docx VIP
- 施工协调配合的承诺与措施.pdf VIP
- 医院信息科计算机考试精彩试题(附答案).docx
- 2025年最新人教版七年级(初一)数学上册教学计划及进度表(新课标,新教材).docx
- 2025至2030地毯和室内装饰清洁服务行业项目调研及市场前景预测评估报告.docx
文档评论(0)