Vba get workbook name

fileName = ThisWorkbook.Name 
Debug.Print fileName		' With extension
If InStr(fileName, ".") > 0 Then 
   fileName = Left(fileName, InStr(fileName, ".") - 1) 
   Debug.Print fileName		' Without extension
End If

Similar codes

1 vote295 views1 answer
Vba delete array element
VBA
0 vote311 views1 answer
Excel vba move down to next visible cell
VBA
0 vote310 views1 answer
Convert unix to date vba
VBA
0 vote311 views1 answer
Worksheet.pastespecial textbox
VBA
5 votes357 views1 answer
Excel-vba get integer high byte
VBA
0 vote327 views1 answer
Excel vba paste all to each sheet in workbook
VBA
1 vote322 views1 answer
Shortcut to apply a formula to an entire column in excel
VBA
0 vote332 views2 answers
VB
VBA
0 vote340 views1 answer
Windows Forms dark title bar
VBA
2 votes325 views1 answer
Vba file from path
VBA