Creare una macro e inserire questo codice:
Dim FileDaLeggere As String
Dim riga As String
FileDaLeggere = “C:\temp\ciao.csv”
On Error Resume Next
Range(“A1”).Activate
row_number = 0
Open FileDaLeggere For Input As #1
Do Until EOF(1)
Line Input #1, riga
campi = Split(riga, “,”)
ActiveCell.Offset(row_number, 0).Value = Replace(campi(0), Chr(34), “”)
ActiveCell.Offset(row_number, 1).Value = Replace(campi(1), Chr(34), “”)
ActiveCell.Offset(row_number, 2).Value = Replace(campi(2), Chr(34), “”)
row_number = row_number + 1
Loop
Close #1
Sostituire FileDaLeggere con il file effettivo e campi(0) , campi(1) etc con il numero della colonna interessata.
