68手游网

Excel中的单元格拖放或自动填充功能可以给我们的操作带来许多方便， 但有时我们并不想拖动单元格而出现意外的错误操作。这时可能需要禁用单元格的拖放功能，除了可以通过Excel选项来设置打开或禁用单元格拖放功能外，还可以用VBA代码来实现，方法如下： 1.按Alt+F11，打开VBA编辑器。 2.如果仅要禁用某个工作表的单元格拖...

下面的VBA代码可以判断当前Excel工作簿中的某个工作表是否存在，如果指定的工作表不存在，则以指定的工作表名新建一个工作表，如果指定的工作表已存在，则给出一个提示，并激活该工作表。下例中指定的工作表标签为一月，可根据实际进行修改。 Sub IsSheetExist() Dim ws As Worksheet Dim sName As String sName = 一月 '...

在Excel中可以通过FACT函数来计算非负整数n的阶乘（n!) ，而如果要通过VBA来计算阶乘，可以用下面的两个自定义函数： 1.使用循环： Function Factorial_a(ByVal Num As Integer) If Num 0 Then Factorial_a = #NUM! Else Factorial_a = 1 For i = 1 To Num Factorial_a = Factorial_a * i Next End If End Function 2.使用...

大家知道，一个包含宏的工作簿如果VBA代码中包含 Workbook.Open 事件或模块中含有Auto_Open宏时，打开该工作簿就会运行指定的宏代码。但有时我们希望这些包含在 Workbook.Open 事件或Auto_Open宏中的代码在打开工作簿时不自动运行，例如在该代码中还在调试过程中，或其中包含错误时。要实现这一点，可以在打开该工作簿时按...

用下面的宏代码可以打开或关闭电脑中默认的光驱。方法是： 1.按Alt+F11打开VBA编辑器。 2.在代码窗口中输入下列代码： Private Declare Sub mciSendStringA Lib winmm.dll (ByVal lpstrCommand As String, _ ByVal lpstrReturnString As Any, ByVal uReturnLength As Long, _ ByVal hwndCallback As Long) Sub OpenDefault...

在使用VBA编辑器时，如果无意间弄乱了窗口布局，使各窗口不在其默认位置，使用起来有些不便。要恢复默认的VBA编辑器窗口布局，可以用下面的两种方法： 方法一：手工调整 1.在VBA编辑器中，单击菜单工具选项，在弹出的选项对话框中选择可连接的选项卡，勾选不在默认位置的窗口选项，如工程资源管理器、属性窗口等。单击确定...

有时打印Excel表格后发现有些单元格显示为井号（#），这些井号（#）并非手工输入的，而是Excel中的一种错误处理方法。例如当列宽不足或日期和时间为负数时，Excel就将这些单元格显示为井号（#）。处理的方法很简单，对于包含数字且显示为井号（#）的单元格，调整一下列宽或设置单元格格式为缩小字体填充；对于第二种情况，...

可以通过设置 Application.Cursor属性 改变鼠标指针形状 。如在XP中下面的语句将鼠标指针的形状改变为沙漏状，这种形状的鼠标指针表示系统比较繁忙。 Application.Cursor = xlWait 改为I型指针： 改变鼠标指针形状后，Excel不会自动恢复，用下面的语句恢复默认指针形状： Application.Cursor = xlDefault Application.Curs...

在调试VBA代码时，有时需要将代码转换为注释，以避免执行代码。对于少量的代码，只需在其前面添加英文的单引号（'）即可，对于大段的代码，最快捷的方式是用编辑工具栏中的相关命令，方法如下： 1.选择需要转换为注释的所有代码。 2.在编辑工具栏中单击设置注释块命令。如果编辑工具栏没有出现，则单击菜单视图工具栏编辑...

当在VBA编辑器代码窗口中输入有语法错误的语句时，默认VBA编辑器会弹出一个错误提示对话框，同时将错误语句显示为红色，这对于初学者可以起到很好的提醒作用。例如输入语句 if range(A1) 就立即回车，VBA编辑器会提示编译错误缺少:Then或GOTO。 但有时语法错误并非无意造成的，例如当一行语句未输入完毕，就需要转到下一行...