vb getopenfilename 获取文件名_STS | 一个批量修改文件名的小工具

随着电子审图的推广，无纸化操作越来越普遍，以往结构图送审前夜刮硫酸图完善图纸的操作已成为划时代的一个印记。取而代之的是编排PDF图名，有的项目动辄上百张图纸，审图公司有时细致到规定电子图的命名规则，面对刚刚整理好的待审图纸，只能望洋兴叹。

近日，研究室的小伙伴采用Excel中的VBA语言，设计了一个可以快速批量修改文件名的小工具，一键搞定任意数量文件的重命名，能为设计师节省大量宝贵时间。

作者：吴超

VBA(Visual Basic for Application)是一种宏语言，基于VB发展而来。VBA提供了面向对象的程序设计方法，易于掌握和使用，在日常生产任务中，适当的使用可以使工作自动化。VBA没有自己独立的工作环境，它必须依附于某一个主应用程序，如Excel、Word、Access等。因此，本工具在任意设计人员的电脑上开启Excel即可直接运行，无需安装，方便快捷。

功能介绍

将所有需要调整文件名的文件放在同一文件夹内，将该文件夹的路径名拷贝至工具内，即可对所有文件名进行修改。

1.字符替换

可将固定的字符串替换成想要的字符串。在上传审图时，通常会遇到“-”改为“_”，不允许出现空格的情况。该功能可以方便的实现这些替换，但应注意空格字符的正确使用。

功能1：字符替换

2.插入字符

在固定的位置插入字符串。例如：在开头位置插入项目名称，则需要插入的字符为“项目名称_”。

功能2：插入字符

3.顺序调换

文件名由固定的分隔符号分成不同的字段，调整字段之间的相对位置。例如：将项目名称调换到图编号的后面。

功能3：顺序调换

4.自定义

将文件名全部导入至Excel内，由设计人员自行修改文件名。如果设计人员对Excel内自带的字符相关的函数较为熟悉，能拓展更强大的功能。

功能4：自定义

———————————————————

声明：文中个别图片为网络转载，仅供分享，不作为商业用途，版权归原作者所有。如侵犯到您的权益，请联系删除。

———————————————————

服务与合作

NDRI STS(Structural Technology Studio)——中船九院结构技术研究室 致力于复杂结构设计咨询服务，欢迎项目合作，学术探讨，技术交流。