Vba copy text file without open it

[chhiew]

Hi,

I am using below code to open and copy entire a text file from a folder, is it a way to copy the file without opening the text file in notepad?

Shell "Notepad d:\1_txtfile\" & txtfile & ".txt", vbNormalFocus

Would appreciate help from anyone.

Thanks

[jindon]

Data import...
See
https://support.office.com/en-us/art...b-339e391393ba

[mgs73]

I'm not entirely sure what you are asking, but hope this can help. This will put the contents of the text file into the variable FileData.

Please Login or Register  to view this content.

[chhiew]

Jindon,
Thanks for sharing, but i need to work in different way

[chhiew]

mgs73,
Thanks for sharing, i want to open and copy the text file data, normally i got to open text file with notepad, then copy them on clipboard and close the notepad.

So my question is can i do this without open the close notepad.exe? something like disable screen updating and make it invisible.

Thanks

[mgs73]

The code I posted won't open notepad. It will open the file, but not in a way that is visible to the user.

[jindon]

What's your problem?

Both suggestions will not open the file.

[chhiew]

Jindon, sorry for late reply, been busy last two days. yes just got you both code not open the file, thank you!

i got 2 more questions:
1)what if the file contain utf-8 character? how to show them in msgbox ? as it shows many chracter like this " �Ÿ“��Ÿ“� *九�œˆ�"

2) i want to import the text file to textbox by using code : Worksheets("Sheet1").TextBox1.Text = txt, but not working, any idea what went wrong?


Thank you

[jindon]

I don't think you can use textbox on the sheet.
Prepare userform(name UserForm1) with 1 x textbox(name TextBox1)

Please Login or Register  to view this content.

[chhiew]

Jindo, thanks for your help, it work great! appreciate your help!

[jindon]

If that takes care of your original question, please select Thread Tools from the menu link above and mark this thread as SOLVED.

[mohan.r1980]

Nice Solution Jindon Sir

[chhiew]

Thank you Jindon!