在Dialog.Show上出現“代碼已終止”錯誤

Question

    sub button1_click
    Dim a as FileDialog
    set a=Application.FileDialog(msoFileDialogFolderPicker)
    a.show
    end sub

當我單擊button1時，獲得指向a.show行的錯誤消息窗口。 即使我使用application.displayalerts=false ，我仍然會收到該錯誤。

請幫忙

Answer 1

嘿，看來我終於找到了問題。 我在遠程計算機上工作，不知道此問題的原因，但是我更換了遠程計算機，一切似乎都很好。 不過，謝謝大家。–無需對此給予更多關注。