| 查看: 1189 | 回复: 5 | ||
gis-li金虫 (小有名气)
|
[求助]
关于Excel VBA数组操作 已有2人参与
|
|
请教各位，我想在VBA里自定义一个函数，是对数组进行某种操作的，能不能实现像内部函数UBound（Arr）一样，不管Arr的数据类型是Sting，Integer或者Long，都可以使用该函数而不报类型不匹配错误。比如如下调用UBound都是没问题的。 Dim a(5) as String Dim b(10) as Long Dim n as Integer n=UBound(a) n=UBound(b) 那么我该如何自定义一个函数也可以 不受数组存储数据类型限制，以执行Test()不报类型不匹配的错误。 Public Function myFun(Arr() as ?) as Boolean '------------- End Function Private Sub Test() Dim Arr1(5) as String Dim Arr2(10) as Integer Msgbox myFun(Arr1) Msgbox myFun(Arr2) End Sub |
回复此楼» 猜你喜欢
一志愿华南师范大学0702物理学305调剂
已经有5人回复
-
求调剂
已经有30人回复
-
266求调剂
已经有10人回复
-
297求调剂
已经有16人回复
-
326分，一志愿沪9，求生物学调剂
已经有4人回复
-
288求调剂，一志愿华南理工大学071005
已经有3人回复
-
304求调剂
已经有13人回复
-
调剂
已经有18人回复
-
293调剂
已经有4人回复
-
338求调剂
已经有7人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 【素材】Excel模板大全（VBA+办公室专用+财务管理+人力资源+市场营销）
已经有32人回复
- Excel计算LD50、EC50等版数量的VBA源程序
已经有22人回复
- 求俩个数较大值？（用至少三种不同的算法）
已经有5人回复
deephill
铁杆木虫 (职业作家)
- 应助: 59 (初中生)
- 金币: 5262.3
- 散金: 100
- 红花: 16
- 帖子: 4425
- 在线: 425小时
- 虫号: 305318
- 注册: 2006-12-09
- 性别: GG
- 专业: 微量元素地球化学
2楼2014-12-26 10:13:21
gis-li
金虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 1744.3
- 帖子: 83
- 在线: 54.6小时
- 虫号: 1380340
- 注册: 2011-08-26
- 性别: GG
- 专业: 构造地质学与活动构造
3楼2014-12-26 10:52:35
gis-li
金虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 1744.3
- 帖子: 83
- 在线: 54.6小时
- 虫号: 1380340
- 注册: 2011-08-26
- 性别: GG
- 专业: 构造地质学与活动构造
4楼2014-12-26 10:57:41
zhouxiaochun
铁杆木虫 (正式写手)
- 应助: 57 (初中生)
- 金币: 8946.8
- 红花: 15
- 帖子: 622
- 在线: 241.8小时
- 虫号: 551545
- 注册: 2008-04-27
- 性别: GG
- 专业: 化学工程及工业化学
5楼2014-12-26 22:10:20
gis-li
金虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 1744.3
- 帖子: 83
- 在线: 54.6小时
- 虫号: 1380340
- 注册: 2011-08-26
- 性别: GG
- 专业: 构造地质学与活动构造
6楼2014-12-27 22:41:46
