【问题标题】:Invalid procedure call or argument vba. Run time error 5无效的过程调用或参数 vba。运行时错误 5
【发布时间】:2014-07-13 07:04:51
【问题描述】:

每次我尝试只选择一个文件但我有 .AlloMultiSelect = True 有一条错误消息说:运行时错误'5':无效的过程调用或参数并突出显示“strPathAndSparks = .SelectedItems(2)” .所以我的问题是我是否可以启用多选并只选择一个文件,如果可以,我在这行代码中的错误在哪里。这就是我所拥有的。提前谢谢大家了。

 strInitialDirectory = CurDir
 Set fd = Application.FileDialog(msoFileDialogFilePicker)

 With fd
    .Title = "Choose Jira File"
    .InitialFileName = CurDir & "\"
    .AllowMultiSelect = True
    .Filters.Clear
    .Filters.Add "Excel Files", "*.xls;*.xlsx;*.xlsm"

    If .Show = False Then
        ChDir (strInitialDirectory)
        Exit Sub
    End If

        strPathAndJira = .SelectedItems(1)
        strPathAndSparks = .SelectedItems(2)
 End With

【问题讨论】:

    标签: excel vba


    【解决方案1】:

    如果用户选择 1 个或更少的项目,则会发生错误。您不能强制用户选择 2 个项目,但您可以测试 使用

    选择了多少个项目
    fd.SelectedItems.Count
    

    【讨论】:

    • 好的,我明白了。非常感谢克里斯
    猜你喜欢
    • 2018-07-25
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2022-10-08
    • 1970-01-01
    • 2019-12-26
    • 1970-01-01
    • 1970-01-01
    相关资源
    最近更新 更多