Import CSV based on file selection

[Maike]

Good Afternoon,

I need help with a CSV import please. I have a working code that clears existing queries/connections and then imports a specific file from my desktop:

Please Login or Register  to view this content.

Please Login or Register  to view this content.

However I would like to make the file that is being imported a variable. So once the user clicks the button this macro is tied to, i would like an explorer window to open and the user can choose which file to import. How do I do that?

Appreciate your time and help!

Cheers

Maike

[gue2013]

you can use this function to get a file name (adopt to your needs)

Please Login or Register  to view this content.

Please Login or Register  to view this content.

cheers

[Maike]

I appreciate the quick response. I changed the code as you had marked and it lets me select the file. However it does not import the data
Attachment 673487

looks like this now:

Please Login or Register  to view this content.

[gue2013]

I cannot open the attachment

for debugging use your original code and in the debug window (immediate window) write
?" Source = Csv.Document(File.Contents(""C:\Users\maike\OneDrive\Desktop\CHIWA.csv""),[Delimiter="","", "
copy the result to a text editor (notepad?)
then run the new code and set a break point on "if sFile"
in the debug window write
?sFile
should print the complete path including the selected file and then
?" Source = Csv.Document(File.Contents(" & sFile & "),[Delimiter="","",
copy this also to the text editor and compare the result (you should use the same csv-file as in your hard coded version

[MarvinP]

Hi Maike,

I've had this problem before and used Application.FindFile which opens a Dialog and lets the user select the file they need. It answered by problem. Read about it at:
https://docs.microsoft.com/en-us/off...ation.FindFile

[Maike]

Apologies.. I am not overly good at VBA and have never debugged before. I am also not good enough at syntax to just read about a command and know how to use it

[MarvinP]

OK Maike,

After looking at all the code above I thought you needed a simpler method. Find the attached and see what it does. It has a one line macro and a single button. See if this helps.

FindFile Demo Basic.xlsm

[Maike]

I guess I could use that to open the file, copy/paste the values and close it again. That does it! Thank you