Search results for query: Filedialog

Thanks Pat that is great I will give it a try but it might not be for a while at the moment due to my work load. The Database is working after a fashion and the boss wants me to do my real job ;)

...As String = "", Optional lngType As Long = 4, Optional strPattern As String = "All Files,*.*") As String 'StrInitialDir = where the filedialog starts browsing 'lngType e.g. 'msoFileDialogFilePicker = 3, msoFileDialogFolderPicker =4, msoFileDialogOpen=1,msoFileDialogSaveAs=2 Dim...

...As String = "", Optional lngType As Long = 4, Optional strPattern As String = "All Files,*.*") As String 'StrInitialDir = where the filedialog starts browsing 'lngType e.g. 'msoFileDialogFilePicker = 3, msoFileDialogFolderPicker =4, msoFileDialogOpen=1,msoFileDialogSaveAs=2 Dim...

...other to a file 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...

...I am getting the message "Item not found in this collection" Public Function ImportDocument() On Error GoTo ErrProc Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) With fd .InitialFileName = "" .Title = "Dialog Title"...

Yes, I do have that exactly I will look at this again

...add to my Accdb an errror occured with this lines below, (but i'm still working to fixed the error, still hope I could do it) Dim F As /"FileDialog"/ Set F = Application.FileDialog /"(msoFileDialogFilePicker)"/ As of now i already re-desidgn the features, and working to fix the error...

I get an error on Call. Filters.clear

...As String = "", Optional lngType As Long = 4, Optional strPattern As String = "All Files,*.*") As String 'StrInitialDir = where the filedialog starts browsing 'lngType e.g. 'msoFileDialogFilePicker = 3, msoFileDialogFolderPicker =4, msoFileDialogOpen=1,msoFileDialogSaveAs=2 Dim fDialog...

Im finding the various codes for each specific operation, but not how to tie them together. I have the code to open the filedialog window, found the code for copy, paste, rename, delete, but cant figure out how to store the selected file as a variable to pass it to the rest of the code to run those.

Hi. That sounds like a good plan. You will need a few components to do it. FileDialog object to let the user browse for the file they want to upload FileCopy statement to make a copy of the file into the subfolder you designate TableDef Connect property, if you don't know beforehand where the...

good day merry christmas >is it possible to omit some parts of the codes that are having compile error?

I would probably use the FileDialog and store the path in the field.? https://docs.microsoft.com/en-us/office/vba/api/office.filedialog

1. Use FileDialog to allow user to navigate to a file and select and also to navigate to and select desired destination folder 2. Use FileCopy() function to copy selected file 3. Set value of field like: Me.tbxFile = strFile

Yea I've done FileDialog with late binding which I'm happy with, hopefully users will just deal with the small amount of admin of having to save it to pictures or documents etc before attaching,

...on 1400 records each with one attachment. Can you spot anything I could do to make it run faster? Private Sub lblFiles_Click() Dim fd As FileDialog, strFolderPath As String, lngTotal As Long, rs As DAO.Recordset, rsMini As DAO.Recordset, strFilePath As String, db As DAO.Database...

...strAttachField, strIDfield As String, i As Long) '------------ code to browse file and select file to attach Dim fd As FileDialog Dim oFD As Variant Dim strFileName As String Set fd = Application.FileDialog(msoFileDialogFilePicker) With fd .ButtonName = "Select"...

Hi Minty, Could you please direct me to rectify my code as I am getting the below error Export works perfectly, only when clicked on cancel I get the error Everyone (Gasman) tried to assist me but I must me missing something or not understanding where they are trying to point me Below is...

Set the InitialFileName ? https://stackoverflow.com/questions/16917122/defaulting-a-folder-for-filedialog-in-vba

What will work, is if you open the FileDialog window to the required folder, then drag the email in.