大家知道,一个包含宏的工作簿如果VBA代码中包含Workbook.Open事件或模块中含有Auto_Open宏时,打开该工作簿就会运行指定的宏代码。但有时我们希望这些包含在Workbook.Open事件或Auto_Open宏中的代......
2021-11-13 11:28:06 375 怎样 在 打开 excel 工作簿 时
在Excel中可以通过FACT函数来计算非负整数n的阶乘(n!),而如果要通过VBA来计算阶乘,可以用下面的两个自定义函数:1.使用循环:FunctionFactorial_a(ByValNumAsInteger)IfNum0ThenFactorial_a=#NUM!......
2021-11-13 11:28:05 434 excel 中 计算 阶乘 的 VBA
Excel中的单元格拖放或自动填充功能可以给我们的操作带来许多方便,但有时我们并不想拖动单元格而出现意外的错误操作。这时可能需要禁用单元格的拖放功能,除了可以通过Excel选项来设置......
2021-11-13 11:28:04 492 excel 利用 VBA 打开 或 禁止
下面的VBA代码可以判断当前Excel工作簿中的某个工作表是否存在,如果指定的工作表不存在,则以指定的工作表名新建一个工作表,如果指定的工作表已存在,则给出一个提示,并激活该工作表......
2021-11-13 11:28:04 89 excel 利用 VBA 判断 工 作表
有时我们在Excel中制作的工作表需要反复修改,并保存为多个版本。修改的次数多了,很容易混淆。如果能把工作簿的最后保存日期和时间显示在工作表的某个单元格或页眉页脚中,查看起来就......
2021-11-13 11:28:02 494 如 何在 excel 工作 表中 添加
在Excel工作表的某个单元格中应用数据有效性设置来制作下拉列表时,如果引用的行或列区域中包含空单元格或重复项,那么在有效性下拉列表中会与原区域中的内容完全相同,也会包含空值或......
2021-11-13 11:28:01 274 excel 利用 VBA 生成 无 重复
用下面的代码可以获取屏幕分辨率,需将其放入模块中运行。1.按Alt+F11打开VBA编辑器。2.单击菜单插入模块,在模块中输入下列代码并运行:DeclareFunctionGetSystemMetrics32Libuser32_AliasGetSyst......
2021-11-13 11:28:00 274 excel 获取 屏幕 分辨率 的 VBA
下面的VBA代码可以将活动工作表中的所有文本字符串的首字母改为大写,对包含公式单元格则不作更改。SubCapitalizeFirstLetter()DimRngAsRangeActiveSheet.UsedRange.SelectForEachRngInSelection.CellsIfRn......
2021-11-13 11:27:59 202 excel 用 VBA 将 文本 字符串
有时需要在Excel工作表中互换两个区域中的数据,如果区域相邻可以直接用拖动鼠标并按住Shift键的方法进行互换。而当两区域不相邻且两个区域中的数据量较大时用VBA则较为快捷。例如在互换......
2021-11-13 11:27:59 64 excel 用 VBA 互换 两个 单元格
如果要去掉某个字符串中的所有数字,例如将一个字符串Excel123去掉数字后变为Excel,可以用自定义函数来实现。按Alt+F11打开VBA编辑器,单击菜单插入模块,在右侧的代码窗口中输入自定义函数......
2021-11-13 11:27:58 71 excel 用 自定义 函数 去掉 字符串
显示指定工作表的打印预览,假如该工作表名称为Sheet1:Worksheets(Sheet1).PrintPreview显示活动工作表的打印预览:Worksheets(Sheet1).PrintPreview显示工作簿中所有工作表的打印预览:Sheets.PrintPrevie......
2021-11-13 11:27:57 196 excel 中 有关 打印 预览 的
用下面的VBA代码可以同时删除工作簿中所有工作表中的批注:1.按Alt+F11,打开VBA编辑器。2.在代码窗口中输入下列代码SubRemoveAllComments()DimshtAsWorksheetDimcmtAsCommentForEachshtInActiveWorkbo......
2021-11-13 11:27:56 386 excel 中 VBA 删除 工作簿 中的
如果在Excel中选择了一个或多个区域,用下面的VBA代码可以统计当前工作表所选区域中单元格(或行、列)的数量:1.统计选定区域中的单元格数量:SubCountCellsInSelection()DimCellsNumAsInteger......
2021-11-13 11:27:55 91 excel 在 选定 区域 中 进行
一、在原工作表名称后添加文字例如工作簿中仅包含12个用数字1-12命名的工作表,现在要将每个工作表名称修改为1月、2月、、12月,即在每个工作表名称后添加一个月字。1.按快捷键Alt+F11,......
2021-11-13 11:27:53 281 excel 利用 VBA 批量 修改 工
用下面的自定义函数可以将某个单元格中的批注提取到其他单元格中,方法如下:1.按Alt+F11打开VBA编辑器,单击菜单插入模块,在工程窗口中会看到Excel插入了一个名称为模块1的模块。2.在右......
2021-11-13 11:27:51 341 excel 如何 利用 自定义 函数 提取
如果在使用Excel过程中习惯使用F2键切换到单元格编辑状态,有时可能会不小心错按了F1键而弹出Excel帮助窗口,特别是对于键盘较小的笔记本这种情况就更容易出现。如果是Excel2007/2010,Excel帮......
2021-11-13 11:27:50 373 如何 利用 VBA 禁用 excel 中的
Excel2010和Excel2007可以将Excel工作簿另存为PDF格式文件,但手工的方法每次只能转换一个工作簿,要转换多个工作簿就显得有些繁琐。如果没有批量转换软件,在Excel2010和Excel2007中,利用VBA代......
2021-11-13 11:27:50 370 如何 利用 VBA 批量 转换 excel
有时在工作中需要批量创建指定名称的文件夹,如果数量较多,例如要创建几十、甚至几百个文件夹,用手动的方法很难完成。批量创建文件夹的工具有很多,如果一时手头没有这类工具,可......
2021-11-13 11:27:49 404 excel 利用 VBA 批量 创建 指
下面的VBA代码可以获取Excel中最近使用的工作簿的完整路径和名称,并将其放到代码所在工作表的A列中。在Excel2007和Excel2010中,如果通过Office按钮(或文件选项卡)Excel选项高级设置显示最近......
2021-11-13 11:27:48 391 如何 利用 VBA 获取 excel 最近
当工作表中包含大量多单元格数组公式时,有时为了方便编辑这些数组公式,可能希望将工作表中的数组公式单独标记出来,以区分非数组公式,这时可以用下面的VBA代码来实现。选择包含数......
2021-11-13 11:27:47 356 excel 用 颜色 标记 包含 数组
如果Excel工作簿中包含许多隐藏的工作表,要显示隐藏的工作表,通常的方法是单击菜单格式工作表取消隐藏(Excel2003)或右击工作表标签,在弹出的快捷菜单中选择取消隐藏(Excel2007/2010)......
2021-11-13 11:27:46 107 如何 快速 显示 所有 隐藏 的
当工作簿中的工作表数量较多时,要快速取消各个工作表中的自动筛选可以下面的VBA代码。1.按Alt+F11,打开VBA编辑器。2.在代码窗口中输入下列代码SubRemoveAllAutoFilter()DimshtAsWorksheetForEa......
2021-11-13 11:27:46 70 excel 中 VBA 快速 取消 工作簿
下面的VBA代码先用Application.GetOpenFilename方法显示打开文件对话框,然后打开所选择的一个或多个Excel工作簿文件。SubOpenWorkbooks()OnErrorResumeNextDimSelectFilesAsVariant'显示打开文件对话框Sel......
2021-11-13 11:27:45 121 excel 利用 VBA 选择 并 打开
Excel中的条件格式可以非常直观地显示某些特定的数据,功能十分强大。但条件格式也有一些限制,例如无法通过条件格式设置字体和字号。如果要根据条件来改变单元格中字体或字号,可以用......
2021-11-13 11:27:43 287 excel 利用 VBA 实现 类似 条件
有时需要让Excel工作簿中的每个工作表只能查看而不被修改,可以对所有的工作表进行保护,如果工作簿中的工作表数量较多,手动逐一操作十分繁琐。在工作表保护密码相同或不设置密码的情......
2021-11-13 11:27:42 405 excel 如何 快速 保护 所有 工