formattare parte di una stringa

[papiriof]

vorrei usare la formentazione condizionale per evidenziare gli ultimi valori uguali posti dopo il valore " : "
H o queste stringhe 56:36 .... 32:21..... 12:6......39:36 ecc ebbene mi dovrebbe formattare solo la prima stringa e l'ultima perchè contengono, dopo " : " gli stessi valori ovvero 36

[Marius44]

Ciao
Premesso che è sempre meglio allegare il proprio file (senza dati sensibili)
prova con questa macro (da associare ad un pulsante Modulo (non ActiveX)

Codice: Seleziona tutto

Option Explicit

Sub Stringa()
Dim ur As Long, k As Long, i As Long
Dim text1, text2
ur = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
Range("A1:A" & ur).Font.ColorIndex = xlAutomatic
For k = 1 To ur - 1
    text1 = Split(Cells(k, 1), ":")
    For i = k + 1 To ur
      text2 = Split(Cells(i, 1), ":")
      If text1(1) = text2(1) Then
        Cells(k, 1).Font.ColorIndex = 3
        Cells(i, 1).Font.ColorIndex = 3
      End If
    Next i
Next k
End Sub


Fai sapere. Ciao,
Mario

[papiriof]

non funge perchè non sono stato piu chiaro con i dettagli-Molto semplicemente nell'intervallo I12:AG12 mi appaiono 25 stringhe come quelle qui sotto nonsempre con questi valori . Nel caso specifico 23:86 e 16:86 hanno 86 in comune dopo ":" e tutte le altre celle che in questo caso hanno 173 dopo ":". Non so potrei selezionare l'intervallo I12:AG12 quindi quale formula mettere?

58:14 11:138 23:86 16:86 57:39 51:62 4:41 16:.173 9:25 50:.173 77:39 30:41 42:70 35:.173 76:.173 72:.173 25:141 37:26 30:61 71:17 79:.173 32:26 44:3 37:12 78:60

[Marius44]

Ciao
Ho detto prima che è meglio allegare il proprio file.
Secondo: non avevi specificato che l'intervallo includeva più colonne ed io ho immaginato che i dati fossero nella colonna A
Terzo: dire "non funge" non significa nulla se non specifichi cosa fa o non fa la macro.

Ti posso assicurare che se i dati sono TUTTI nella col.A i valori che dopo il due punti hanno le stesse cifre vengono colorate in rosso.
Prova ad adattare quanto suggerito al tuo intervallo.

Ciao,
Mario

[papiriof]

OK vi mando il file e chiedo ; nell'intervallo I2:AG2 appaiono 25 stringe tipo 24:16 39:12 44:16 ecc ecc si puà fare una formattazione condizionale con una formula che mi evidenziasse quelle stringhe che dopo " : " contengono valori uguali? nell'esempio 24:16 e 44:16

http://www.filedropper.com/x2forum25_1

[Anthony47]

Quindi vuoi evidenziare le celle dove il numero dopo il "duepunti" compare piu' di una volta...
Prova applicando all'area I2:AG2 una fromattazione condizionale con questa formula:

Codice: Seleziona tutto

=SOMMA(--(SOSTITUISCI(STRINGA.ESTRAI(ANNULLA.SPAZI($I2:$AG2);3;5);":";"")=SOSTITUISCI(STRINGA.ESTRAI(ANNULLA.SPAZI(I2);3;5);":";"")))>1

Ciao

[papiriof]

Quindi vuoi evidenziare le celle dove il numero dopo il "duepunti" compare piu' di una volta...
Prova applicando all'area I2:AG2 una fromattazione condizionale con questa formula:

Codice: Seleziona tutto

=SOMMA(--(SOSTITUISCI(STRINGA.ESTRAI(ANNULLA.SPAZI($I2:$AG2);3;5);":";"")=SOSTITUISCI(STRINGA.ESTRAI(ANNULLA.SPAZI(I2);3;5);":";"")))>1

Ciao

Grazie Anthony la formattazione suggerita funziona ma non riesco a spigarmi perchè in un altro file dove stesso impianto ma con l'area da formattare non è I2:AG2 ma I12:AG12 non funziona più- naturalmente ho cambiato la formula così:

Codice: Seleziona tutto

=SOMMA(--(SOSTITUISCI(STRINGA.ESTRAI(ANNULLA.SPAZI($I12:$AG12);3;5);":";"")=SOSTITUISCI(STRINGA.ESTRAI(ANNULLA.SPAZI(I12);3;5);":";"")))>1

dove ho sbagliato??

[Anthony47]

Le stringhe xx:yy hanno una configurazione (lunghezza delle componenti, presenza di spazi) che in qualche condizione potrebbero impedire il riconoscimento dei pattern. Sarebbe stato piu' semplice se avessero avuto invece una configurazione fissa (tipo: 3 crt, "duepunti", 3 crt).
Prova questa variante di formula:

Codice: Seleziona tutto

=SOMMA(--((--SOSTITUISCI(STRINGA.ESTRAI(ANNULLA.SPAZI($I2:$AG2);3;5);":";""))=(--SOSTITUISCI(STRINGA.ESTRAI(ANNULLA.SPAZI(I2);3;5);":";""))))>1

Ciao

[papiriof]

Scusa Anthony era buona la prima evidentemente checosa succedeva ? Mettevo la formula suggeritomi con le correzioni 12 invece di 2 ma sincerandomi di aver messo l'uno prima del 2 in qualche modo sfalzavo i riferimenti e ovviamente non funzionava ancora scusa per averti fatto perdere tempo

[Anthony47]

Comunque la nuova formula e' un miglioramento della precedente, usa questa.

[papiriof]

Comunque la nuova formula e' un miglioramento della precedente, usa questa.

Vero, vero !!!!!Ancora una volta hai ragione . Il problema era ed è che la formula che necessariamente dovevo cambiare appare solo in modo parziale per cui mi muovevo con il tabulatore o le freccette e cambiavo i riferimenti
Bhe puo essere utile per raccomandare che non si fa quello che facevo