-
Excel中计算阶乘（n!)的VBA代码
在Excel中可以通过FACT函数来计算非负整数n的阶乘（n!)，而如果要通过VBA来计算阶乘，可以用下面的两个自定义函数： 1.使用循环： Function Factorial_a(ByVal Nu...
-
excel利用VBA判断工作表是否存在
下面的VBA代码可以判断当前Excel工作簿中的某个工作表是否存在，如果指定的工作表不存在，则以指定的工作表名新建一个工作表，如果指定的工作表已存在，则给出一个提示，并激活该工作表。下例中指定的工作表...
-
excel利用VBA打开或禁止单元格拖放（自动填充）功能
Excel中的单元格拖放或自动填充功能可以给我们的操作带来许多方便，但有时我们并不想拖动单元格而出现意外的错误操作。这时可能需要禁用单元格的拖放功能，除了可以通过“Excel选项”来设置打开或禁用单元...
-
如何在Excel工作表中添加最后保存时间
有时我们在Excel中制作的工作表需要反复修改，并保存为多个版本。修改的次数多了，很容易混淆。如果能把工作簿的最后保存日期和时间显示在工作表的某个单元格或页眉页脚中，查看起来就非常方便了。用VBA代码...
-
excel利用VBA生成无重复无空值的数据有效性下拉列表
在Excel工作表的某个单元格中应用数据有效性设置来制作下拉列表时，如果引用的行或列区域中包含空单元格或重复项，那么在有效性下拉列表中会与原区域中的内容完全相同，也会包含空值或重复项，显得有些不够美观...
-
excel获取屏幕分辨率的VBA代码
用下面的代码可以获取屏幕分辨率，需将其放入模块中运行。 1.按Alt+F11打开VBA编辑器。 2.单击菜单“插入→模块”，在模块中输入下列代码并运行： Declare Function GetSys...
-
excel用VBA互换两个单元格或区域中的数据
有时需要在Excel工作表中互换两个区域中的数据，如果区域相邻可以直接用拖动鼠标并按住Shift键的方法进行互换。而当两区域不相邻且两个区域中的数据量较大时用VBA则较为快捷。例如在互换两列时可以直接...
-
EXCEL用自定义函数去掉字符串中的数字
如果要去掉某个字符串中的所有数字，例如将一个字符串“Excel123”去掉数字后变为“Excel”，可以用自定义函数来实现。按Alt+F11打开VBA编辑器，单击菜单“插入→模块”，在右侧的代码窗口中...
-
Excel中有关打印预览的一些VBA代码
显示指定工作表的打印预览，假如该工作表名称为“Sheet1”： Worksheets("Sheet1").PrintPreview 显示活动工作表的打印预览： Worksheets("Sheet1")...
-
excel中VBA删除工作簿中的所有批注
用下面的VBA代码可以同时删除工作簿中所有工作表中的批注： 1.按Alt+F11，打开VBA编辑器。 2.在代码窗口中输入下列代码 Sub RemoveAllComments()Dim sht As...
