Come rimuovere una casella di testo vuota in VBA

Rimozione caselle di testo vuoto in Microsoft Excel utilizzando Visual Basic, Applications Edition (VBA) non è così complicato come si potrebbe pensare . In VBA , è possibile utilizzare il nome del foglio di lavoro e il nome della casella di testo per accedere al suo valore . Utilizzare l'oggetto " OLEObject " per rimuovere un oggetto, ad esempio una casella di testo da un foglio di lavoro . Questo oggetto rappresenta un controllo ActiveX in un foglio di lavoro , che contiene la proprietà "Elimina" che può essere usato per rimuovere un controllo . Cose che ti serviranno
Microsoft Excel
Mostra più istruzioni
1

lancio di Microsoft Excel , fare clic sulla scheda " sviluppatori" e fare clic sull'icona "Inserisci" situato nei controlli riquadro . Fai clic su " Casella di testo " al di sotto di controlli ActiveX e fare clic su una cella in cui si desidera inserire la casella di testo . Aggiungere un nuovo pulsante con la stessa tecnica .
2

Fare clic su " Macro " e digitare " removeBlankTxtBox " sotto il nome di macro e fare clic su "Crea " per creare una nuova macro .

3

digitare quanto segue per catturare gli errori eventualmente:

On Error GoTo Err_removeBlankTxtBox :
4

Aggiungere il seguente codice per controllare se la casella di testo è vuota e rimuovere se è vero:

ActiveSheet.TextBox1.Value = " " Allora

Sheet1.OLEObjects ( " TextBox1 " ) Elimina

End If
< br . > 5

Aggiungere il seguente codice per gestire eventuali errori :

Exit_removeBlankTxtBox :

Exit Sub