| 共 32 篇文章 |
|
需要注意的是，FSO对象模型提供的方法是冗余的，也就是说在实际使用中，FSO对象模型中包含的不同对象的不同方法进行的却是同样的操作，而且FileSystemObject对象的方法直接作用于其余对象，所以在后面的文章中并没有单独提到FileSystemObject对象，千万不要以为没有提到就不重要，事实上FileSystemObject对象在整个FSO对象模型中无处不在；参数... 阅7 转0 评0 公众公开 24-01-09 15:28 |
阅591 转8 评0 公众公开 23-02-20 21:57 |
例如，有位网友问我，他想使用双重保护来保护某工作簿，一重保护是工作簿自带的保护功能，另一重是用VBA代码编写的保护功能，但是如果用户禁用宏，那么VBA编写的保护功能就失效了。这样，再次打开该工作簿时，如果用户禁用宏，那么工作簿中就会只出现这个工作表。如果打开工作簿时，用户启用宏，那么Auto_Open事件会调用AskUserEnabledMacros过... 阅1 转自L罗乐 公众公开 23-01-05 08:56 |
参数Key1、Key2、Key3指定排序字段，确定要排序的值，但参数Key2、Key3不能用于排序数据透视表。参数OrderCustom，指定一个基于1的整数偏移量到自定义排序顺序列表，使用自定义的排序顺序进行排序。添加自定义列表，用于自定义自动填充或自定义排序。设置为True时从单元格区域中的行创建自定义列表，设置为False时从单元格区域的列创建自定义列... 阅1 转自L罗乐 公众公开 23-01-05 08:55 |
第二种：先在单元格G1中输入标题“学生姓名”，然后在“高级筛选”对话框的“方式”中选择“将筛选结果复制到其他位置”，“列表区域”选择单元格区域A1:D9，“复制到”选择单元格G1，选中“选择不重复的记录”，单击“确定”。本示例改写上文中录制的使用条件区域筛选的代码，根据条件区域F1:F2筛选数据到单元格H1开始的区域。''筛选... 阅1 转自L罗乐 公众公开 23-01-05 08:54 |
Excel VBA解读（48）：使用VBA找到想要的单元格——小结。End(xlUp)表示从当前单元格快速向上移至该单元格上方空单元格之前的单元格，若该列没有空单元格则快速移至第1行相应列的单元格。UsedRange属性用于获取工作表中由所使用的单元格围成的方形单元格区域，无论该区域内是否有空行或空列，即使在单元格中应用了格式但还没有输入内容，该单元... 阅1 转自L罗乐 公众公开 23-01-05 08:53 |
Excel VBA解读（51）：替换——Replace方法。参数ReplaceFormat可选，是否替换由ReplaceFormat对象指定的格式。在上面的代码中，我们看到了两个新的属性，分别是Application对象的FindFormat属性和ReplaceFormat属性。利用这两个属性，配合Replace方法的参数SearchFormat和参数ReplaceFormat设置为True，来搜索满足条件的格式并将其用相应的格... 阅1 转自L罗乐 公众公开 23-01-05 08:52 |
如下图所示的工作表，将活动单元格置于任一数据单元格中，单击功能区中的“排序和筛选”中的“筛选”命令，可以看到表头单元格中出现了筛选下拉箭头。例如，当前单元格为单元格B7，当运行程序后，会筛选出与单元格B7中的内容（即“一班”）相同的单元格所在的数据行，所需效果如下图：此时，当活动单元格处于该工作表A2:C3区域中时，会自动筛选... 阅1 转自L罗乐 公众公开 23-01-05 08:52 |
阅48 转0 评0 公众公开 22-12-16 20:11 |
数字全角转半角VBA。Sub 数字全角转半角() '''''''''''''''' 全角转半角 Macro '''''''' Dim qjsz, bjsz As String, i As Integer ''''''''定义qjsz(全角数字)、bjsz(半角数字)为字符串型，i为整数型。Te... 阅19 转0 评0 公众公开 22-12-16 20:09 |
