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 vote192 views4 answers
How to continue formula in below line in vba code
VBA
0 vote178 views1 answer
Vba table header name
VBA
0 vote168 views1 answer
Convert number to minutes in vba
VBA
15 votes205 views1 answer
Excel vba wait
VBA
0 vote187 views1 answer
Remove series name from legendvbnet
VBA
0 vote165 views1 answer
Vb net show lines for all axis labels in chart
VBA
1 vote211 views1 answer
Excel vba get column number from column name
VBA
0 vote188 views1 answer
Vba foreach 2d array
VBA
0 vote163 views1 answer
Add Formula to Shape Text in VBA
VBA
0 vote193 views1 answer
Columns dont autoresize on program start vb.net
VBA