Getting Filename 1

[rpg121]

I need to be able to get the filename of the current open excel workbook and put it into a string variable. I can't have the path in that string, just the filename. What is the best way to do this?

 

[byundt]

Dim flName As String
flName=ActiveWorkbook.Name

 

[rpg121]

Wow, was I ever looking in the wrong place. Thanks a lot for your help.

 

[byundt]

What are you doing with the workbook name?

If you just want to refer to the workbook in your code, then consider setting a workbook or worksheet variable instead.

Dim wb As Workbook
Dim ws As Worksheet
Set wb=ActiveWorkbook
Set ws=ActiveSheet
'Your code can then use statements like:
wb.Worksheets.Add    'Adds a worksheet
ws.Range("A1")="New value"    'Sets a cell to a new value