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 vote252 views1 answer
Vba type
VBA
-1 vote236 views2 answers
How close excel through visual basic
VBA
0 vote235 views1 answer
Vba get relative cell address
VBA
12 votes515 views1 answer
Excel vba write string to text file
VBA
0 vote236 views1 answer
Vbnet find highest value in chart
VBA
0 vote233 views1 answer
Vba add spaces
VBA
0 vote263 views1 answer
Add Formula to Shape Text in VBA
VBA
0 vote238 views2 answers
How to update date and time automatically once id is entered in excel vba
VBA
4 votes277 views1 answer
Excel vba how to get a range's full address including sheet name
VBA
0 vote270 views1 answer
Vba vbcrlf chr
VBA