if its jpeg files i need instead would i just change it to

fileToOpen = Application _
.GetOpenFilename("JPEG Files (*.jpeg), *.jpeg")
If fileToOpen < False Then
Range("A1").Value = fileToOpenEnd If

"Bob Phillips" wrote:

fileToOpen = Application _
.GetOpenFilename("Microsoft Excel Files (*.xls), *.xls")
If fileToOpen < False Then
Range("A1").Value = fileToOpenEnd If
--

HTH

RP
(remove nothere from the email address if mailing direct)


"choice" wrote in message
...
is it possible to have a upload feature in excel...like, click "browse" it
opens a list of files from a certain folder, you click open and it puts
the
file name into cell A1?
i dont want to upload the file..just have the file name go into A1

thanks in advance