Catturare il percorso del file attivo in VBA di Excel

Per memorizzare il percorso del file attivo in Excel, usare il seguente codice:

Sub CaturaPercorsoAttivo()
Dim percorso As String
percorso = Application.ActiveWorkbook.Path & "\"
End Sub


Per memorizzare il percorso del file dove è presente lo stesso modulo, usare il seguente codice:

Sub CaturaPercorsoPresente()
Dim percorso As String
percorso = Application.ThisWorkbook.Path & "\"
End Sub