Excel filename into cell
 

Hi,

Is it possible to get the filename of an excel-file into cel A1?

Thanks

Excel filename into cell
 

With a formula for a Saved file, there are various ways
such as:

=MID(LEFT(CELL("filename", A1), FIND("]", CELL("filename",
A1))-1),FIND("[", CELL("filename",A1))+1, 255)

above as one line

Or with vba,

Sub test2()

Range("A1").Value = ActiveWorkbook.Name
End Sub

Regards,
Sandy

-----Original Message-----
Hi,

Is it possible to get the filename of an excel-file into
cel A1?

Thanks


.

Excel filename into cell
 

Hi
Use (just insert the formulas as-is. Note: the workbook
has to be saved before)
=MID(CELL("filename",A1),FIND("[",CELL("filename",A1),1)
+1,FIND("]",CELL("filename",A1),1)-FIND("[",CELL
("filename",A1),1)-1)

-----Original Message-----
Hi,

Is it possible to get the filename of an excel-file into
cel A1?

Thanks


.

Excel filename into cell
 

Thanks for the reply...
Tried to enter it in cell A1 but got an error ....
JP
"Frank Kabel" schreef in bericht
...
Hi
Use (just insert the formulas as-is. Note: the workbook
has to be saved before)
=MID(CELL("filename",A1),FIND("[",CELL("filename",A1),1)
+1,FIND("]",CELL("filename",A1),1)-FIND("[",CELL
("filename",A1),1)-1)

-----Original Message-----
Hi,

Is it possible to get the filename of an excel-file into
cel A1?

Thanks


.