CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

jath08ac Forsker

18. oktober 2017 - 13:41 Der er 7 kommentarer og
1 løsning

Vis og ændre værdi i combobox i UserForm

Hej,

Håber I kan hjælpe

Jeg hat en ComboBox, som viser en værdi fra mit regneark. Se kode nedenfor:
curcell.Offset(0, 4).Value = cmbSted.Value

Jeg vil gerne have mulighed for at ændre i værdien i comboboxen. Den værdi der bliver vist, er en del at de 4 værdier der skal kunne vælges.

De 4 værdier der skal kunne vælges i comboBoxen er:
Sted1
Sted2
Sted3
Sted4

pft.

Synes godt om

Jan Hansen Ekspert

18. oktober 2017 - 14:04 #1

Se https://www.dropbox.com/s/47lllq8kdr0dkzm/Test3.xlsm?dl=0

Jan

Synes godt om

jath08ac Forsker

18. oktober 2017 - 14:53 #2

@Jan: Jeg får fejl 424 under .list = ListeA når jeg sætter den ind i min kode.

Synes godt om

Dan Elgaard Ekspert

18. oktober 2017 - 15:00 #3

I UserForm_Initialize eventen indsætter du:

With cmbSted ' Objekt navnet på comboboksen
AddItem "Sted1"
AddItem "Sted2"
AddItem "Sted3"
AddItem "Sted4"
End With

Bemærk, at der IKKE er lig med tegn (=) mellem 'AddItem' og værdien.

Synes godt om

Jan Hansen Ekspert

18. oktober 2017 - 15:18 #4

# jeg har navngivet området med listen over navne

Synes godt om

jath08ac Forsker

18. oktober 2017 - 15:23 #5

Når jeg indsætter ovenstående kode, så får jeg følgende fejl:
Sub og Function not defined

jeg har sat nedenstående kode ind:

Sub UserForm_Initialize()

With cmbSted ' Objekt navnet på comboboksen
AddItem "Sted1"
AddItem "Sted2"
AddItem "Sted3"
AddItem "Sted4"
End With

End Sub

Synes godt om

Dan Elgaard Ekspert

18. oktober 2017 - 17:24 #6

Hvor har du placeret den 'UserForm_Initialize'?

I et kodemodul eller i en userForm???

Synes godt om

jath08ac Forsker

18. oktober 2017 - 18:59 #7

Har indsat det i en UserForm som hedder udStamKort

Synes godt om

Dan Elgaard Ekspert

18. oktober 2017 - 21:06 #8

Argh, f**k!

Alle 'AddItem' skal naturligvis have et punktum foran:

With cmbSted ' Objekt navnet på comboboksen
.AddItem "Sted1"
.AddItem "Sted2"
.AddItem "Sted3"
.AddItem "Sted4"
End With

Sorry!

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Skrive tekst fra celle i formel Af SFrede i Excel	3	I går 14:54	13 minutter siden
slette rækker automatisk Af torben lind i Excel	12	24/04/202418:52	I dag 07:07
Ctrl + Backspace Af xl-Enthusiast i Excel	7	22/04/202408:15	22/04/202410:12
Lopslag Af Mariacecilia i Excel	9	19/04/202419:00	20/04/202420:01
Vagtliste med rul mellem skifter Af Klaus W i Excel	0	19/04/202413:33	-

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.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS