用vba保存文件（特殊）

我想打开一个窗口，如“另存为”窗口，然后你可以在这个窗口中选择一个文件（没有文件夹或名称），并点击“保存”系统应该将选择的文件保存在定义名称的已定义文件夹中。用vba保存文件（特殊）

有没有办法像这样做？

2014-02-18 Julius

是。您可以使用['FileDialog Object']（http://www.wiseowl.co.uk/blog/s209/type-filedialog.htm）选择一个文件或文件夹，例如使用['Scripting.FileSystemObject'] （http://www.jpsoftwaretech.com/vba/filesystemobject-vba-examples/#copyfile）复制该文件。 – marcw

谢谢，它的工作。我们现在怎么样关闭它？ – Julius

问题解决了是这样的：

Function adding(addval) 
Dim fDialog As Office.FileDialog 
Dim FileChosen As Integer 

Set fDialog = Application.FileDialog(msoFileDialogFilePicker) 

FileChosen = fDialog.Show 

    If FileChosen <> -1 Then 
     'clicked on CANCEL 
     Exit Function 
    End If 

Me.Controls("Q" & addval & "Link").Caption = fDialog.SelectedItems(1) 
End Function

来源

2014-02-25 14:50:04 Julius

用vba保存文件（特殊）

回答

相关问题