我们知道VBA中的Like运算符是用来比较两个字符串的，其语法为：result=stringLikepattern如果string与pattern匹配，则result为True，如果不匹配，则result为False。Like运算符的比较方式比较灵活，除了可以使用通配符外，pattern中还可以使用中括号&......
02-14 218 匹配 字符串 技巧 运算符 excel函数
通常在保存Excel工作簿时，如果某个工作表处于活动状态，下次打开这个工作簿时就会自动打开这个工作表。如果我们需要每次打开工作簿时总是打开指定的工作表，而无论保存时哪个工作表处于活动状态，可以用下面一个简单的VBA代码来实现：PrivateSubWorkbook_Open()Sheet3.ActivateEndS......
02-14 100 代码 名称 工作 打开 excel函数
我们可以用一个自定义函数来提取单元格注释。方法如下：1.按Alt+F11，打开VBA编辑器。2.单击菜单“插入→模块”，在右边的代码窗口中输入代码：FunctionGetCommentText(rCommentCellAsRange)DimstrGotItAsStri......
02-14 130 函数 单元格 注释 自定义 excel函数
如果我们在Excel中选择了一些单元格，可以通过下面的VBA代码来统计所选单元格的数量。例如，如果需要统计表格中某种类型的单元格数量，可以这样操作：1.单击菜单“编辑→定位”，在弹出的“定位”对话框中单击“定位条件”按钮。2.如果要统......
02-14 256 单元格 数量 统计 excel函数
Excel中没有内置工作表排序的命令或方法，我们可以用VBA来实现工作表排序。下面的VBA代码可以将工作表按其名称的拼音或笔画的顺序来排序，同时还可以指定升序或降序。SubSortWorksheets()DimSortOrd,SortM,ActiveShtAsStringDimNumSht()Activ......
02-14 272 工作 排序 笔画 顺序 excel函数
大家知道大多数的Excel工作表函数可以用在VBA中，通过下面的方法来调用，例如对A1:A10单元格求和：SubSum1()MsgBoxWorksheetFunction.Sum(Sheet1.Range("A1:A10"))EndSub或：SubSum2()MsgBoxApplica......
02-14 455 包含 单元格 工作 错误 excel函数
如果Excel表格单元格中包含有许多用文本形式显示的超链接，如“给我发邮件”、“访问我的网站”等，要逐一查看所有超链接的地址，用手工的方法显得太繁琐，我们可以用自定义函数来批量提取这些超链接中的地址，将下列代码插入到标准模块中：FunctionGetURL(rngA......
02-14 483 代码 单元格 地址 超链接 excel函数
我们知道在Excel单元格中输入当前时间的快捷键是“Ctrl+Shift+;”，但是这种输入方法只能显示小时和分钟，即HH:MM格式的时间。用下面的VBA代码可以实现用上述快捷键输入当前时间时，在单元格中显示的是包含秒的“HH:MM:SS”格式。方法如下：按Alt+F1......
02-14 220 快捷键 时间 格式 输入 excel函数
如果用VBA代码播放WAV声音文件，可以用下面的代码：PrivateDeclareFunctionsndPlaySound32_Lib"winmm.dll"_Alias"sndPlaySoundA"(_ByVallpszSoundNameAsString......
02-14 343 代码 利用 声音文件 播放 excel函数
通常，当我们打开一个Excel工作簿时，标题栏中仅仅显示一个简单的文件名。我们可以用下面的VBA代码，让工作簿在打开时在标题栏显示其路径和文件名：按Alt+F11，打开VBA编辑器，在“工程”窗口中双击“ThisWorkBook”，在右边的代码窗口中输入以下代码：Pr......
02-14 109 代码 工作 打开 栏中 excel函数
如果Excel工作簿中包含宏命令，可以通过宏对话框来查看这些宏命令名称。方法是单击菜单“工具→宏→宏”，或按Alt+F8打开“宏”对话框。例如如下的代码：在工作表中打开宏对话框：有时我们不希望使用者通过宏对话框来运行宏命令，这时可以在代码的前面......
02-14 467 名称 命令 对话框 打开 excel函数
在Excel中，当光标移动到包含批注的单元格中时，通常会在状态栏和批注中显示批注者的名称。如果需要将批注者改为其他人，可以用下面的VBA代码。以后再插入新的批注，也将使用新输入的名称。使用前先将代码中的“新作者”和“原作者”按照需要进行替换。SubChangeComm......
02-14 331 作者 原作者 名称 批注 excel函数
有时打印Excel表格后发现有些单元格显示为井号（#），这些井号（#）并非手工输入的，而是Excel中的一种错误处理方法。例如当列宽不足或日期和时间为负数时，Excel就将这些单元格显示为井号（#）。处理的方法很简单，对于包含数字且显示为井号（#）的单元格，调整一下列宽或设置单元格格式为“缩小字体填充&rd......
02-14 330 代码 包含 单元格 显示 excel函数
用下面的代码可以获取屏幕分辨率，需将其放入模块中运行。1.按Alt+F11打开VBA编辑器。2.单击菜单“插入→模块”，在模块中输入下列代码并运行：DeclareFunctionGetSystemMetrics32Lib"user32"_Alias......
02-14 191 代码 像素 模块 获取 excel函数
当我们在运行一个执行时间稍长的VBA代码时，可以用下面的VBA代码在状态栏中显示一些信息来提示用户：Application.StatusBar="提示信息"代码运行完毕，再恢复默认状态栏：Application.StatusBar=FALSE例如下面的代码在状态栏中显示“......
02-14 50 代码 提示信息 显示 状态栏 excel函数
如果要用VBA来设置区域的行高和列宽，可以用Range.ColumnWidth属性和Range.RowHeight属性，例如下例将选定的区域中各单元格的列宽和行高调整为指定的数值：SubSetColumnAndRow()WithActiveWindow.RangeSelection.ColumnWidth=......
02-14 132 单元格 可以用 属性 选定 excel函数
有时需要在Excel中运行一个工作时间较长的宏，当宏在运行时，消耗了一定的系统资源，并且似乎不能在Excel中做其他事情了。如果此时急需处理其他一些Excel表格，可以按Ctrl+Pause暂停宏的运行。此外，还可以在保持宏继续运行的同时，打开另一个Excel窗口，然后选择其他的工作表继续工作。由于此时鼠标变成沙漏状无......
02-14 411 工作 窗口 运行 选择 excel函数
当我们在Excel中输入或更新数据时，有时需要自动添加一个时间戳，表示当前数据的最新更新时间。如下图所示，当在C列更新数据时，在D列自动加入更新时的时间。可以用VBA代码来实现，实现步骤如下：按Alt+F11，打开VBA编辑器。在“工程”窗口中双击“ThisWorkBook&r......
02-14 233 代码 单元格 数据 更新 excel函数
在VBA中，赋予变量或属性的字符串都是用引号“""”括起来的。如果字符串中要包含英文双引号，可以在代码中将输出时包含引号的文本用两对双引号括起来，然后再将整个字符串用引号括起来。例如下面的代码：Range("A2")=""&q......
02-14 277 字符串 引号 英文 输出 excel函数
如果需要用VBA代码在Excel工作簿中选择下一个或上一个工作表，可以使用下面的代码。SubDownSheet()DimiAsIntegeri=Worksheets.CountIfActiveSheet.Index 02-13 157 代码 工作 活动 激活 excel函数
02-13 157 代码 工作 活动 激活 excel函数
