sistemare numero a 2 cifre

[raimea]

ciao
in un foglio col F (posizione)
ho delle sigle in numeri
che devo mettere in ordine crescente
dal primo numero e poi dal numero dopo il segno -

attualmente l'ordinamento non riesco a farlo correttamente
perche il numero dopo il trattino -
e' formato da un solo numero se inferiore a 10

avrei bisogno di anteporre lo zero 0 ai numeri dopo il trattino
se inferiori a 10

ES: 1-3 >> 1-03 2-2>>2-02

cosicche' successivamente potro' ordinare
tutto il foglio in relazione ai numeri di col F

vi allego il file
https://www.dropbox.com/scl/fi/vfud4vksbbi2v8ctplsn5/correggi_numeri_F.xlsm?rlkey=vri9y0xf4ubkmsxcq8553kzjd&st=xse8o0kr&dl=0

grazie
ciao

[Marius44]

Ciao
Se non vado errato, i numeri scritti in quel modo Excel li assume come date (1° marzo, 2 febbraio, ecc) quindi avrai la necessità di impostare la colonna come "testo" (anche se Excel - in caso di calcoli - li considera numeri). A questo punto puoi inserire come vuoi lo 0 prima della seconda cifra, manualmente uno dopo l'altro ovvero con VBA.

Spero di non aver detto cavolate.
Ciao,
Mario

[Anthony47]

Come dice Mario il rischio e' che quelle celle contengano date, anche se nel file pubblicato questo non succede.
Con questa spada di Damocle sulla testa, la seguente macro potrebbe "aggiustare" il contenuto di colonna F e convertire tutto in doppia cifra, tipo 1-1 --> 01-01, o 1-10 --> 01-10

Codice: Seleziona tutto

Sub SetF()
Dim I As Long, mySplit, ccVal As String, LastF As Long
'
LastF = Cells(Rows.Count, "F").End(xlUp).Row
Range("F:F").NumberFormat = "@"
For I = 2 To LastF
    ccVal = Cells(I, 6).Text
    If InStr(1, ccVal, "-", vbTextCompare) > 0 Then
        mySplit = Split(ccVal & " - ", "-", , vbTextCompare)
        If UBound(mySplit) > 1 Then
            Cells(I, 6).Value = "'" & Format(mySplit(0), "00") & "-" & Format(mySplit(1), "00")
        End If
    End If
Next I
End Sub


Prova, ma sarebbe meglio spostare l'operazione alla fase che quel contenuto lo genera...

[raimea]

ciao
tutto ok

in colonna F non ci sono mai date
la macro e' ok

x Mario : grazie x l'interessamento
ma non posso farlo manualmente
perche' il file reale contiene moltissime righe

grazie ad entrambi

ciao