Forum di Excel e VBA, per condividere esperienze e risolvere problemi su: Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.
Caselle di testo di Miki (utente non iscritto) data: 09/01/2009
Salve, per qualche motivo che non mi so spiegare si sono create in un
foglio excel più di 20000 caselle di testo che appesantiscono in modo
esagerato il file: per favore sapete indicarmi come poterle cancellare
(sintassi per una macro o qualsiasi altro modo che non sia la
selezione di una ad una...)
di Ricky53 data: 11/01/2009
Ciao,
benvenuto nel forum.
20.000 è un numero per dire tante oppure è rispondente alla realtà?
tu vuoi cancellare solo le "textbox"?
per farlo utilizza questa macro.
nel caso volessi cancellare tutte le "shapes" presenti nel foglio togli l'"if" e lascia solo l'istruzione "sh.delete"
ciao da ricky53
Sub Cancella_TextBox()
Dim Sh As Object
Foglio1.Select
For Each Sh In ActiveSheet.Shapes
If Mid(Sh.Name, 1, 7) = "TextBox" Then
Sh.Delete
End If
Next
End Sub
di Miki (utente non iscritto) data: 11/01/2009
20000 corrisponde alla realtà ,centinaio più, centinaio meno... (il file è di una mia collega e non ho idea di cosa abbia fatto).
grazie 1000!