Risultati da 1 a 5 di 5

Discussione: conferma cancellazione



  1. #1
    L'avatar di D@nilo
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Roma
    Età
    45
    Messaggi
    1170
    Versione Office
    Excel 2010
    Likes ricevuti
    509
    Likes dati
    571

    conferma cancellazione

    Buongiorno a tutti nel file che allego (esempio)...c'è una macro per cancellare i dati vorrei inserirci il messaggio di conferma cancellazione quando spingo il pulsante con l'opzione si /no per evitare di cancellare inavvertitamente i dati inseriti .....(la password del foglio è 123) grazie Danilo
    File Allegati File Allegati

  2. #2
    L'avatar di D@nilo
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Roma
    Età
    45
    Messaggi
    1170
    Versione Office
    Excel 2010
    Likes ricevuti
    509
    Likes dati
    571

    Re: conferma cancellazione

    in rete ho trovato il modo di avere il messaggio ma appena spingo il pulsante di cancellazione appare il messaggio con le due opzioni si/no però cancella tutto ugualmente dove devo intervenire? allego file....
    File Allegati File Allegati

  3. #3
    L'avatar di TuttoExcel
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Milano
    Età
    43
    Messaggi
    82
    Versione Office
    Excel 2013
    Likes ricevuti
    19
    Likes dati
    3

    Re: conferma cancellazione

    Ciao Danilo,
    semplicemente devi mettere il messaggio di richiesta prima di cancellare i dati, mentre tu lo hai messo dopo :227:

    quindi devi cambiare da

    Codice: 
    ActiveSheet.Unprotect "123"
    
    
    
    
        Range("E5:J12").Select
        Selection.ClearContents
        ActiveSheet.Protect "123"
    If MsgBox("Sei sicuro di cancellare i dati?", vbQuestion + vbYesNo, "Attenzione...") = vbNo Then Exit Sub
    a

    Codice: 
    ActiveSheet.Unprotect "123"
    If MsgBox("Sei sicuro di cancellare i dati?", vbQuestion + vbYesNo, "Attenzione...") = vbNo Then Exit Sub
    
    
        Range("E5:J12").Select
        Selection.ClearContents
        ActiveSheet.Protect "123"
    e funzionerà tutto :-)

    a presto

    Gianfranco
    Condividi la tua conoscenza. E’ un modo per raggiungere l’immortalità. (Dalai Lama)
    Amministratore di www.tuttoexcel.it

  4. I seguenti utenti hanno dato un "Like"


  5. #4
    L'avatar di patel
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Livorno
    Età
    72
    Messaggi
    1106
    Versione Office
    2010
    Likes ricevuti
    143
    Likes dati
    1

    Re: conferma cancellazione

    Codice: 
    Sub cancella()
    '
    ' cancella Macro
    ActiveSheet.Unprotect "123"
    Range("E5:J12").Select
    If MsgBox("Sei sicuro di cancellare i dati?", vbQuestion + vbYesNo, "Attenzione...") = vbYes Then     Selection.ClearContents
    ActiveSheet.Protect "123"
    End Sub

  6. I seguenti utenti hanno dato un "Like"


  7. #5
    L'avatar di D@nilo
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Roma
    Età
    45
    Messaggi
    1170
    Versione Office
    Excel 2010
    Likes ricevuti
    509
    Likes dati
    571

    Re: conferma cancellazione

    Grazie.....testato e funzionante....sempre superveloci......Danilo

Discussioni Simili

  1. [Risolto] Impedire cancellazione riga
    Di G.Bove nel forum Domande su Excel VBA e MACRO
    Risposte: 8
    Ultimo Messaggio: 05/02/17, 08:59
  2. [Risolto] Cancellazione dati condizionale
    Di mrgiaco nel forum Domande su Excel VBA e MACRO
    Risposte: 11
    Ultimo Messaggio: 04/02/17, 21:14
  3. Risposte: 4
    Ultimo Messaggio: 10/08/16, 00:58
  4. Modifica dati e cancellazione righe
    Di nick0573 nel forum Domande su Excel VBA e MACRO
    Risposte: 42
    Ultimo Messaggio: 01/04/16, 23:58
  5. Messaggi privati - Cancellazione
    Di Marius44 nel forum Problemi, suggerimenti e Novità del forum
    Risposte: 4
    Ultimo Messaggio: 16/02/16, 18:07

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
  •