Caselle di testo



  • 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!

    ciao da miki