Gekozen gegeven uit combobox naar bepaalde cel op werkblad

[JosEindhoven]

Hallo

Ik heb een formulier met meerdere comboboxen wat goed werkt
Echter de gegevens van combobox3 wil ik hebben in cel e1 van de sheet Tanken.
Iemand enig idee hei dit zit met de vba code

 

[KiWi007]

Hoi,

Vanuit een userform wegschrijven naar een cel/tabel gebruik ik de volgende vba code voor:

Private Sub Wegschrijven_data_combobox3()

Dim orgbook As Workbook
Dim Sht As Worksheet

Set orgbook = Workbooks(ActiveWorkbook.Name)
Set Sht1 = orgbook.Sheets("Tanken")

'wegschrijven data
Sht1.Cells(1, 5) = Userform1.combobox3.Value

End Sub

Het zal vast nog wel korter/beter beschreven kunnen worden, maar zo is hoe ik het ken.

helpt dit?

 

[JosEindhoven]

Er zit iets fout in de code

 

[VenA]

Sheets("Tanken").Cells(1, 5)=combobox3.Value

En anders maar even een bestandje plaatsen.

 

[JosEindhoven]

@VenA

De code werkt nu als een trein. Helemaal goed. Nog 1 vraagje . Is het ook mogelijk dat het laatst gekozen item bij het laden van het formulier getoond word in de combobox

 

[VenA]

Dan doe je het omgekeerde.

 

[JosEindhoven]

:thumb: