EXCEL Importare dati da file CVS

[ricky53]

Ciao,

magari può essere utile:

Codice: Seleziona tutto

    Nome_File_in_Uso = ActiveWorkbook.Name

Ciao da Ricky53

[Francesco53]

Grazie Ricky, ho una difficoltà quando trasferisco il tuto sulla macro mi si blocca.
Ti posto come faccio, vista la mia poca esperienza ciò che pensavo fosse semplice
forse non lo è:

Codice: Seleziona tutto

Sub CopiaDati()

Perc = ActiveWorkbook.Path
   
With ActiveSheet.QueryTables.Add(Connection:="TEXT;" & Perc & "archivio.csv", _
         Destination:=Range("C2:AZ1000"))
        .Name = "archivio"

Mi dici dove sbaglio'
Grazie
Francesco

[ricky53]

Ciao,
innanzi tutto manca "\" tra il percorso ed il nome del file

Codice: Seleziona tutto

With ActiveSheet.QueryTables.Add(Connection:="TEXT;" & Perc & "\" & "archivio.csv", _
         Destination:=Range("C2:AZ1000"))
        .Name = "archivio"

... la macro si blocca ...

Che significa?
Se ottieni un errore che codice ha?

Ciao da Ricky53

[Francesco53]

Grazie Ricky, era proprio "\" che mancava.
Francesco