AIUTOOOOOOO..... devo convertire una serie di date memorizzate come testo in formato data. Il formato (ad esempio) è il seguente: 10 Dec vorrei che fosse trasformato in una data tipo 10/12/2014
Spero che qualcuno possa darmi una mano,
Grazie
Moderatori: Anthony47, Flash30005
Soluzione a quanto richiesto : "10 Dec vorrei che fosse trasformato in una data tipo 10/12/2014"
Ipotizzando che "10 dic" sia in A1, scrivi in B1 =testo(A1;"gg/mm/aaaa")
Così trasformi 10 dic in 10/12/2014
Sub TrasfTxtData()
UR = Range("A" & Rows.Count).End(xlUp).Row
Columns("B:B").ClearContents
For RR = 1 To UR
TD = UCase(Right(Range("A" & RR).Value, 3))
MGG = Trim(Left(Range("A" & RR).Value, 2))
MAA = "2014"
Select Case TD
Case "GEN"
MMese = "01"
Case "FEB"
MMese = "02"
Case "MAR"
MMese = "03"
Case "APR"
MMese = "04"
Case "MAG"
MMese = "05"
Case "GIU"
MMese = "06"
Case "LUG"
MMese = "07"
Case "AGO"
MMese = "08"
Case "SET"
MMese = "09"
Case "OTT"
MMese = "10"
Case "NOV"
MMese = "11"
Case "DIC"
MMese = "12"
End Select
Range("B" & RR).Value = CDate(MGG & "/" & MMese & "/" & MAA)
Range("B" & RR).NumberFormat = "dd/mm/yyyy"
Next RR
End Sub
in relazione al quesitoe' irrisolvibile, perche' non e' sufficientemente dettagliato
Torna a Applicazioni Office Windows
formula excel non visualizza risultato Autore: tommasog |
Forum: Applicazioni Office Windows Risposte: 6 |
Inserimento valore di una cella in testo di altra cella Autore: Ricky0185 |
Forum: Applicazioni Office Windows Risposte: 7 |
Excel 2016 - Funzione SCARTO + INDIRETTO Autore: pl1957 |
Forum: Applicazioni Office Windows Risposte: 2 |
Excel Estrazione casuale testo da colonna per bingo ca**ate Autore: Dylan666 |
Forum: Applicazioni Office Windows Risposte: 7 |
Visitano il forum: Nessuno e 31 ospiti