会员
周边
众包
新闻
博问
闪存
赞助商
Chat2DB
所有博客
当前博客
我的博客
我的园子
账号设置
简洁模式
...
退出登录
注册
登录
Excel VBA 小天地
博客园
首页
新随笔
管理
2017年11月27日
选择文件
摘要: Sub test() arr = pickfiles If arr(1) "None" Then For i = LBound(arr) To UBound(arr) Debug.Print arr(i) Next i End If End Sub Function pickfiles() ...
阅读全文
posted @ 2017-11-27 20:24 wangway
阅读(406)
评论(0)
推荐(0)
编辑
公告