vorrei riportarla in questo modo
29/06/2023 20:30
con il VBA con questa macro
riesco a trasformare la data come desidero, però vorrei farlo fare in Power Query, in modo da non lanciare la macro dopo l'importazione dati.Sub Data()
Dim r, c, x, d, k, k1
For x = 2 To Cells(Rows.Count, 1).End(xlUp).Row
d = Split(Cells(x, 1), " ")
Select Case d(2)
Case "Gennaio": k1 = 1
Case "Febbraio": k1 = 2
Case "Marzo": k1 = 3
Case "Aprile": k1 = 4
Case "Maggio": k1 = 5
Case "Giugno": k1 = 6
Case "Luglio": k1 = 7
Case "Agosto": k1 = 8
Case "Settembre": k1 = 9
Case "Ottobre": k1 = 10
Case "Novembre": k1 = 11
Case "Dicembre": k1 = 12
End Select
k = d(1) & "/" & k1 & "/" & d(3) & " " & d(6)
Cells(x, 1) = CDate(Format(k, "dd/mm/yyyy hh:mm"))
Next x
End Sub
ma non riesco a capire come fare.
allego anche il file
un Saluto By Sal