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 vote152 views1 answer
Vba date to unix timestamp
VBA
0 vote158 views1 answer
Create links in msgbox in vb
VBA
1 vote145 views1 answer
Excel vba hide zero values
VBA
0 vote158 views1 answer
Discern between file and folder given path vb.net
VBA
0 vote142 views1 answer
Excel vba milliseconds
VBA
3 votes163 views1 answer
Excel vba export sheet as a csv without losing focus of my current workbook
VBA
0 vote155 views1 answer
Excel vba delete folder
VBA
0 vote178 views2 answers
Get unique random number in vb.net
VBA
0 vote156 views1 answer
Vba is integer
VBA
0 vote157 views1 answer
Excel vba protect worksheet without password
VBA