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 vote282 views1 answer
Vba timestamp -- milliseconds
VBA
0 vote296 views1 answer
Excel vba unlock sheet without password
VBA
1 vote310 views1 answer
Vba ubound array 2-dimensional
VBA
1 vote290 views1 answer
Export datagridview to excel vb.net
VBA
0 vote275 views1 answer
Vb net show lines for all axis labels in chart
VBA
0 vote285 views1 answer
Refer to resource using string variable vb.net
VBA
1 vote281 views1 answer
Excel vba autofit
VBA
0 vote267 views1 answer
Vba copy paste value only
VBA
0 vote292 views2 answers
Open url from vba
VBA
0 vote280 views1 answer
Vba len variant
VBA