[EXCEL 2007] vorrei eliminare delle righe contenenti particolari valori

[freetom]

Ad esempio vorrei eliminare tutte le righe comprendenti una cella con il valore MI

Grazie

[luck]

fai con una macro:

Sub eliminaMI()

For Each cella In Selection.Cells
    If InStr(1, cella.Value, "mi") <> 0 Then
        'elimina riga
        cella.EntireRow.Delete
        
    End If
Next


End Sub

...selezione il range da analizzare, poi avvi la macro
dovrebbe fungere.

[freetom]

con excel 2007 non mi funge

CORREGGOOOOO funzia!

Era solo case sensitive! E quindi è bastato mettere il valore della cella ricercata in maiuscolo!

Grazie!

[luck]

io l'ho scritto con il 2003, ma non dovrebbe essere un problema di versione

che errore ti dà?

[freetom]

Se volessi cancellare in contemporanea anche le le righe contenti "CA" , "GE" ecc...

come lo debbo modificare?

Ho provato così.. ma non funzia..

Sub eliminaMI()

For Each cella In Selection.Cells
If InStr(1, cella.Value, "MI,CA,GE") <> 0 Then
'elimina riga
cella.EntireRow.Delete

End If
Next


End Sub

GRAZIE!

[luck]

cambiamo un attimino la macro:

Sub eliminaMI()

Sigle = "MI,CA,GE"
splittate = Split(Sigle, ",")

For t = LBound(splittate) To UBound(splittate)
    For Each cella In Selection.Cells
        If InStr(1, cella.Value, splittate(t)) <> 0 Then
            'elimina riga
            cella.EntireRow.Delete
        End If
    Next
Next t

End Sub

devi modificare la stringa "sigle" con i valori che ti servono, separati da virgole e SENZA spazi, ok?
occhio che è case sensitive

ciao ciao

[freetom]

Quando individuo una forte ambata entro 6 colpi su RUOTA se vuoi te la dico!

Grazie ancora

[luck]

uahhhhhhhhhhh, ecco...
pensavo fossero i conteggi dell'ANAS

mi raccomando, ricordati del tuo amico luck
ciao Merlino