Avatar billede koldtoft Nybegynder
07. december 2004 - 22:12 Der er 4 kommentarer og
1 løsning

Problemer med userforms.

Jeg har en userform, der indeholder 6 tekstboxe, hvor brugeren har mulighed for at indtaste div. tal værdier. For et af boxene gælder det skal være et tal >= 5. Hvis dette ikke overholdes åbnes et msgbox, med besked om hvad min. kravene er. Der gælder for de 5 tekstboxe, de skal tabulere i bestemt rækkefølge.
Mit problem er følgende.
Hvis der indtastes et ugyldig værdi i et felt, skal cusor stå i det felt efter man har klikket ok til msgbox.
Jeg har forsøgt med en proceduren _Change, men der får jeg problemer med tallen 1-4, da disse er under 5, men jo også bruges ved eks. 10.
Jeg har forsøgt med proceduren _AfterUpdate, men den kan jeg ikke få til at stå i feltet igen, har også forsøgt med kommandoen .SetFocus, vil kan ikke få det til at virke.

Har i nogle guldkorn, der gør det kommer til at virke. Skal lige sige at ved brug af tabulator efter en evt. msgbox, skal selvfølgelige fortsætte i bestemt rækkefølge, efter indtastning af ny værdi.
Avatar billede bak Forsker
07. december 2004 - 23:32 #1
Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Val(TextBox3) < 5 Then
    MsgBox "nope, det skal være 5 eller mere"
    Cancel = True
End If
End Sub
Avatar billede bak Forsker
07. december 2004 - 23:46 #2
her er tallet så også markeret

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Val(TextBox3) < 5 Then
    MsgBox "nope"
    Cancel = True
    TextBox3.SelStart = 0
    TextBox3.SelLength = Len(TextBox3.Text)
End If
End Sub
Avatar billede bak Forsker
07. december 2004 - 23:48 #3
Beklager, en lille stavefejl

Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Val(TextBox3) < 5 Then
    MsgBox "nope,det skal være 5 eller mere"
    Cancel = True
    TextBox3.SelStart = 0
    TextBox3.SelLength = Len(TextBox3.Text)
End If
End Sub
Avatar billede koldtoft Nybegynder
09. december 2004 - 14:59 #4
Det virker Bak. Smider du et svar, så du kan få dine fortjente point.
Avatar billede bak Forsker
09. december 2004 - 15:42 #5
ok :-)
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester