Risultati da 1 a 6 di 6

Discussione: Cancella celle con una Macro



  1. #1
    L'avatar di Giovanni Sauk
    Clicca e Apri
    Data Registrazione
    Apr 2016
    Località
    Benevento
    Messaggi
    3
    Versione Office
    2013
    Likes ricevuti
    0
    Likes dati
    0

    Cancella celle con una Macro

    Buona sera

    Sono Giovanni e lavoro molto con excel soprattutto faccio cose ripetitive che voglio standardizzare.
    Di seguito pongo un quesito che spero la sua soluzione sia di aiuto a tutti voi.

    Ogni mattina eseguo la ricerca di nuove gare d'appalto, le catalogo e le stampo trasmettendole al mio responsabile. Ho definito una scheda all'interno della quale inserisco i dati più importanti della gara in modo da far rendere un'idea della stessa e se conviene investirci tempo per lo studio.

    Ho creato una macro "Gara" che copia le righe e le incolla sotto riproducendo la scheda, ma contiene i dati della vecchia gara; ho creato una macro "Pulisci" che cancella tali dati. Il problema è che se creo una nuova scheda la macro "Pulisci" nn mi cancella i dati nella nuova scheda, ma quelli della scheda di origine. Questo perchè le celle che si devono cancellare non hanno un riferimento relativo, ma uno assoluto.

    Spero che possiate darmi una mano, nel frattempo cercherò di risolvere da me :90:.

    Giovanni

  2. #2

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7146
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1300

    Re: Cancella celle con una Macro

    Ciao,
    allega un file di esempio per capire la struttura del tuo foglio.
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  3. #3
    L'avatar di Giovanni Sauk
    Clicca e Apri
    Data Registrazione
    Apr 2016
    Località
    Benevento
    Messaggi
    3
    Versione Office
    2013
    Likes ricevuti
    0
    Likes dati
    0

    Re: Cancella celle con una Macro

    Citazione Originariamente Scritto da ges Visualizza Messaggio
    Ciao,
    allega un file di esempio per capire la struttura del tuo foglio.

    Ecco il file studio su cui sto studiando
    File Allegati File Allegati

  4. #4
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3340
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49

    Re: Cancella celle con una Macro

    Citazione Originariamente Scritto da Giovanni Sauk Visualizza Messaggio
    Ecco il file studio su cui sto studiando
    Ciao Giovanni,
    - ho apportato alcune modifiche al tuo file (ho eliminato l'unione delle celle perchè vanno in contrasto col VBA)
    - ho protetto il foglio di lavoro (senza password) lasciando sbloccate le celle che poi dovranno essere cancellate
    - sulla base di quanto sopra, ho rifatto la tua macro (pulisci)
    Il tutto dovrebbe essere OK. Fammi sapere se ti va bene.
    File Allegati File Allegati

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  5. #5

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7146
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1300

    Re: Cancella celle con una Macro

    Ciao a tutti,
    un'alternativa al codice di Balon che saluto, lasciando le celle unite.

    Codice: 
    Sub NuovoGruppo()
        ActiveSheet.Unprotect
        uRiga = Range("E" & Rows.Count).End(xlUp).Row + 2
        Range(Cells(2, 3), Cells(5, 7)).Copy Destination:=Cells(uRiga, 3)
        ActiveSheet.Protect
    End Sub
    Codice: 
    Sub NuovoProgetto()
        ActiveSheet.Unprotect
        Range("C6:G100") = ""
        Range("C6:G100").Interior.ColorIndex = xlNone
        Range("C6:G100").Borders.LineStyle = xlNone
        Range("C6:G100").UnMerge
        ActiveSheet.Protect
    End Sub
    Codice: 
    Sub Pulisci()
    Dim wks As Worksheet
    Dim lRisposta As Long
    lRisposta = MsgBox("Eliminare i dati dalle celle non protette?", _
    vbYesNo + vbQuestion, "Attenzione!")
    If lRisposta = vbYes Then
        Application.DisplayAlerts = False
        For Each wks In ThisWorkbook.Worksheets
            Select Case wks.Name
            Case Is = "Data", "Oggetto", "Luogo"
            Case Else
                On Error Resume Next
                wks.UsedRange.Value = ""
            End Select
        Next
        MsgBox "Operazione completata"
        Application.DisplayAlerts = True
    End If
    Set wks = Nothing
    End Sub
    Codice: 
    Sub NuovaScheda()
        ActiveSheet.Unprotect
        uRiga = Range("E" & Rows.Count).End(xlUp).Row + 1
        Range(Cells(2, 3), Cells(5, 7)).Copy Destination:=Cells(uRiga, 3)
        ActiveSheet.Protect
    End Sub
    File Allegati File Allegati
    Ultima modifica fatta da:ges; 05/04/16 alle 00:03
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  6. #6
    L'avatar di Giovanni Sauk
    Clicca e Apri
    Data Registrazione
    Apr 2016
    Località
    Benevento
    Messaggi
    3
    Versione Office
    2013
    Likes ricevuti
    0
    Likes dati
    0

    Re: Cancella celle con una Macro

    OK Ragazzi, adesso ho purtroppo un paio di scadenze ma liberato è la prima cosa che vedrò.
    Vi chiedo una cosa, vorrei evitare di studiare il VBA con applicazioni dirette, quindi smanettando, visitando altri forum, ricerche in rete.... adesso ho voi e sono contento; ma devo crescere autonomamente per non apòpoggiarmi troppo a voi; vi chiedo dunque se potete consigliarmi un libro di testo per imparare il VBA.
    Vorrei partire con almeno delle nozioni base su come ragiona e quali funzioni e comandi abbia, poi in seguito vedrò di scendere più nel profondo e affinarmi.
    Ho grande speranza in Voi e in Excel. Un abbraccio anticipato.
    Grazie a tutti :286:

Discussioni Simili

  1. [Risolto] Pulsante macro "cancella" che imposti il menù a tendina (convalida) a un valore default
    Di vittorio99 nel forum Domande su Excel VBA e MACRO
    Risposte: 8
    Ultimo Messaggio: 31/01/17, 17:04
  2. Macro cancella
    Di Ciro72 nel forum Domande su Excel VBA e MACRO
    Risposte: 28
    Ultimo Messaggio: 03/09/16, 21:40
  3. Macro cancella
    Di Ciro72 nel forum Domande su Excel VBA e MACRO
    Risposte: 14
    Ultimo Messaggio: 30/08/16, 16:21
  4. Pulsante Macro Cancella ed esportazione in XML
    Di James nel forum Domande su Excel VBA e MACRO
    Risposte: 8
    Ultimo Messaggio: 03/03/16, 11:08
  5. Creare un pulsante che cancella il contenuto di più celle
    Di Tony70 nel forum Domande su Excel VBA e MACRO
    Risposte: 2
    Ultimo Messaggio: 01/02/16, 20:56

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
  •