Modules & VBA :: Search For All Picture Files In Documents And Copy To A Folder On Desktop

Mar 28, 2014

I've been trying to search for all picture files in my documents and copy them to a folder on the desktop. I found this and it work great for searching however I'm having trouble getting the copy to work. [URL] ....

Code:
Dim colFiles As New Collection
RecursiveDir colFiles, "C:Photos", "*.jpg", True
Dim vFile As Variant
For Each vFile In colFiles
Debug.Print vFile
Next vFile

Code:

I replaced the debug.print vfile with my copy function. I've tried copyfile but it needs to specify the destination with the file name. I tried using the FSO filecopy method and can't get it to work (keep getting a compile error "Expected =") I feel the hard part is done and this part should be simple.

View Replies


ADVERTISEMENT

Copy Files Into Specific Folder

Apr 16, 2012

I have created a database that saves a link of technical data. Now i have forms where you can add the hyperlink of the data in the database. You can also type information about the data into the form (like location, what kind of part etcc.)But I was asked to save the data in a specific folder that you can select.

So what I have to do is:

Browse for a file in a form.Save the hyperlink of the file in the database.Don't save the file in the database, but copy the file that's selected when browsing to specified folder

View 12 Replies View Related

Modules & VBA :: How To Access A Folder On Desktop

Feb 7, 2014

I used to have a code that we used to copy data from a folder that was on the desktop using the code below.

Code:
DoCmd.CopyObject "C:Documents and SettingsAll UsersDesktopWetcleans

This does not work with windows7. I have tried the C:USERSPUBLICDESSKTOPWetcleans but that does not seem to work either. How to access a folder on the desktop ?

View 2 Replies View Related

Modules & VBA :: Universal Short File Path To Documents Folder?

May 27, 2014

I have the code below and I want it to open a file from my documents folder. The only problem is that every computers path is different to this folder. Any easy way to work around and open a file in My Documents without the full path?

I want to eliminate the part of the path in red and make it universal because computers will have a different number.

Operating System: Windows 7

Code below:

Public Function AddITARPicOffloadAnalysis()
Dim xlApp As Object
Set xlApp = CreateObject("Excel.Application")
With xlApp
Dim wb As Object
Dim ws As Object
Dim Lastrow As Long

[Code] .....

View 9 Replies View Related

Modules & VBA :: Saving Picture To Specific Folder With Customized Name?

Feb 8, 2014

I have below module to save picture under named folder:

Code:
Option Compare Database
Public Enum acFileType
acPicture = 1
acFiles = 2
End Enum

[Code] ....

But how to save the picture with customized name, say "Materials 0001.Jpg"

View 7 Replies View Related

Modules & VBA :: Merging All PDF Files In Particular Folder

Oct 25, 2014

