İstediğim kolondan başlamıyor

[muratct]

http://www.hemenpaylas.com/download/1865044/Kitap1.xls.html
linkteki gibi bir tablom var.
istediğim veri list box tan seçtiğimde H8 e gelmeli ,Ama I 12 ye geliyor ve list box tan 2. bir veri işaretlediğimde alt satıra yazacağına ,tekrar üstüne yani I 12 ye yazıyor(H9 a yazmalı)

 

[Levent Menteşoğlu]

Comboboxtaki kodu aşağıdaki ile değiştirin.

Private Sub ComboBox1_Click()
Satir = WorksheetFunction.CountA(Range("H8:H65000")) + 8
Range("h" & Satir) = ComboBox1.List(ComboBox1.ListIndex, 0)
End Sub

 

[muratct]

Teşkkür ederim.Bazı problemler var
listboxtan seçim yaptığımda sonucu h11 e yazıyor.H8 e yazmalı.birde, j8 e birim ve k8 e fiyat yazmalı.