Fjernelse tomme tekstbokse i Microsoft Excel ved hjælp af Visual Basic for Applications ( VBA ), er ikke så kompliceret som du måske tror. I VBA kan du bruge regnearket navn og navnet på tekstfeltet for at få adgang til dens værdi. Brug " OLEObject " genstand til at fjerne en genstand , såsom en tekstboks fra et regneark. Dette objekt er et ActiveX-objekt i et regneark , det indeholder "Slet" ejendom, som kan bruges til at fjerne en kontrol. Ting du har brug
Microsoft Excel
Vis Flere Instruktioner
1
Launch Microsoft Excel , skal du klikke på "Udvikler " fanen og klik på "Indsæt" -ikonet placeret i Controls rude. Klik på " Tekstboks " nedenfor ActiveX-objekter og klik på en celle, hvor du vil indsætte tekstboksen. Tilføj en ny knap ved hjælp af samme teknik.
2
Klik på " makroer" og skriv " removeBlankTxtBox " nedenfor makronavnet og klik på " Opret " for at oprette en ny makro .
< br > 3
Skriv følgende for at fange fejl, hvis nogen : Hej
On Error GoTo Err_removeBlankTxtBox :
4
Føj følgende kode til at kontrollere , om tekstboksen er tom , og fjern det, hvis det er sandt : Hej p Hvis ActiveSheet.TextBox1.Value = "" Så
Sheet1.OLEObjects ( " textBox1 " ) Slet
End If
< br . > 5
Føj følgende kode til at håndtere eventuelle fejl : Hej
Exit_removeBlankTxtBox : Hej
Exit Sub
Err_removeBlankTxtBox : Hej
Resume Exit_removeBlankTxtBox : Hej
6
Skift tilbage til Microsoft Office Excel og højreklik på knappen. Klik på " Tildel makro ... " og klik på " removeBlankTxtBox ". Klik på "OK". Klik på " Knap 1 " for at udføre din makro og fjerne tekstfeltet , hvis det er tomt.