31. august 2006 - 10:10Der er
2 kommentarer og 1 løsning
Validering af textboxe, comboboxe
Hej Jeg laver en formular i excel med en hel del textboxe, comboboxe. Som udgangspunkt er der ingen tekst i textboxe og comboboxe. Jeg har brug for en validering som siger noget i form af at "hvis textbox/combobox er = tom, giv meddelelse, ellers fortsæt". Desværre er jeg ret ny i VBA og har ikke umiddelbart fundet noget som jeg kunne benytte/blive inspireret af, hverken her på siden og via andre kanaler. Er der nogen som kan hjælpe ?
Med version 7 af TeamShare tager Lector næste skridt og bygger en platform for AI-agenter, der i højere grad kan følge medarbejderen gennem hele arbejdsprocessen.
Textboxe og andre objekter har nogle hændelser, som kan aktivere noget kode i VBA. F.eks. har en tekstbox hændelser for LostFocus, Change og mange flere. Hvis du f.eks. har haft aktiveret textbox1 og klikker videre til tekstbox2 aktiveres hændelsen LostFocus på Textbox1. I koden til hændelsen kan der være et check af om tekstbox1 er tom, som f.eks.
Private Sub TextBox1_LostFocus() If TextBox1.Value = "" Then MsgBox "Textbox1 er tom" End Sub
Du kan også oprette en knap, som tester dine checkboxe om de er tomme.
Private Sub CommandButton1_Click() If TextBox1.Value = "" Then MsgBox "Textbox1 er tom" If TextBox2.Value = "" Then MsgBox "Textbox2 er tom" End Sub
Koden til knapper, textboxe mv. placeres i macromodulet for de ark, hvor de er placeret.
--> Fobian suber script som er lige hvad der skal bruges. En enkelt ting kunne jeg godt bruge, og det er at ved klik på "ok"-knappen i msgbox går fokus tilbage til fx. textbox1. Jeg har prøvet med forskellige forslag fundet på experten og andre steder (bla. setfocus), men det virker ikke. Jeg har så efterfølgende læst at setfocus ikke umiddelbart virker på textboxe.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.