MsgBox ActiveWorkbook.Path & "\" & ActiveWorkbook.Name & "   " & ActiveSheet.Name

A fórummotor megint elsumákolta a \ jelet. :(