VBA自动化编程技巧全套.docx

上传人:王** 文档编号:617507 上传时间:2023-12-08 格式:DOCX 页数:4 大小:17.25KB
下载 相关 举报
VBA自动化编程技巧全套.docx_第1页
第1页 / 共4页
VBA自动化编程技巧全套.docx_第2页
第2页 / 共4页
VBA自动化编程技巧全套.docx_第3页
第3页 / 共4页
VBA自动化编程技巧全套.docx_第4页
第4页 / 共4页
亲,该文档总共4页,全部预览完了,如果喜欢就下载吧!
资源描述

《VBA自动化编程技巧全套.docx》由会员分享,可在线阅读,更多相关《VBA自动化编程技巧全套.docx(4页珍藏版)》请在优知文库上搜索。

1、VBA自动化编程技巧全套1 .选中最下,最上,最左,最右的单元格Range对象的end()方法可以传递以下几个常量,分别实现底端上下左右的选择。常量彳直内容对应键盘操作xUp-4162上方向移勤Ctrl+TXlDown-4121下方向移勤Ctrl+IXlToLeft-4159左方向移勤Ctrl+XlToRight-4161右方法移勤Ctrl+例子SubSampIelO从Al选择最下面的单元格Range(,Al,).Ed(xlDown).SelectEndSub例子1虽然可行,但有些情况却不太方便。比如以下两种情况。那就需要用到例子2中的写法。Al到A列最后一行中有空格。A列为空。SubSamp

2、le2()A列最女冬行向上找的第一行Cells(Rows.Coutzl).End(IUp).SelectEndSub这样写就比较安全了。2.打开文件操作APPIiCation的下面这个方法可以很方便的打开各种文件。GetOpenFiIename(FiIeFiIterzFiIterIndexzTitle,ButtonTextzMuItiSeIect)参数FiIeFiIter指定任意的字符串描述想要打开的类型,比如excel文件。然后指定类型。可以用通配符。关于用户取消操作实际操作中会弹出一个对话框让你选文件,如果什么文件都不选就关闭对话框,这时的返回值为FalseoDimOpenFiIeName

3、AsStringOpenFiIeName=Application.GetOpenFilename(excel文件,*.xls?;*.xlsx)用户取消了操作If(OpenFiIeName=False)ThenEndEndIfWorkbooks.OpenOpenFiIeName3 .取消画面渲染如果做的处理比较耗时,可以取消画面渲染加快处理速度。Application.ScreenUpdating=False/做一些比较耗时的处SApplication.ScreenUpdating=True4 .单元格相对位置RangeQffSet(行方向,列方向床获取相对位置。正数代表往下往右。所以下面的例子

4、是B2左边一列,也就是A2oRange(,B2,).Offset(Oz-1)5 .声明变量同时赋值普通声明一个变量就是DimXXasxxo同时赋值要再写一遍变量名。不得不说真的很麻烦。DimS_ROWAsInteger:S_ROW=Range(,Al,)6 .不显示确认对话框做一些删除之类的操作,如果程序里不自动屏蔽对话框的话,自动化就无从谈起了。以下是个简单的例子。Application.DispIayAIerts=FalseWorksheetsCsheetl).DeleteApplication.DispIayAIerts=True7 ,保存工作簿WorkbookSaveAs方法。设置Filename参数即可。DimbooklAsWorkbookbookl.SaveAsFilename:=ThisWorkbook.Path&,AutoSheetxlsx,

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > IT计算机 > 计算机应用/办公自动化

copyright@ 2008-2023 yzwku网站版权所有

经营许可证编号:宁ICP备2022001189号-2

本站为文档C2C交易模式,即用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。装配图网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知装配图网,我们立即给予删除!