excel利用VBA生成无重复无空值的数据有效性下拉列表
在Excel工作表的某个单元格中应用数据有效性设置来制作下拉列表时,如果引用的行或列区域中包含空单元格或重复项,那么在有效性下拉列表中会与原区域中的内容完全相同,也会包含空值或重复项,显得有些不够美观。例...
在Excel工作表的某个单元格中应用数据有效性设置来制作下拉列表时,如果引用的行或列区域中包含空单元格或重复项,那么在有效性下拉列表中会与原区域中的内容完全相同,也会包含空值或重复项,显得有些不够美观。例...
如果要去掉某个字符串中的所有数字,例如将一个字符串“Excel123”去掉数字后变为“Excel”,可以用自定义函数来实现。按Alt+F11打开VBA编辑器...
有时需要在Excel工作表中互换两个区域中的数据,如果区域相邻可以直接用拖动鼠标并按住Shift键的方法进行互换。而当两区域不相邻且两个区域中的数据量较大时用VBA则较为快捷。例如在互换两列时可以直接单击...
下面的VBA代码可以判断当前Excel工作簿中的某个工作表是否存在,如果指定的工作表不存在,则以指定的工作表名新建一个工作表,如果指定的工作表已存在,则给出一个提示,并激活该工作表。下例中指定的工作表标签...
下面的VBA代码可以将活动工作表中的所有文本字符串的首字母改为大写,对包含公式单元格则不作更改。 Sub CapitalizeFirstLetter()Dim Rng As RangeActiveShee...
用下面的宏代码可以打开或关闭电脑中默认的光驱。方法是: 1.按Alt+F11打开VBA编辑器。 2.在代码窗口中输入下列代码: Private Declare Sub mciSendStringA Lib...
F2 对象浏览器 F4 属性...
可以通过设置Application.Cursor属性改变鼠标指针形状。如在XP中下面的语句将鼠标指针的形状改变为沙漏状,这种形状的鼠标指针表示系统比较繁忙。 Application.Cursor = xl...
在调试VBA代码时,有时需要将代码转换为注释,以避免执行代码。对于少量的代码,只需在其前面添加英文的单引号(’)即可,对于大段的代码,最快捷的方式是用“编辑”工具栏中的...
有时我们需要在Excel的页眉页脚中调用某个单元格内容,例如让用户在A1单元格中填入月份,如“一月”,在页眉处自动生成“一月报表”,可以用VBA代码来实现,...