? At være i stand til at validere den mængde data indtastet af en bruger kan hjælpe dig med at holde styr på dine data i en Excel-projektmappe . I Excel kan du bruge Visual Basic for Applications , også kendt som VBA , for at kontrollere mængden af indtastede tegn i en bestemt celle. I VBA kan du bruge " SelectionChange " begivenhed for at kontrollere , når brugeren flyttes fra en celle til en anden. Inde i " SelectionChange " procedure, du kan bruge celler " Character" ejendom for at få antallet af tegn i cellen. Instruktioner
1
Launch Microsoft Office Excel 2007 , og klik på "Udvikler "-fanen . Klik på " Visual Basic " ikonet fra " Code" rude for at åbne Visual Basic Editor. " . Ark1 " Dobbeltklik på " Ark1 " på " Project Explorer " rude for at åbne koden modulet for
2
Opret en ny " SelectionChange " sub procedure ved at skrive følgende VBA-kode : < br >
Private Sub Worksheet_SelectionChange ( ByVal Target As Range )
3
Opret en String variabel, der bruges til at få den tekst indtastet af brugeren : Hej
Dim userString As String
4
Start en "hvis " erklæring , og se om de tegn indtastet i "A1" overstige 10 tegn. Indtast følgende kode : Hej p Hvis Cells ( 1 1 ) Characters.Count > 10 Da
5
Vise en besked boks , hvis de tegn overstiger grænsen på 10 tegn. :
MsgBox "A1 har en grænse på 10 tegn "
6
Få den indtastede værdi af brugeren, og afkorte den til 10 tegn ved at skrive følgende kode : Hej
userString = Cells (1, 1). Value
userString = Venstre ( userString , 10)
7
Gem den afkortede strengen tilbage "A1" og slutter på " Hvis" erklæring: .
Cells ( 1, 1) Værdi = userString
End If
8
afslutte proceduren ved at skrive følgende : Hej
End Sub