使用另存为对话框保存下载文件的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

如果不是这样，那么正如爱荷华州所说，您真的需要发布代码。