Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 35122|回复: 43

[分享] VBA 自定义函数大全(161个)

  [复制链接]
发表于 2011-11-1 21:02 | 显示全部楼层 |阅读模式
本帖最后由 hhzjxss 于 2012-9-7 11:32 编辑

   原来在网上下载了一个《VBA自定义函数大全》,但因为都是在一个word页面内,不方便使用,个别函数为美观进行了分行,结果复制到Excel中时,产生错误,这个我干脆分部拆分开来了,方便大家下载试用!

      附件下载:

1、自定义函数:返回列标.zip (6.51 KB, 下载次数: 183)

10、自定义函数:人民币大、小写转换.zip

8.01 KB, 下载次数: 99

11、自定义函数:查汉字区位码.zip

6.98 KB, 下载次数: 65

12、自定义函数:把公历转为农历.zip

22.51 KB, 下载次数: 94

13、自定义函数:返回指定列数的列标.zip

6.95 KB, 下载次数: 70

14、自定义函数:用指定字符替换某字符.zip

6.54 KB, 下载次数: 75

15、自定义函数:从右边开始查找指定字符在字符串中的位置.zip

6.87 KB, 下载次数: 75

16、自定义函数:从右边开始查找指定字符在字符串中的位置.zip

6.87 KB, 下载次数: 87

17、自定义函数:计算工龄.zip

7.3 KB, 下载次数: 81

18、自定义函数:计算日期差,除去星期六、星期日.zip

6.74 KB, 下载次数: 76

19、自定义函数:将英文字反转的自定函数..zip

6.49 KB, 下载次数: 69

20、自定义函数:计算个人所得税.zip

7.26 KB, 下载次数: 69

21、自定义函数:一个能计算是否有重复单元的函数.zip

6.9 KB, 下载次数: 70

22、自定义函数:数字金额转中文大写.zip

7.72 KB, 下载次数: 71

23、自定义函数:将数字转成英文.zip

9.5 KB, 下载次数: 69

24、自定义函数:人民币大小写转换.zip

7.29 KB, 下载次数: 79

25、自定义函数:获取区域颜色值.zip

6.23 KB, 下载次数: 75

26、自定义函数:获取活动工作表名.zip

6.22 KB, 下载次数: 75

27、自定义函数:获取最后一行行数.zip

6.29 KB, 下载次数: 75

28、自定义函数:判断是否连接在线.zip

6.73 KB, 下载次数: 66

29、自定义函数:币种转换.zip

6.6 KB, 下载次数: 70

30、自定义函数:检验工作表是否有可打印内容.zip

8.27 KB, 下载次数: 62

