Satırdaki enson boş hücreye gitmek.

[ynmcan]

Combobox1' de seçtiğim verinin bulunduğu satırın en sonundaki boş hücreye textbox1' deki veriyi aktarmak istiyorum ancak bir türlü yapamadım. yardımcı olursanız sevinirim.
Örnek dosyam ekte.

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu kullanabilirsiniz.

Private Sub CommandButton1_Click()
    Cells(ComboBox1.ListIndex + 1, Range("IV" & ComboBox1.ListIndex + 1).End(xlToLeft).Column + 1) = TextBox1
End Sub

 

[ynmcan]

syn: Korhan AYHAN;
teşekkür ederim.