Show content file .txt in msgbox

[Gilang]

I created a txt file with notepad with the name Message.txt the content "please read carefully the message that appears"
I want this message to appear in the msgbox. is there a way to call it and display in vba msgbox?

 

[Joe4]

See here for how to do that: Read text file into string variable

Then you would just add:

MsgBox strFileContent

to the bottom of the code to return that in a message box.

Just be sure to update the file path/name in the code to watch your text file.

 

[Gilang]

See here for how to do that: Read text file into string variable

Then you would just add:

MsgBox strFileContent

to the bottom of the code to return that in a message box.

Just be sure to update the file path/name in the code to watch your text file.

where can i put the txt file path? can you make an example?

 

[Joe4]

Did you look at that link? You pretty much copy that code, verbatim, dropping it into a Sub procedure.
The file path/name should be pretty evident (it is the only file path/name in the whole code).

Sub MyReturnString()

Dim strFilename As String: strFilename = "C:\temp\yourfile.txt"
Dim strFileContent As String
Dim iFile As Integer: iFile = FreeFile
Open strFilename For Input As #iFile
strFileContent = Input(LOF(iFile), iFile)
Close #iFile

MsgBox strFileContent

End Sub

The file name/path in red is the part you need to replace your your text file path/name.
The line in blue is the part we added to the original code to return the value in the message box.

 

[Gilang]

Did you look at that link? You pretty much copy that code, verbatim, dropping it into a Sub procedure.
The file path/name should be pretty evident (it is the only file path/name in the whole code).

Sub MyReturnString()

Dim strFilename As String: strFilename = "C:\temp\yourfile.txt"
Dim strFileContent As String
Dim iFile As Integer: iFile = FreeFile
Open strFilename For Input As #iFile
strFileContent = Input(LOF(iFile), iFile)
Close #iFile

MsgBox strFileContent

End Sub

The file name/path in red is the part you need to replace your your text file path/name.
The line in blue is the part we added to the original code to return the value in the message box.

I've tried it, but what appears is the data in the sheets, not showing the data in the txt file that I want.

 

[Joe4]

I've tried it, but what appears is the data in the sheets, not showing the data in the txt file that I want.

I don't see how that is possible if you are running this particular VBA code.
Where exactly have you placed the VBA code?
You should place it in a General module that you create (see here: Insert and run VBA macros in Excel - step-by-step guide - Ablebits.com).

 

[Gilang]

I don't see how that is possible if you are running this particular VBA code.
Where exactly have you placed the VBA code?
You should place it in a General module that you create (see here: Insert and run VBA macros in Excel - step-by-step guide - Ablebits.com).

I've made it in Modul1 but what appears is the data on the sheet

 

[Marc L]

​

That is impossible except if the textfile has the same content than the sheet ! …​

 

[Joe4]

I don't see how that could be, unless you are running the wrong procedure.
If you can upload your Excel file and text file to a file sharing site and provide a link to it, we can try it for ourselves.
Just be sure to remove any sensitive data from the files first.