You are here:Home-Domande su Excel VBA e MACRO-[RISOLTO] elimina righe-Rispondi a: [RISOLTO] elimina righe
Rispondi a: [RISOLTO] elimina righe2019-01-27T08:50:33+01:00

Home Forum Domande su Excel VBA e MACRO [RISOLTO] elimina righe Rispondi a: [RISOLTO] elimina righe

BySalvBySalv
Amministratore del forum
    Post totali: 692

    Ciao Giorgioantonio, eccoti la macro per eliminare la riga incriminata

    Sub DelRiga()
    Dim r, x
    
    r = Cells(Rows.Count, 2).End(xlUp).Row
    For x = r To 3 Step -1
        If Cells(x, 3) = 1 Then Range("A" & x & ":AR" & x).Delete Shift:=xlUp
    Next x
    End Sub

    Ciao By Sal :bye:

    Ciao By Sal (8-)
    se ti piace la soluzione aiuta a sostenere il Forum con una DONAZIONE a piacere, Grazie