I have come up with the following piece of VB Coding but am still havin
a few problems as I cannot open any files with it.

fileToOpen = Application _
.GetOpenFilename("Text Files (*.txt), *.txt")
If fileToOpen < False Then
MsgBox "Open " & fileToOpen
End If

For some reason, I cannot open any files with this coding.

Is there any one who could assist me with this query?
Thank

--
Message posted from http://www.ExcelForum.com