eliminare righe o intervallo



  • eliminare righe o intervallo
    di mb data: 22/10/2015 12:31:14

    Buon giorno

    prendendo spunto da una discussione precedente, come si potrebbe tradurre in linguaggio vba le 2 macro sotto riportate ??

    nel primo caso l'intenzione è selezionare più righe consecutive e poi cancellarle

    nel secondo selezionare intervalli di righe e poi cancellarle

    Grazie


     
    Sub Macro1()
    '
    ' Macro1 Macro
    '
    
    '
        Rows("2:5").Select
        Selection.Delete Shift:=xlUp
        Range("A1").Select
    End Sub
    Sub Macro2()
    '
    ' Macro2 Macro
    '
    
    '
        Range("4:4,7:7,10:10").Select
        Range("A10").Activate
        Selection.Delete Shift:=xlUp
        Range("A1").Select
    End Sub



  • di patel data: 22/10/2015 12:36:44

    non mi è chiaro il tuo obiettivo, secondo me la prima funziona, nella la seconda devi togliere
    Range("A10").Activate





  • di mb data: 22/10/2015 12:48:46

    Ciao Patel

    hai ragione la riga A10 non centra nulla è solo che avevo il cursore in quella cella mentre registravo....

    poi sono d'accordo che le 2 macro possano funzionare, ma il mio desiderio era di renderle più "dinamiche" queste sono troppo statiche

    Per un utente evoluto non faccio neppure la macro:
    evidenzio le righe - tasto destro del mouse - elimina risolto primo problema

    evidenzio prima riga - premo tasto ctrl evidenzio 10 riga- tasto destro mouse elimina risolto anche il secondo caso

    Per utenti meno evoluti volevo capire se possibile con vba evidenzio :

    più righe a scelta e lancio macro1 naturalmente modificata

    seleziono intervallo di righe macro2 naturalmente modificata

    ??? come le modifico ??

    Grazie



  • di patel data: 22/10/2015 16:03:01

    è ancora più semplice, selezioni le righe e
     
    Sub Macro1()
        Selection.Delete Shift:=xlUp
        Range("A1").Select
    End Sub






  • di mb data: 22/10/2015 16:15:14

    Grazie patel

    .... sempre più difficile......

    selezionare le righe e senza inserire nessun bottone si può far seguire la selezione ad un effetto tipo doppio click e le righe selezionate vengono cancellate..

    Scusami se chiedo ma provo... un mio amico informatico mi direbbe che la sera al posto di vedere troppi film di fantascienza dovrei andare a dormire..

    un altro vorrebbe l'abolizione del mouse




  • di alfrimpa data: 22/10/2015 16:27:55

    No mb perché dopo che hai selezionato le righe se fai doppio clic sul foglio le righe selezionate in precedenza si deselezionano e quindi non ci sarà più nessuna "Selection".

    Alfredo





  • di mb data: 22/10/2015 16:45:11

    Grazie Alfredo

    avevano ragione:
    il mio amico basta fantascienza

    e il nostro amico ( presidente del C.A.M: Comitato Abolizione del Mouse)

    buona serata a tutti