在Excel中可以通过FACT函数来计算非负整数n的阶乘（n!)，而如果要通过VBA来计算阶乘，可以用下面的两个自定义函数：1.使用循环：FunctionFactorial_a(ByValNumAsInteger)IfNum<0ThenFactorial_a="#NUM!&quo......
02-13 435 函数 计算 递归 阶乘 excel函数
Excel中隐藏行,列的程序的vba代码程序SubMacro1()Fori......
02-13 283 代码 取消 程序 隐藏 excel函数
某单位组织一次大型会议，要求各参会单位填写好会议回执后传回，再进行汇总。回执是用Excel制作的，有一个统一的标题行。由于参会单位和参会人员众多，返回的Excel文件很多，手工逐一汇总比较麻烦。这时用VBA可快速解决问题，示例文件下载示例文件......
02-13 455 参会 回执 工作 汇总 excel函数
有时需要把设计好的Excel表格交给许多用户填写，如果表格中有一些单元格为必填项，当一些用户未填写这些单元格时，逐一检查这些表格显得有些繁琐。通常的方法是通知用户或通过设置条件格式、设置批注等方式进行提醒，但难免有的用户还是忘记填写。在这种情况下可以用通过下面的宏代码，当用户在关闭工作簿时进行提醒，如果指定的单元格为空......
02-13 123 关闭 工作 数据 用户 excel函数
在使用VBA编辑器时，如果无意间弄乱了窗口布局，使各窗口不在其默认位置，使用起来有些不便。要恢复默认的VBA编辑器窗口布局，可以用下面的两种方法：方法一：手工调整1.在VBA编辑器中，单击菜单“工具→选项”，在弹出的“选项”对话框中选择“可连接的......
02-13 229 布局 窗口 编辑器 默认 excel函数
本文介绍Excel工作表单一文件和批量重命名文件的方法。excel工作表重命名的方法有下面几种：第一，单击菜单“格式”——“工作表”——“重命名”。第二，单击工作表标签，右键选择&ld......
02-13 448 工作 批量 重命名 销售 excel函数
当工作簿中的工作表数量较多时，要快速取消各个工作表中的自动筛选可以下面的VBA代码。1.按Alt+F11，打开VBA编辑器。2.在代码窗口中输入下列代码SubRemoveAllAutoFilter()DimshtAsWorksheetForEachshtInActiveWorkbook.Work......
02-13 396 代码 工作 筛选 编辑器 excel函数
VBA中Debug.Print是什么意思？debug.print的使用方法是怎样的呢？VBA中Debug.Print的作用是将代码执行结果显示在“立即窗口”中。比如，我们按ALT+F11组合键，打开VBE窗口，插入——模块，输入下面的代码：Sub测试......
02-13 107 代码 就会 执行 窗口 excel函数
有时我们需要在Excel的页眉页脚中调用某个单元格内容，例如让用户在A1单元格中填入月份，如“一月”，在页眉处自动生成“一月报表”，可以用VBA代码来实现，步骤如下：1.按Alt+F11，打开VBA编辑器。2.在“工程”窗口中，双击&ldquo......
02-13 53 内容 单元格 调用 页眉 excel函数
有时在工作中需要批量创建指定名称的文件夹，如果数量较多，例如要创建几十、甚至几百个文件夹，用手动的方法很难完成。批量创建文件夹的工具有很多，如果一时手头没有这类工具，可以在Excel中用VBA来完成，方法如下：1.新建一个工作簿，在A列中输入要创建的文件夹名称，在B1单元格中输入文件夹所在的有效路径，如“......
02-13 300 创建 名称 批量 文件夹 excel函数
在调试VBA代码时，有时需要将代码转换为注释，以避免执行代码。对于少量的代码，只需在其前面添加英文的单引号（’）即可，对于大段的代码，最快捷的方式是用“编辑”工具栏中的相关命令，方法如下：1.选择需要转换为注释的所有代码。2.在“编辑”工具栏中单击&ldq......
02-13 405 代码 注释 编辑 转换为 excel函数
可以通过设置Application.Cursor属性改变鼠标指针形状。如在XP中下面的语句将鼠标指针的形状改变为沙漏状，这种形状的鼠标指针表示系统比较繁忙。Application.Cursor=xlWait改为I型指针：改变鼠标指针形状后，Excel不会自动恢复，用下面的语句恢复默认指针形状：Applica......
02-13 313 代码 形状 改变 鼠标指针 excel函数
F2对象浏览器F4属性窗口F5......
02-13 496 断点 查找 窗口 过程 excel函数
用下面的宏代码可以打开或关闭电脑中默认的光驱。方法是：1.按Alt+F11打开VBA编辑器。2.在代码窗口中输入下列代码：PrivateDeclareSubmciSendStringALib"winmm.dll"(ByVallpstrCommandAsString,_ByV......
02-13 69 代码 光驱 关闭 打开 excel函数
下面的VBA代码可以将活动工作表中的所有文本字符串的首字母改为大写，对包含公式单元格则不作更改。SubCapitalizeFirstLetter()DimRngAsRangeActiveSheet.UsedRange.SelectForEachRngInSelection.CellsIfRng.Ha......
02-13 413 利用 字符串 文本 首字母 excel函数
下面的VBA代码可以判断当前Excel工作簿中的某个工作表是否存在，如果指定的工作表不存在，则以指定的工作表名新建一个工作表，如果指定的工作表已存在，则给出一个提示，并激活该工作表。下例中指定的工作表标签为“一月”，可根据实际进行修改。SubIsSheetExist()DimwsAsW......
02-13 214 不存在 工作 指定 是否存在 excel函数
有时需要在Excel工作表中互换两个区域中的数据，如果区域相邻可以直接用拖动鼠标并按住Shift键的方法进行互换。而当两区域不相邻且两个区域中的数据量较大时用VBA则较为快捷。例如在互换两列时可以直接单击工作表上方的列标题选择整列，然后执行代码互换数据。在工作表中选择两个形状相同的、无公共部分的区域，然后执行下面的代......
02-13 99 两个 互换 区域 数据 excel函数
如果要去掉某个字符串中的所有数字，例如将一个字符串“Excel123”去掉数字后变为“Excel”，可以用自定义函数来实现。按Alt+F11打开VBA编辑器，单击菜单“插入→模块”，在右侧的代码窗口中输入自定义函数：FunctionR......
02-13 450 去掉 字符串 数字 自定义 excel函数
在Excel工作表的某个单元格中应用数据有效性设置来制作下拉列表时，如果引用的行或列区域中包含空单元格或重复项，那么在有效性下拉列表中会与原区域中的内容完全相同，也会包含空值或重复项，显得有些不够美观。例如下图是A1单元格的一个下拉列表。通常可以去掉重复项和空单元格后再设置数据有效性，但如果不想改变单元格的结构，可......
02-13 311 下拉 代码 单元格 数据 excel函数
在Excel中选择某个单元格后，在编辑栏中会显示单元格内的公式，但编辑栏内不可能同时显示多个单元格中的公式。反复按快捷键Ctrl+`（“`”位于数字键“1”的左侧），可以切换显示工作表中的所有公式，但无法同时显示公式的计算结果和公式本身。复制某个单元格内的公式，然后将其粘......
02-12 108 公式 单元格 工作 显示 excel函数
