Search results for query: Filedialog

Hi Jack OK Please ignore my last post as I managed to work out where to modify my Code. It pops up with the File Dialog window and populates with the current Report Name. Is there any way to prefix the Report Name so that it saves as follows:- 133875 22032023 ReportName 133875 being Load...

...As String Dim suffix As String Dim db As DAO.Database Dim tbl As DAO.TableDef Dim newTableName As String Dim dlg As FileDialog ' Create a file dialog object Set dlg = Application.FileDialog(msoFileDialogFilePicker) ' Set the file dialog title...

I get a Method 'FileDialog' of object '_Application' failed message. Any ideas? Thanks

...ErrHandler Dim db As DAO.Database Dim rsMainRecords As DAO.Recordset2 Dim rsAttachments As DAO.Recordset2 Dim fDialog As FileDialog Dim sFilePath As String Dim fld As DAO.Field2 Dim RecordCount As Integer Set db = CurrentDb ' Set up the File Dialog...

Mike, My post and sample were intended to simply show how to use FileDialog to browse to a folder to store the PDF. My sample worked to select a folder and save the pdf. You seem to be doing more now than in your initial post. I have been away most of the day.

I have created two FileDialogs, one to select a folder and another to select a file with a default extension. I have noticed that, in the name of the file, it puts the last folder of the path that I give it. This gives me an error when I want to select the route that I pass through the system. I...

Hi Jack I modified the Save Event as follows Private Sub btnSave_Click() 'Me.Name is the name of the current report Call SaveFileToSelectedFolder(Me.rptName) "Where rptName is the name of the Current Report" End Sub Used your latest version of the Function and now nothing happens after I...

Hi Arnelgp, unfortunatelly that is not fixing the issue( The code stopes at Dim file as FileDialog Cheers

Hi Jack Yes and your example did just what I wanted. The op then asked if it could be modified to show the "Load Number - Date - ReportName" as the Filename. Paul kindly stepped up and his suggestion works but for some reason I am now getting the error reported in my last post.

In that case, I'd recommend you use the FileDialog object instead. https://learn.microsoft.com/en-us/office/vba/api/Office.FileDialog

Maybe check out the FileDialog object.

...As Integer) As String On Error GoTo ErrHandler Dim db As DAO.Database Dim rst As DAO.Recordset2 Dim fDialog As FileDialog Dim sFilePath As String Set db = CurrentDb Set rst = db.OpenRecordset("SELECT * FROM Company WHERE Company.CompanyID =" & CompID) ' Set...

If you comment out everything except for the error handling code and :- Dim file As FileDialog Set file = Application.FileDialog(msoFileDialogFilePicker) What happens?

I also tried your solution, but it doesn't prompt me for where to save it. It just automatically exports it to my documents folder. I need it to let the user choose where to save the pdf.

it is is an extract to excel

...Explicit Public Function fChooseFile() ' Requires reference to Microsoft Office 11.0 Object Library. Dim fDialog As Office.FileDialog Dim varFile As Variant ' Set up the File Dialog. Set fDialog = Application.FileDialog(msoFileDialogFilePicker) With fDialog...

Good morning everyone, I'm having an issue with the msoFileDialogFilePicker that I have not seen anyone ask about... It works as advertised but when I try to copy the file form its original location to another location, I got runtime error 70 - Permission denied. While reading up on the...

I'll get you started. Look at FileDialog for the browse, MkDir for creating directories, FileCopy for copying/renaming.

you switch to FileDialog, it is easier to use.

The FileDialog object does not provide any property or method to control its position. You can do it using a lot of API code using this post But I really don't think it's worth going that far. In Windows 11, I can move the dialogue and shift close it to make windows remember the position and size.