Søg
Avatar billede nehm Nybegynder
02. april 2007 - 13:34 Der er 4 kommentarer og
2 løsninger

Combobox skal kun kunne udfyldes med listens indhold

Hej

spg. 1  Hvordan får jeg en meddelse op, hvis værdien i combo boxen ikke er at finde i min range ?

If Trim(Me.cbovare.Value) = "" Then
  Me.cbovare.SetFocus
  MsgBox "Please enter Vare nr."
  Exit Sub


Private Sub UserForm_Initialize()

Dim cPart As Range

For Each cPart In wksVare.Range("vare")
  With Me.cbovare
    .AddItem cPart.Value
    .List(.ListCount - 1, 1) = cPart.Offset(0, 1).Value
  End With
Next cPart
Avatar billede jens_klinting Nybegynder
02. april 2007 - 14:26 #1
Hvis du sætter

Me.cbovare.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList

så foregår det helt automatisk. Når DropDownStyle er sat til DropDownList kan brugeren kun vælge mellem de items, du har fyldt i. Hvis DropDownStyle er sat til DropDown (som er default) så kan brugeren både vælge og indtaste, og så skal du selv til at håndtere valideringen, som du beskriver.

Mvh.
Jens
Avatar billede jens_klinting Nybegynder
02. april 2007 - 14:54 #2
Oh my...

Jeg har vist været lidt for hurtig, her i Påsken.

Jeg har besvaret dit spørgsmål, som om det var VB.NET og ikke 'klassisk' VB. Så det er nok tvivlsomt (læs: ganske aldeles usandsynligt) at den foreslåede løsning virker.

Beklager, men kan iøvrigt anbefale .NET :o)

Mvh.
Jens
Avatar billede tafkab Nybegynder
02. april 2007 - 15:06 #3
Jeg mener helt bestemt at man kan sætte Comboboksens Style til DropDownList i Properties i VB6 så det burde faktisk virke.
Avatar billede supertekst Ekspert
04. april 2007 - 15:18 #4
VBA:
Egenskaber for comboboksen : MatchRequired -> True
Avatar billede nehm Nybegynder
04. april 2007 - 20:01 #5
tafkab: det virkede, men det var delvis besvaret af jens_klinting ligger i et svar så er det point..
Avatar billede tafkab Nybegynder
04. april 2007 - 20:30 #6
Den er jeg helt med på, det var også bare for at understøtte jens' svar :-)
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel Indlæg Oprettet Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic 5 29/08/202512:28 04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic 0 05/08/202510:10 -
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic 0 16/05/202512:31 -
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic 1 22/04/202514:55 25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic 12 10/07/202417:34 12/07/202414:34
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 13:55 Ukendt sender e-mails fra - og til min e-mail adresse Af mort1 i Andet sikkerhed
24/0711:08 Forskel mellem klokkeslet start aften slut næste morgen Af krasmussen i Excel
23/0715:10 WINDOWS KOMPABILITET Af snestrup2000 i Windows
22/0720:19 DVB T2 tuner med optagefunktion Af ErikHg i Andet hardware
20/0716:00 Fildeling mellem 2 windows 11 systemer Af knudg i Windows
White papers
Flere white papers »