VBA - 在目录中查找文件夹并返回该文件夹的路径

时间:2017-09-06 02:14:37

标签: excel vba excel-vba

我正在使用excel vba创建一个充当工作卡的应用程序。用户将填写相关字段,按下按钮以更新正在运行的成本摘要,以及生成作业卡的可打印pdf。我的编码经验非常有限(4年前的一个学期),所以我对此比较陌生。

目前,应用程序会自动更新摘要文件,并可以打开一个单词模板文件并使用输入字段中的信息填充它,因此它最常用。我发现了查找摘要文件的方式存在问题,因为只要文件夹名称与我在应用程序中构建文件夹路径的方式不一致,就会返回错误。

目前我要进入这样的文件夹:

    templatePath = "C:\SERVICE\Card Template.doc"
If cbxType.Text = "Plant" Then
    savePath = "C:\SERVICE\0.1 PLANT\" & cbxNo.Text & " - " & txtMakeModel.Text & " " & txtRego.Text & "\0.2 SERVICE SHEETS\"
    ElseIf cbxType.Text = "Vehicle" Then
    savePath = "C:\SERVICE\0.2 VEHICLES\"

End If

目录由文本和组合框构成,一旦用户选择类型(工厂,车辆等),然后填写ID,填写模型名称,注册号,小时等的框。

我正在处理一段可以遍历给定目录的代码,搜索字符串的文件夹名称并返回该文件夹的路径。每个文件夹都以ID号开头,所以我想我可以搜索文件夹名称,但我不知道如何构建循环。任何有关这方面的帮助,或其他想法将不胜感激。如果问的不是太多,我也想对它的工作原理做一点解释。

0 个答案:

没有答案