Shell.Application表示外壳中的对象。方法被提供于控制外壳和执行外壳内的命令,也有一些方法获得其他外壳相关的对象。
以下代码将打开运行对话框:
Sub QQ1722187970()[......]阅读全文>>>
关注和分享Excel以及Office系列软件的方方面面,致力于提高中国的办公软件的使用水平
Shell.Application表示外壳中的对象。方法被提供于控制外壳和执行外壳内的命令,也有一些方法获得其他外壳相关的对象。
以下代码将打开运行对话框:
Sub QQ1722187970()[......]阅读全文>>>
在excel的“数据”选项卡下的“数据工具”组中有“分列”功能,可以实现将单列数据按照固定宽度或者指定的分隔符进行分列。
在vba中可以使用range对象的TextToColumns方法实现以上功能。[……]
阅读全文>>>我们知道十进制数111,可以表示为1*10^0+1*10^1+1*10^2,即可以等于1+10+100。
任何一个n位的十进制数都可以表示为m位的数字(1≤m≤n)与10的m-1次幂的乘积之和。[……]
阅读全文>>>有时候我们在vba代码中要返回任意一个数的整数部分。
比如数值1.23的整数部分为1,5.67的整数部分为5。
一个数值的整数部分就是将该数值的小数部分去除,不进行四舍五入。
vba中提供了[……]
阅读全文>>>不同的字节数组如果要拼接成一个完整的数组,可以借组adodb.stream对象。
利用adodb.stream对象将不同的数组写入一个空流,然后将流另存为一个文本文件,或者整体读取。
代码如下:[……]
阅读全文>>>一对多查找是一种普遍的问题。
在vba中如果要实现一对多查找,可以借助字典Dictionary对象。代码如下:
Sub QQ1722187970() Dim oWK As Worksheet[......]阅读全文>>>
每个硬盘都有唯一的序列号。
FileSystemObject对象下的Drive对象提供了一整套对硬盘的各种信息的访问对象模型。
可以使用如下的代码获取所有硬盘的序列号:
Sub QQ172218[......]阅读全文>>>
比如张三的出生年月是1979月8月,由于现在是2018年3月,他的实际年龄是2018-1979-1。(因为月份还没到8月份)
再比如李四的出生年月是1979月1月,由于现在是2018年3月,他的实际年龄[……]
阅读全文>>>