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