随笔分类 -  Excel & VBA

记录Excel函数、公式、数据透视表、宏、VBA相关技巧
【VBA】批量重命名文件夹中的文件(自动数字编号,支持自定义后缀格式)
摘要:Sub rename(ByVal path As String, ByVal ext As String) ' 使用方法 call rename("文件夹路径","后缀格式") ' 使用后的效果:例如 00.jpg 01.jpg 02.jpg ...... Dim MyPath$, MyFile$, 阅读全文

posted @ 2011-07-28 15:41 zzllrr 阅读(2381) 评论(0) 推荐(0)

【VBA】Shell32.shell常用系统命令
摘要:Sub pub_shell(ByVal str As String) Dim shl As New Shell32.Shell Select Case str Case "资源管理器" shl.Explore ("D:\") Case "运行" shl.FileRun Case "查找文件" shl 阅读全文

posted @ 2011-04-06 16:20 zzllrr 阅读(892) 评论(0) 推荐(0)

导航