krijg Userform code niet werkend

[loek010]

Geachte Heren,

Ik krijg de code na diversen knip en plakwerk niet werkende,
wat ik graag wil is dat de combobox zoekt op blad debiteurengevens op debiteurnummer
en na selecteren de gegevens invult in de textboxen, indien de debiteur niet bestaat
dan naast de combobox in veld nieuwe debiteur het debiteurnr in kan vullen
en de rest van de gegevens van de nieuwe debiteur, om daarna de gegevens
naar het werkblad debiteurgegevens wegschrijft op een nieuwe lege regel.
zie mijn voorbeeld

met vriendelijke groet ,
loek010

 

[Cobbe]

Je kan dat zo doen, maar dan moet je het bereik met de debiteurnummers als naambereik(debitnr) definiëren:

Private Sub UserForm_Initialize()
For Each cl In Range("debitnr")
 ComboBox1.AddItem cl
Next
 ComboBox1.SetFocus
End Sub

 

[gast0660]

Hoi,
Er is echt wel een verschil tussen "debiteurenoverzicht" en debiteurengegevevens"
Als je jan zoekt kan je piet niet vinden...
Maar omdat ik (meestal) een lieve jongen ben heb je tegen morgenmiddag een oplossing.

 

[snb]

Geachte Heren,

loek010

Dit forum is niet alleen voor heren.

 

[loek010]

Dank je gast0660 ,

Ik zie nu ook dat ik me daar in vergist heeft,
Maar ik moet eerlijk bekennen dat ik op VBA een leek ben, het lukt me al aardig een userform list
te bouwen maar de code ontbeerd me helaas.
graag zie ik je oplossing tegemoet bij voorbaat mijn dank

Groet Loek010

 

[gast0660]

@ SNBie
Uw antwoord is misschien terecht maar doet niets terzake, en Loek komt daar geen stap verder mee.

 

[snb]

Hij maakt het forum vrouwonvriendelijk. Dat is tegen de regels van het forum. Dat is zeker terzake want essentieel.

 

[loek010]

Hallo SNB

Gaan we nu een discussie voeren over een aanhef die ik in het bericht heeft geplaats ?
of over een oplossing voor mijn probleem.

Hierbij dan mijn excuses, en zal in het vervolg mijne dames en heren schrijven.

 

[snb]

Daar gaat het om.

 

[gast0660]

Met een beetje vertraging
Kan je hier mee verder?

 

[loek010]

Hallo Philiep, (gast0660)

Zelfs beter als ik zelf uitgedacht had ben hier erg blij mee,
hier kan ik zeker verder mee.

bedankt voor je inzet.

Mvg, Loek010