使用另存為對話框保存下載文件的vba代碼

Question

如何下載文件，然后將其保存到我想要的任何位置？ 下載部分已完成，但是當 vba 代碼單擊下載按鈕時，會打開“另存為”對話框按鈕的彈出窗口。如何使用該“另存為”對話框，以便我的宏連續運行而不會出現任何停頓。

Answer 1

我同意愛荷華州的評論，即不清楚您在做什么，但作為在黑暗中的一個鏡頭，您是說要將“另存為”對話框合並到執行下載的 VBA 代碼中而不是做將另存為單獨的操作？

如果是這樣，您可能需要做的就是將 Application.GetSaveAsFilename 方法合並到您的下載代碼中：

fileSaveName = Application.GetSaveAsFilename( _ 
 fileFilter:="Text Files (*.txt), *.txt") 
If fileSaveName <> False Then 
    MsgBox "Save as " & fileSaveName 
End If

如果不是這樣，那么正如愛荷華州所說，您真的需要發布代碼。