Pagina 1 di 2 12 UltimaUltima
Risultati da 1 a 30 di 31

Discussione: Macro per cancellare check box su più righr



  1. #1
    L'avatar di max72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Parigi
    Età
    45
    Messaggi
    74
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    0

    Macro per cancellare check box su più righr

    Buongiorno a tutti, tempo fa con il vostro aiuto abbiamo creato un codice che creava automaticamente una check box in una determinata cella. Ora, vorrei ripulire il foglio eliminando tutte le righe per ricominciare con l'anno nuovo ma, le check box non si eliminano ma si raggruppano nella prima cella vuota sottostante la righa rimanente. qualche soluzione?
    Allego il file di esempio

    Grazie.
    File Allegati File Allegati

  2. #2

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Ciao Max

    Prova con questa macro

    Codice: 
    Sub cancella()
    Dim myOle as OleObjects
    For Each myOle in ActiveSheet.OleObjects
         myOle.Delete
    Next myOle
    End Sub
    che cancella tutti gli oggetti sul foglio.

    Se vu sono altri controlli oltre alle check box occorre inserire un If
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  3. #3
    L'avatar di max72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Parigi
    Età
    45
    Messaggi
    74
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    0

    Re: Macro per cancellare check box su più righr

    Ciao Alfrimpa, non succede nulla.

  4. #4

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Prova con questa

    Codice: 
     DeleteCheckbox()
        Dim cb As CheckBox
    
        ForEach cb In ActiveSheet.CheckBoxes
            cb.Delete
        Next
    End Sub
    Purtroppo sono fuori e non ho il pc e vado a memoria.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  5. #5
    L'avatar di max72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Parigi
    Età
    45
    Messaggi
    74
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    0

    Re: Macro per cancellare check box su più righr

    Grazie, gentilissimo/a.

  6. #6

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Masculo sono

    Grazie del riscontro.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  7. #7
    L'avatar di GiuseppeMN
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Mantova
    Messaggi
    864
    Versione Office
    2000 - 2013
    Likes ricevuti
    285
    Likes dati
    160

    Re: Macro per cancellare check box su più righr

    Buona giornata, Alfredo.

    Personalmente, con Excel 2013, utilizzavo una procedura analoga, ma diversa:
    Codice: 
    Option Explicit
    
    Sub Cancella_tutti_gli_Oggetti()
    Dim myOle
        For Each myOle In ActiveSheet.OLEObjects
             myOle.Delete
        Next myOle
    End Sub
    , come vedi la definizione della Variabile è diversa.

    Molto probabilmente:
    Dim myOle As OLEObjects
    è compatibile con Excel 2007, che non conosco, ma in Excel 2013 questa definizione genera l'Errore:
    - Tipo non corrispondente
    alla Riga:
    - For Each myOle In ActiveSheet.OLEObjects



    A disposizione.

    Buon fine settimana.

    Giuseppe

    Edit: Alfredo, leggo solo ora la Tua Risposta #4; scusami della sovrapposizione.
    Windows XP Excel 2000 - Windows 10 Excel 2013

  8. #8
    L'avatar di max72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Parigi
    Età
    45
    Messaggi
    74
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    0

    Re: Macro per cancellare check box su più righr

    questa va bene ma se devo cancellarle tutte eccetto quella che si trova in BP2?

  9. #9

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Aggiungi dopo il For

    Codice: 
    If cb.Name <> "Nome del chbx in BP2"
      cb.Delete
    End If
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  10. #10

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Giuseppe ma ci mancherebbe.

    A presto
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  11. #11
    L'avatar di max72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Parigi
    Età
    45
    Messaggi
    74
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    0

    Re: Macro per cancellare check box su più righr

    No ragazzi, non va bene, mi si cancella anche il bottone " Torna a START"
    Ricapitolando, la macro mi deve cancellare tutte le righe comprese le check box( senza cancellare ne il bottone ne la tabella pivot ) eccetto la riga 2.
    Ho notato che se faccio la cancellazione manuale delle righe, quando mi si crea in automatico la riga successiva, non si effettua la numerazione automatica nella colonna A.


    Aiutooooo!!!!

  12. #12

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Ciao Max

    Finalmente sono riuscito ad aprire il tuo file (quello allegato al tuo primo post) ma non vedo nessuna checkbox.

    Puoi spiegare meglio?
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  13. #13

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Ciao Max

    Ti allego un file di esempio dove la seguente macro cancella tutte le checkbox ad eccezione di quella messa nella cella J2

    Codice: 
    Sub CancellaCheck()
        Dim myCheck As OLEObject
        Dim osh As Worksheet
        Set osh = ThisWorkbook.Worksheets(1)
        For Each myCheck In osh.OLEObjects
            If TypeName(myCheck.Object) = "CheckBox" And myCheck.Name <> "CheckBox5" Then
                myCheck.Delete
            End If
        Next
    End Sub
    File Allegati File Allegati
    • Tipo File: xlsm max.xlsm (28.6 KB, 11 Visualizzazioni)
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  14. I seguenti utenti hanno dato un "Like"


  15. #14
    L'avatar di max72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Parigi
    Età
    45
    Messaggi
    74
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    0

    Re: Macro per cancellare check box su più righr

    Ciao Alfrimpa, non capisco perché nel file che ti ho inviato la tua macro funziona, mentre sul mio non funziona.
    Perché? il mio file é solo più completo per quanto riguarda i dati immessi ma per il resto é uguale.

  16. #15
    L'avatar di max72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Parigi
    Età
    45
    Messaggi
    74
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    0

    Re: Macro per cancellare check box su più righr


  17. #16

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Max non riesco a scaricare il tuo file.

    Non puoi allegarlo direttamente sul forum o, se è di dimensioni oltre il consentito, farlo con Filedropper o Dropbox?

    Ma anche qui non vedo checkbox

    ma nel primo file che hai allegato dove sono?
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  18. #17

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Sono riuscito a scaricare il tuo file ma dove sono le checkbox?

    E' una caccia al tesoro?
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  19. #18

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Ho scoperto tutti i fogli della cartella ma di checkbox neanche l'ombra.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  20. #19
    L'avatar di max72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Parigi
    Età
    45
    Messaggi
    74
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    0

    Re: Macro per cancellare check box su più righr

    in BP nella cartella Fatture non si vedono?

  21. #20
    L'avatar di max72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Parigi
    Età
    45
    Messaggi
    74
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    0

    Re: Macro per cancellare check box su più righr

    ho fatto una prova a visualizzare il file che vi ho inviato ma anche a me non si visualizzano . in onedrive online dice che il file deve essere scaricato ed aperto in excel per visualizzare tutto il contenuto.

  22. #21

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    E quindi........?
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  23. #22
    L'avatar di max72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Parigi
    Età
    45
    Messaggi
    74
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    0

    Re: Macro per cancellare check box su più righr

    Bo......che fare? qualche idea?

  24. #23

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Ho nuovamente riaperto il tuo file e sul foglio "Fatture" in colonna BP (Con iva) non c'è nessuna checkbox.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  25. #24

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Ora ho finalmente scoperto che nel file che hai allegato al primo post c'è un unica checkbox in BP2 però è un controllo modulo e non un ActiveX per cui, forse, la mia macro non va bene.

    Devo far delle prove.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  26. #25

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Prova con questa macro su un file di prova dove inserisci varie checkbox controllo modulo

    Codice: 
    Sub Macro1()
    Dim sh As Shape
        For Each sh In ActiveSheet.Shapes
            sh.Delete
        Next sh
    End Sub
    Poi vedremo di affinare la cosa.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  27. #26

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Provata la macro sul tuo primo file ed ha cancellato l'unica checkbox presente; se ve ne fossero state di più le avrebbe cancellate tutte.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  28. #27
    L'avatar di max72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Parigi
    Età
    45
    Messaggi
    74
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    0

    Re: Macro per cancellare check box su più righr

    Infatti ho fatto cosi, ti ringrazio comunque.

  29. #28

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Cioè hai utilizzato l'ultima macro?
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

  30. #29
    L'avatar di max72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Parigi
    Età
    45
    Messaggi
    74
    Versione Office
    2007
    Likes ricevuti
    0
    Likes dati
    0

    Re: Macro per cancellare check box su più righr

    Si, naturalmente non é completa perché mi elimina tutte le check box, mentre a me serve una macro che cancelli tutte le righe dalla A3 (inclusa) in poi, comprese le relative check box poste nella colonna BP.

  31. #30

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6802
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165

    Re: Macro per cancellare check box su più righr

    Le checkbox (così come gli altri controlli) sono avulsi dal foglio per cui se in riga 10 hai una chkbox in colonna C ed elimini la riga 10 la chkbox rimane.

    Per cancellarle bisogna sempre fare riferimento alle stesse chkbox.

    Se ho tempo cerco di fare qualche prova.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"

    "Solo due cose sono infinite: l'universo e la stupidità umana; riguardo l'universo ho ancora dei dubbi" (Albert Einstein)

Discussioni Simili

  1. Cancellare files excel vuoti presenti in una cartella tramite macro
    Di gigio nel forum Domande su Excel VBA e MACRO
    Risposte: 11
    Ultimo Messaggio: 24/09/16, 14:25
  2. macro per cancellare cella con determinato dato
    Di dorico75 nel forum Domande su Excel VBA e MACRO
    Risposte: 4
    Ultimo Messaggio: 13/04/16, 18:57
  3. Check box
    Di Fabrizio.gaglio nel forum Domande su Excel in generale
    Risposte: 9
    Ultimo Messaggio: 18/01/16, 17:46
  4. check box automatiche
    Di max72 nel forum Domande su Excel in generale
    Risposte: 15
    Ultimo Messaggio: 28/12/15, 20:20
  5. Pulsante Macro per cancellare tutti i dati che ci sono in 31 Fogli
    Di Gerardo Zuccalà nel forum Domande su Excel VBA e MACRO
    Risposte: 24
    Ultimo Messaggio: 19/09/15, 17:35

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •