ExcelVBA宏精简二.doc

Excel VBA 宏 精简 二 ? Excel VBA(宏)精简(二)2010-05-21 11：11文件的操作 一.新建Workbooks.Add二.打开Workbooks.Open路径文件名.xls三.文件打开对话框的使用Application.GetOpenFilename(fileFilter：=Excel files(*.xls),*.xls,All files(*.*),*.*)示例：flag=False Do While Not flag对话框打开已有Excel文件fm=Application.GetOpenFilename(fileFilter：=Excel files(*.xls),*.xls,All files(*.*),*.*)If fm False Then Workbooks.Open fm Set bb=ActiveWorkbook把bb变量设为当前活动工作簿对象,打开一工作簿时,该工作簿自动为当前活动工作簿flag=True End If Loop 1.2保存与关闭 一.保存Workbooks(文件.xls).Save二.另存对话框的使用Application.GetSaveAsFilename(fileFilter：=Excel files(*.xls),*.xls,All files(*.*),*.*)示例：flag=False Do While