Excel VBA Obtenha a pasta de trabalho Nome completo do arquivo com caminho

MsgBox ThisWorkbook.FullName
Excel Hero