31、自定义函数:查找一字符串(withinstr)在另一字符串中(findstr1)中某一次(startnum.zip

7.21 KB, 下载次数: 65

32、自定义函数:在文件路径后面增加反斜杠符号.zip

6.42 KB, 下载次数: 62

33、自定义函数:计算所得税.zip

6.47 KB, 下载次数: 57

34、自定义函数:从工作表第一行的标题文字以数字形式返回所在列号.zip

7.39 KB, 下载次数: 63

35、自定义函数:在多个工作表中查找一个范围内符合某个指定条件的项目对应指定范围加总求和.zip

7 KB, 下载次数: 77

36、自定义函数:查找指定列名的列数.zip

6.85 KB, 下载次数: 70

37、自定义函数:文字格式的时间(分:秒)转化为数字格式(秒).zip

6.78 KB, 下载次数: 63

38、自定义函数:将hh:mm:ss格式的时分秒数转换成秒数.zip

6.75 KB, 下载次数: 63

39、自定义函数:金额中文大写转数字.zip

7.61 KB, 下载次数: 62

40、自定义函数:把角度转为度秒分、弧度等显示.zip

7.19 KB, 下载次数: 59

41、自定义函数:身份证号码侦测.zip

8.34 KB, 下载次数: 71

42、自定义函数:显示公式.zip

6.73 KB, 下载次数: 68

43、自定义函数:方便财务人员理帐查找.zip

9.14 KB, 下载次数: 71

44、自定义函数:数值转换为字符地址.zip

6.65 KB, 下载次数: 58

45、自定义函数:字符地址转换为数值.zip

6.68 KB, 下载次数: 63

46、自定义函数:等待时间(以秒计算).zip

6.92 KB, 下载次数: 59

47、自定义函数:得到字符串实际的长度(以单字节记).zip

6.87 KB, 下载次数: 59

48、自定义函数:18位身份证最后一位有效性验证.zip

7.28 KB, 下载次数: 60

49、自定义函数:计算符合maturity condition的拆解金额.zip

7.1 KB, 下载次数: 57

50、自定义函数:对多个用同一分隔符分隔的待查找元素,逐一在表区域首列内搜索,将返.zip

7.48 KB, 下载次数: 57

51、自定义函数:根据个人所得税(工资)反算工资数.zip

7.26 KB, 下载次数: 69

52、自定义函数:判断工作表是否存在.zip

6.44 KB, 下载次数: 62

53、自定义函数:角度转弧度.zip

6.97 KB, 下载次数: 56

54、自定义函数:比较相同的字符串.zip

6.61 KB, 下载次数: 62

55、自定义函数:对选定的数组进行排序.zip

7.69 KB, 下载次数: 59

56、自定义函数:取得指定月份天数.zip

6.45 KB, 下载次数: 61

57、自定义函数:排序工作表活页薄.zip

6.8 KB, 下载次数: 54

58、自定义函数:统计数组中非重复数据个数.zip

6.68 KB, 下载次数: 63

59、自定义函数:摘取子字符串.zip

6.48 KB, 下载次数: 61

60、自定义函数:计算20000余个汉字的笔画.zip

8.87 KB, 下载次数: 64

61、自定义函数:删除当前工作表中的全部超连接.zip

6.37 KB, 下载次数: 65

62、自定义函数:取得相近数据.zip

6.55 KB, 下载次数: 62

64、自定义函数:搜索重复数据(选定范围).zip

6.56 KB, 下载次数: 67

65、自定义函数:字符型转数字型.zip

6.94 KB, 下载次数: 57

66、自定义函数:小写人民币转大写人民币.zip

8.02 KB, 下载次数: 62

67、自定义函数:取得指定月份人星期天个数.zip

6.7 KB, 下载次数: 60

68、自定义函数:侦测档案是否包含宏.zip

7.17 KB, 下载次数: 57

69、自定义函数:获取循环参照单元格.zip

6.84 KB, 下载次数: 57

70、自定义函数:创建桌面快捷方式.zip

6.67 KB, 下载次数: 58

71、自定义函数:自动建立多级目录.zip

6.81 KB, 下载次数: 65

72、自定义函数:统计经筛选后符合条件的记录条数.zip

6.42 KB, 下载次数: 62

73、自定义函数:复制单元格列高与栏宽.zip

6.95 KB, 下载次数: 62

74、自定义函数:取消隐藏工作表.zip

6.5 KB, 下载次数: 68

75、自定义函数:删除单元格自定义名称.zip

6.29 KB, 下载次数: 58

76、自定义函数:从文件路径中取得文件名.zip

6.53 KB, 下载次数: 59

77、自定义函数:取得一个文件的扩展名.zip

6.7 KB, 下载次数: 58

78、自定义函数:取得一个文件的路径.zip

6.5 KB, 下载次数: 56

79、自定义函数:取得一个文件的路径2.zip

6.4 KB, 下载次数: 59

80、自定义函数:取得一个文件的路径3.zip

6.27 KB, 下载次数: 62

81、自定义函数:十进制转二进制.zip

6.66 KB, 下载次数: 56

82、自定义函数:检查一个数组是否为空.zip

6.68 KB, 下载次数: 50

83、自定义函数:字母栏名转数字栏名.zip

6.5 KB, 下载次数: 56

84、自定义函数:数字栏名转文字栏名.zip

6.48 KB, 下载次数: 55

85、自定义函数:判断一件活页夹中是否还有子目录.zip

6.71 KB, 下载次数: 57

86、自定义函数:判断一个文件是否在使用中.zip

6.82 KB, 下载次数: 59

87、自定义函数:列出档案详细摘要信息.zip

7.07 KB, 下载次数: 56

88、自定义函数:获取菜单ID编号及名称列表.zip

6.65 KB, 下载次数: 59

89、自定义函数:状态列动态显示文字.zip

6.62 KB, 下载次数: 56

90、自定义函数:取得Activecell的栏名.zip

6.3 KB, 下载次数: 57

91、自定义函数:取得单元格中指定字符前的字符.zip

6.52 KB, 下载次数: 61

92、自定义函数:前单元格指定字符前的字符颜色改成红色.zip

6.57 KB, 下载次数: 73

93、自定义函数:根据数字返回对应的字母列号.zip

6.65 KB, 下载次数: 60

94、自定义函数:取工作表名字.zip

6.2 KB, 下载次数: 66

95、自定义函数:取消所有隐藏的宏表.zip

6.29 KB, 下载次数: 57

96、自定义函数:导出VBA Project代码.zip

6.35 KB, 下载次数: 65

97、自定义函数:导入VBA Project代码.zip

6.5 KB, 下载次数: 63

98、自定义函数:取得汉字拼音的第一个字母.zip

8.55 KB, 下载次数: 58

99、自定义函数:获取两栏中相同的数据.zip

6.72 KB, 下载次数: 65

100、自定义函数:选取当前工作表中公式出错的单元格﹐关返回出错个数.zip

6.8 KB, 下载次数: 59

101、自定义函数:将工作表中最后一列作为页脚打印在每一面页尾.zip

7.17 KB, 下载次数: 62

102、自定义函数:获取vbproject引用项目.zip

6.51 KB, 下载次数: 67

104、自定义函数:将选择定单元格作成镜像图片.zip

7.97 KB, 下载次数: 62

105、自定义函数:反选择单元格中的数.zip

7.37 KB, 下载次数: 60

106、自定义函数:在Excel中加入一个量度尺(以厘米为单位).zip

8.77 KB, 下载次数: 63

107、自定义函数:在Excel中加入一个量度尺(以寸为单位).zip

8.92 KB, 下载次数: 59

108、自定义函数:取得一个短文件名的长文件名.zip

6.85 KB, 下载次数: 54

109、自定义函数:取得临时文件名.zip

7 KB, 下载次数: 55

110、自定义函数:等用Shell调用的程序执行完成后再执行其它程序.zip

6.88 KB, 下载次数: 59

111、自定义函数:将Mouse显示成动画.zip

6.95 KB, 下载次数: 52

112、自定义函数:限制Mouse移动范围.zip

6.64 KB, 下载次数: 59

113、自定义函数:取得当前激活窗品句柄及标题.zip

6.66 KB, 下载次数: 57

114、自定义函数:取得屏幕分辨率.zip

6.39 KB, 下载次数: 53

115、自定义函数:自动建立多级目录.zip

6.81 KB, 下载次数: 62

116、自定义函数:将文件长度置零.zip

6.86 KB, 下载次数: 55

117、自定义函数:读取WIN共享文件夹密码.zip

9.78 KB, 下载次数: 59

118、自定义函数:取得预设的打印机及设置预设的打印机.zip

6.77 KB, 下载次数: 56

119、自定义函数:获得当前操作系统的打印机个数及检测打印是否存在.zip

6.72 KB, 下载次数: 53

120、自定义函数:枚举打印机名称清单.zip

8.1 KB, 下载次数: 67

121、自定义函数:读取网络服务器当前时间.zip

7.94 KB, 下载次数: 70

122、自定义函数:下载文件到指定目录.zip

6.82 KB, 下载次数: 104

123、自定义函数:自动映射网络驱动器.zip

6.85 KB, 下载次数: 65

124、自定义函数:自动断开网络驱动器.zip

6.82 KB, 下载次数: 56

125、自定义函数:连接选定单元格中的内容.zip

6.64 KB, 下载次数: 57

126、自定义函数:获取一个单元格中有指定字体颜色部份数据.zip

6.75 KB, 下载次数: 68

127、自定义函数:对指定文件加XLS加密.zip

6.88 KB, 下载次数: 61

128、自定义函数:选择指定范围内使用了填充颜色的单元格.zip

6.75 KB, 下载次数: 58

129、自定义函数:在特定的区域内查找文本,返回值是包含查找文本的单元格.zip

6.88 KB, 下载次数: 57

130、自定义函数:返回特定区域中最大值的地址.zip

6.86 KB, 下载次数: 59

131、自定义函数:删除表格中使用范围内的所有空白单元格.zip

7.21 KB, 下载次数: 62

132、自定义函数:返回数组中有多少个指定的字符串.zip

7.06 KB, 下载次数: 53

133、自定义函数:返回当前工作表中引用了指定的单元的地址.zip

6.75 KB, 下载次数: 55

134、自定义函数:获取Excel中字型列表.zip

6.54 KB, 下载次数: 57

135、自定义函数:获取一个字符串中有多少个数字字符.zip

6.48 KB, 下载次数: 50

136、自定义函数:在Excel中对多列进行填充.zip

6.52 KB, 下载次数: 65

137、自定义函数:对选定的范围进行数据填充.zip

6.7 KB, 下载次数: 72

138、自定义函数:VBA Project加密及解密.zip

7.88 KB, 下载次数: 74

139、自定义函数:列出收藏夹中的网址.zip

7.44 KB, 下载次数: 58

140、自定义函数:计算两个日期之间相隔的年份.zip

7.34 KB, 下载次数: 59

141、自定义函数:从字符串提取纯数字.zip

7.22 KB, 下载次数: 64

142、自定义函数:将一个数组按升序排列.zip

6.75 KB, 下载次数: 65

143、自定义函数:将一个数组按降序排列.zip

6.75 KB, 下载次数: 57

144、自定义函数:删除空白列.zip

6.59 KB, 下载次数: 61

145、自定义函数:判断工作表是否为空白.zip

6.34 KB, 下载次数: 53

146、自定义函数:将数据按类分到不同工作薄.zip

7.18 KB, 下载次数: 66

147、自定义函数:单元格内数据排序.zip

6.88 KB, 下载次数: 69

148、自定义函数:对多栏排序.zip

6.92 KB, 下载次数: 74

149、自定义函数:返回计算公式的值.zip

7.52 KB, 下载次数: 57

150、自定义函数:把第一列=某个值对应的第二列的内容连在一起,并用、隔开.zip

6.89 KB, 下载次数: 67

151、自定义函数:取得系统使用模式.zip

6.54 KB, 下载次数: 53

152、自定义函数:计算机注销、关机、重启.zip

6.79 KB, 下载次数: 72

153、自定义函数:更改计算机名称.zip

6.7 KB, 下载次数: 59

154、自定义函数:从n位开始取出字符串中的汉字、英文字母、数字.zip

7.21 KB, 下载次数: 68

155、自定义函数:在指定列中寻找含有指定字符串的单元格,并将符合条件的单元格标为红.zip

6.93 KB, 下载次数: 61

156、自定义函数:清除字符串中的空格.zip

6.8 KB, 下载次数: 65

157、自定义函数:查找合并单元格位置.zip

6.53 KB, 下载次数: 63

158、自定义函数:阴阳历转换和阴阳历生日.zip

10.71 KB, 下载次数: 68

159、自定义函数:利用数组和Substitute来替换某字符.zip

6.59 KB, 下载次数: 68

160、自定义函数:一键创建斜线表头.zip

7.82 KB, 下载次数: 79

161、自定义函数:自动获取指定月的工作日.zip

7.55 KB, 下载次数: 73

评分

参与人数 3 +16 收起 理由
lslly + 3 赞一个!
201228 + 3 版主 希望用迅雷或者115上传一下。
xdwy81129 + 10 应该指教下怎么批量下载呀

查看全部评分

发表于 2011-11-1 22:17 | 显示全部楼层
回复

使用道具 举报

发表于 2011-11-1 22:55 | 显示全部楼层
回复

使用道具 举报

发表于 2011-11-2 00:55 | 显示全部楼层
哇,怎么多,请教怎么做可以批量下载呢??
下载100多个文件太夸张了吧
回复

使用道具 举报

发表于 2011-11-2 07:37 | 显示全部楼层
为什么不放在一个文件夹内打包发上来吧,一个一个下载真是太不方便了!
回复

使用道具 举报

 楼主| 发表于 2011-11-2 11:31 | 显示全部楼层
哈哈,等下我传个代码上来,可以自动生成的!
回复

使用道具 举报

发表于 2011-11-2 12:19 | 显示全部楼层
斑竹。搞个一下就下载完吧。
不然那么多。。

有点晕
回复

使用道具 举报

 楼主| 发表于 2011-11-2 12:29 | 显示全部楼层
本帖最后由 hhzjxss 于 2011-11-2 12:30 编辑

晕死了,怎么只能传照片,不能传文件了呢!{:512:}
回复

使用道具 举报

 楼主| 发表于 2011-11-2 12:42 | 显示全部楼层
本帖最后由 hhzjxss 于 2011-11-2 12:43 编辑

原来是**浏览器升级后产生的问题,我用ie8.0就可以上传了!

VBA 自定义函数大全(分解程序)--hhzjxss.zip (153.26 KB, 下载次数: 443)
回复

使用道具 举报

发表于 2011-11-2 13:29 | 显示全部楼层
斑斑真是个有心人!!!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-4-27 08:19 , Processed in 0.223223 second(s), 9 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表