Segnala

Excel eliminare dati tramite macro

Fai una domanda ItaVitaEst 1Posti martedì 14 febbraio 2017Data di registrazione giovedì 16 febbraio 2017 Ultimo intervento - Ultima risposta 16 feb 2017 alle 12:09 da n00r
Buongiorno,
ho la necessità tramite un pulsante di eliminare alcuni dati in fogli di excel differenti. La macro che sto utilizzando esegue in parte ciò che vorrei.
Provo a spiegarmi: nel primo foglio ho inserito un pulsante tramite il quale vado ad eliminare alcuni dati nei fogli 2,3,4 il problema è che i dati non vengono eliminati mentre, se il pulsante lo inserisco nei rispettivi fogli i dati vengono eliminati.

A questo punto credo che il problema sia nella struttura della macro, ma non so dove!

Uso excel 2011 per Mac

Di seguito la macro che sto utilizzando:

Sub DeselezionaCheck_e_Cancella()
Dim objCheckBox As Variant
Dim Sh As Worksheet

azione = MsgBox("Vuoi davvero cancellare i dati?", vbYesNo, "ATTENZIONE!")
If azione = vbNo Then GoTo finesub
finesub:

Set Sh = ActiveSheet
For Each objCheckBox In Sh.Shapes
If objCheckBox.Type = msoFormControl And Left(objCheckBox.Name, 9) = "Check Box" Then
objCheckBox.ControlFormat.Value = False
End If
Next
Worksheets("Foglio2").Range("S10,S11,Q18,Q23,F20,Q22,H25,G30,O34").ClearContents
End Sub
Utile
+0
plus moins
ciao,

nel tuo codice manca un loop per entrare in tutti i fogli e eseguire il comando clear

una cosa simile a:
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
' comando da eseguire per eliminare dati
Next ws


Dai la tua opinione

Un utente registrato ottiene più risposte rispetto ad uno anonimo.

Un utente registrato ha un seguito (follow-up) dettagliato di tutte le sue domande.

Un utente registrato ha accesso a delle opzioni aggiuntive.

Non sei ancora un membro?

Registrati, richiede meno di un minuto ed è gratis!