Search results for query: Filedialog

the default behaviour is look at MyDocuments. for your purpose, you need a FileDialog and not use the built-in menu. use command button and FileDialog.

Hello all, I need a little help. I have a project in office 365, accesss vba. I want to use/add a Office. FileDialog box. but I need to add in a copy of Office 16.0 object libary object. but i can not find a copy of it on line. any one got any ideas...

Hi. Find the following two lines in your code and replace them accordingly. Dim fd As Object Set fd = Application.FileDialog(4) Hope that helps...

...On Error GoTo Err_Handler 'Code compatible with both 32-bit & 64-bit Office ' Set options for the file dialog box. Dim F As FileDialog Dim strFilePath As String Set F = Application.FileDialog(msoFileDialogFilePicker) F.title = "Locate the image file folder and click on...

Private Sub btnExportEvent_Click() Dim reportName As String Dim criteria As String Dim fd As FileDialog Dim filename As String reportName = "CompletedForm" criteria = "[ComplaintNumber]= " & [Forms]![frmDetails]![ComplaintNumber] Set fd =...

...settings .InitialFileName = strInitialDir .AllowMultiSelect = False .InitialView = 2 'msoFileDialogViewDetails 'Only return a value from the FileDialog if not cancelled. If .Show Then strGetFileFolderName = .SelectedItems(1)...

Will have a look at it now My function actually has indentation, not sure why it did not paste in that format

Yes I looked at the format you sent. My format is the same as the sample, unless I am missing something here OutputType - acOutputReport ObjectName - "Defer" OutputFormat - "PDFFormat(*.pdf)" OutputFile - StrFileName AutoStart - False TemplateFile - "" Encoding , , OutputQuality -...

...Private Sub cmd_exportPDF_Click() Dim reportName As String Dim criteria As String Dim strfilename As String Dim fd As FileDialog reportName = "CompletedForm" criteria = "[ComplaintNumber]= " & [Forms]![frmDetails]![ComplaintNumber] strfilename =...

Hi. To make a filepath "portable," you probably should just store the file's name instead of the full path. That way, you can add the folder location later, based on the current location of the database. In that case, this little article might be able to help...

Check out the FileDialog object. https://docs.microsoft.com/en-us/office/vba/api/office.filedialog

I have NEVER used Call with .Filters.Clear or .Filters.Add in this context. Access doesn't complain. In fact I hardly ever use Call in any of my code This is the note in the link @Gasman helpfully provided in post #18

...As String Dim dbPath As String 'Code compatible with both 32-bit & 64-bit Office ' Set options for the file dialog box. Dim F As FileDialog Set F = Application.FileDialog(msoFileDialogFilePicker) F.Title = "Locate the image file folder and click on 'Open' to select it" ' Clear out any...

If interested here is an automatic relinker / delinker. When opening the FE it will search for the BE and if not found give you a filedialog. There is a button to then switch between the two provided backends. But as Pat said in many cases this should only be available to an admin since most...

Did it work? If it did, then you're good.

here's some info on FileDialog https://bytes.com/topic/access/insights/916710-select-file-folder-using-filedialog-object and vba FileCopy() https://bettersolutions.com/vba/functions/filecopy-statement.htm

...hyperlink can be a second out.. how can i overcome this? Heres my code.. On Error GoTo Err_Command3402_Click 'Declare a variable as a FileDialog object. Dim fd As FileDialog 'Create a FileDialog object as a File Picker dialog box. Set fd =...

Thank you. Its work... But FileDialog not defined still not work. I have reference Microsoft office 16.0 Object Library See Msg #1 picture Serial number-2 Edit / If I put Dim fDialog As Office.FileDialog Not work. So I put here Dim fDialog As Object

FileDialog should work for Folders too if you use the msoFileDialogFolderPicker constant.

...of Office. 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...