I'm trying to write a simple little database. At one point on a form, I'm trying to merge all the pdf files in a particular folder. (I'm using the pdftke.exe program and there will be multiple pdf files)

It all works perfectly if I call it as below, with the actual paths already hard coded. It combines all the pdf files and renames it to the "merged filename.pdf" correctly

Dim stAppName1 As String
stAppName1 = "C:a folder namepdftk.exe C:another folder nameprints*.pdf cat output C:folder where merged file will bemerged filename.pdf"
Call Shell(stAppName1, 1)

However, I'm trying to have it work with the middle portion (the folder where all the pdf files are) being created on the fly so to speak.

The middle portion/path I have stored from a previous form and it's stored in a table.

So I'm trying the below, but doesn't seem to work.

Dim stAppName1 As String
Dim combine_files As String
combine_files = (this pulls a path from a stored field on the open form) + "" + CStr("*.pdf")

stAppName1 = "C:a folder namepdftk.exe (combine_files) cat output C:folder where merged file will bemerged filename.pdf"
Call Shell(stAppName1, 1)

With the code above, it doesn't seem to do anything.

View 2 Replies View Related

Modules & VBA :: Loop Through All Files In Folder?

Aug 26, 2014

I believe this is most recurring scenario for all. Any simple way like:

Code:
For each file in folder.files
Msgbox File.Name
Next File

For your information the above code doesn't work

View 10 Replies View Related

Modules & VBA :: Combine PDF Files In A Folder

Oct 21, 2013

I added to my database a button to ouput the data to PDF. It works as it should. We do print out the letters in paper and put a copy in the folder from the client (connected with the ID nr). From time to time we need to attach a PDF document to the letter and combine it. My question is now if it is possible to have some code to the button that when it finish the output to PDF it will combine all the PDF files that are in the folder and put it in a second folder. After that, I need to put the combined PDF in another folder.

View 6 Replies View Related

Modules & VBA :: Copy File From One Folder To Another

Feb 28, 2014

I need to create a function that I can launch using a macro that will copy an excel file from one folder to another in the file system.

View 4 Replies View Related

Modules & VBA :: Conditional Formatting With Files That Update In A Folder

Aug 20, 2013

I have a folder that .csv files which are connected to my database are updating in. Once the .csv that i specify updates I want a color box to turn green. Is there a way to do this? Maybe just use when the linked text file updates?

View 2 Replies View Related

Modules & VBA :: Moving PDF Files To User Specific Folder

Feb 11, 2015

I'm Trying to move PDF Files associated with a customer to there specific folder

The query gathers the data, Gives me a list of files by account number

Now I want to use the results of the query to move those files

View 5 Replies View Related

Modules & VBA :: Delete A Folder To Include Subfolders And Files?

May 25, 2015

I need a way to delete a folder along with subfolders and files associated with a record via command on a form:

The path is stored in a text field "txtDocuments".

For example: "C:UsersWatsonDesktopFY1515051505-010"

So, I would want the code to pull the folder location from the txtDocuments text field and delete folder "1505-010" and all sub folders & files contained within it.

View 4 Replies View Related

How To Open A Dialog Box To Move Files Inside A Folder That Is Setup As Current Folder

Sep 2, 2015

I'm trying to automate a process of selecting a set of file/s and move them in a folder. When I click on a button, it should open a current folder that is setup in the code.

Lets say that I have a folder C:documents est, and very time I click on the button, it should open the dialog box with that path so I can select the files from another folder, drag them there and they will be saved in that folder.

This will form part of wider automation that will send an email stating that those file/s where placed in that folder.

I have in the same form where the button is placed, 3 check boxes that needs to be passed to the email as well that one or all the files where placed in the folder.

View 10 Replies View Related

General :: Browse Picture From Desktop And Insert Into Database

Feb 5, 2014

I need codes to browse pictures from desktop or folder and insert into access DB.

I am using Access 2010.

I also want the code to only insert the name of the picture and then link its folder through the ID or some text,ok?

View 1 Replies View Related

Modules & VBA :: How To Execute Free Text Search In Linked Documents

Apr 10, 2014

I have a table which lists all documents that refer to a certain entity. the table contains the file names and paths. I would like the user to be able to search for text inside these documents.Can I use Windows Search for that by using code? Is there any other way?

View 6 Replies View Related

Modules & VBA :: Access 2013 - Make Copy Of PDF Document In Specified Folder?

Apr 25, 2014

I need to make a copy of a pdf document that the user identifies in a "hidden" folder that is associated with my backend database. how to code this. I am using Access 2013.

View 6 Replies View Related

Forms :: Unable To Create Command Button To Open Folder On Desktop

Feb 19, 2015

I am simply trying to create a command button to open a folder on my desktop

Cannot seem to find this code

This is the path to the folder I want to open

C:UsersJONATHANDesktopCMS FILES

View 4 Replies View Related

Moving Documents Associated With One Customer From Main Document Folder To Another

Jan 28, 2015

I want to move documents associated with one customer from my main document folder to another. I've looked at some sample code but nothing seems to work

I want to run a query to get the document list

Run the code to move these files ( PDF Files )

and It's done...

View 14 Replies View Related

General :: Saving Program To Current User Documents Folder?

Aug 31, 2014

I have an access program and i want it to save a copy into a location... ive got it so it can save however - i want it to save to the current users documents folder (win 7)

What file path would i use?

View 5 Replies View Related

Modules & VBA :: Copy From A Location And Paste Files In A Predefined Directory

May 16, 2014

I would like to copy one (or multiple) file (-s) from a location (using applicatioin.FileDialog) and paste it in a predefined directory.

This is what I have written so far, but it doesn't work.

Code:
Dim strFil As String
Dim strURL As String
strURL = "xxxxxxxxxxxx" & Me.Internnr
strFil = Application.FileDialog(3)
strFil.allowmultiselect = True
strFil.show
FileCopy strFil, strURL

View 9 Replies View Related

Modules & VBA :: Search SubDirectory - Find And Open A Folder Based On Text Box

Sep 8, 2014

I am 2 years into my database. I am trying to find and open a folder based on a text box. The problem is folder could be in many sub folders which is hold on our J: drive.

To further complicate, the folder i am searching may not be exactly as the text box states.

EG. Text box could say 123456 however the folder could be called M123456 etc.

How do i locate a folder or subfolder and open it based on part of a text box...

View 3 Replies View Related

Populating Picture File Names From A Folder

Jan 13, 2006

I could realllllllly use some help here....

I have database that looks like this:

Type | Pic1 | Pic 2
-------------------------------------------
12-5525 C:RC125525-01 C:RC125525-02
12-3556 C:RC123556-01 C:RC123556-02

As you can see the picture naming system is standard and is based on the content in the type field. If one record of the Type field is say 12-6636 then the picture will be RC126636-01 (for Pic1) and RC126636-02.

Is there a way where the user say... can type C: and it will populate the picture file names in a combo box?

There are about 2000 records in the DB and I am just trying to find a way to keep a user from typing all that stuff.

:rolleyes: Could there be a way to do all 2000 records at once?...:rolleyes:
Thanks.

View 3 Replies View Related

Problem With Module To Export Several Files To .rtf Documents

Sep 20, 2006

Here is my function :


Private Sub Commande4_Click()
Dim dbs As DAO.Database
Dim rst As DAO.Recordset
Dim qdf As DAO.QueryDef
Dim BaseSQL As String
Dim strSQL As String
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("SELECT DISTINCT [Dealer/Distributor Number] FROM Query_Active_Dealer_List_Update")
Set qdf = dbs.QueryDefs("Query_Active_Dealer_List_Update")
BaseSQL = qdf.SQL
With rst
Do Until .EOF
strSQL = Left(BaseSQL, Len(BaseSQL) - 3) & " WHERE [Dealer/Distributor Number] =" & ![Dealer/Distributor Number]
qdf.SQL = strSQL
DoCmd.OutputTo acOutputReport, "Main_Report", "RichTextFormat", "C:Documents and SettingslarocmaDealer_Scorecards" & ![Dealer/Distributor Number] & ".doc"

.MoveNext
Loop
.Close
End With
qdf.SQL = BaseSQL
Set qdf = Nothing
Set rst = Nothing
Set dbs = Nothing

End Sub

The problem is in the line containing : strSQL = Left(BaseSQL, Len(BaseSQL) - 3) & " WHERE [Dealer/Distributor Number] =" & ![Dealer/Distributor Number]

If I let ![Dealer/Distributor Number] this way I get an error and no report generated. But if I put "[Dealer/Distributor Number]" in a parameter, and I enter the dealer numbers by hand, I get good working reports. Dealer/Distributor Number are not nul. Main_Report is a report containing many sub_reports grouped by Dealer/Distributor Number. The query I linked to the function is the query I use on the main report to get the information about each dealership.

View 1 Replies View Related

Forms :: Picture Link To Folder Broken By Moving ACCDB

Jul 8, 2013

I have a MS access db with a report that displays a list of students with a pic of their face on the side.

The pics are linked to a folder thats inside the folder where the .accdb file is stored.

The accdb is often moved around, but when it does, all the links become broken and the images are no longer displayed on the list.

How can i adjust the link path so that regardless of where the accdb is moved, the links remain valid?

I am using ms2007 and also its not a networked area but rather a bunch of standalone computers.

View 14 Replies View Related

Calling A Query Using .mde Files And Merged Word Documents.

Jan 17, 2007

Hi,

My situation:

A front end written in Access (back end mySQL).
I have made a .mde file out of this front end.
There are a number of MS Word documents used (as merge documents) for running reports and letters that are linked to queries in the database. However, I can only link these documents to the original .MDB file as you can't link to the queries ni the .mde file.

This works fine until you have a query that requires a parameter from a form. The user will have selected the parameter from the .mde version of the front end that they are using but the query which is being called from the .mdb version (by the Word merge document) can't see this parameter because it is a totally separate database.

How can I get around this problem?

Sorry this is a lengthy post, hope it makes sense.

Matt.

View 4 Replies View Related

Modules & VBA :: Open Folder Nested Inside Main Folder?

Mar 16, 2015

I'm trying to open a folder based on a BIN nr. This folder could be in a main folder that has diferent subfolder. As there where differnt naming used to create the folderes, one of the things they have always is the BIN nr. It alwasy start with a unique number and maybe I could use it to scan the subfolders and open that one that the BIN nr is equal as in the field BIN.

Now we have serveral 1000th of folders and finding them takes time.

View 3 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved