aetio ha scritto:Ciao,
sto studiando queste macro, però non ho capito che coordinate dai all'istruzione
If (Left(SHp.Name, 3) = "But") Then
Porta pazienza con questo povero ignorante.... :))
Grazie, buona giornata
eZio
Nota:
per crearli (Excel 2007), dal menù della barra: Inserisci > Illustrazioni > Forme > Forme
salve
ogni forma inserita nel foglio assume un suo nome particolare.
Se vuoi cancellare solo alcune forme e non tutte, bisogna che ne conosci il nome
nella riga che menzioni, vengono cancellatte tutte le forme il cui nome nei primi 3 carateri a sinistra iniziano con
"But" che starebbe per Button(pulsante)
se non ti interessa avere nessuna forma sul foglio, quindi tutte da eliminare, basta scrivere queste istruzioni:
Sub CancShps()
Dim SHp As Excel.Shape
For Each SHp In ActiveSheet.Shapes
SHp.Delete
Next
End Sub
saluti
Giap