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

0 vote159 views1 answer
Excel vba show developer tab
VBA
0 vote169 views1 answer
Send text to clipboard vb.net
VBA
0 vote174 views1 answer
Vba format currency
VBA
0 vote186 views1 answer
Excel vba named range exists
VBA
0 vote176 views1 answer
Build an index all files of a FTP site
VBA
1 vote177 views1 answer
How to INPUT text in shape with enter and spacein vba
VBA
15 votes241 views1 answer
Excel vba wait
VBA
0 vote160 views1 answer
Vba remove numbers from string
VBA
0 vote164 views1 answer
Excel vba scroll to cell
VBA
1 vote179 views2 answers
Excel vba password protect
VBA