değiştir komutunda nasıl bir uyarlama yapabilirim?

[enes2000eren]

Slm.arkadaşlar aşağıdaki kodda verileri değiştir dediğimde
ActiveCell.Offset(0, 0) = TextBox3.Value & " " & TextBox4.Value kayıt yapıyor.
Ama
ActiveCell.Offset(0, 2) = TextBox3.Value
ActiveCell.Offset(0, 3) = TextBox4.Value
Bu iki textbox bir türlü kayıt yapmıyor.yani verileri değiştirmiyor.nasıl oluyor da yapmıyor anlayamadım.yardımlarınızı bekliyorum.
**********************
Private Sub CommandButton6_Click()
'D E Ğ İ Ş T İ R
On Error Resume Next
ActiveCell.Offset(0, 0) = TextBox3.Value & " " & TextBox4.Value
ActiveCell.Offset(0, 5) = ComboBox4.Value
ActiveCell.Offset(0, 1) = TextBox6.Value
ActiveCell.Offset(0, 2) = TextBox3.Value
ActiveCell.Offset(0, 3) = TextBox4.Value
ActiveCell.Offset(0, 4) = TextBox5.Value
ActiveCell.Offset(0, 6) = TextBox7.Value
ActiveCell.Offset(0, 7) = CheckBox1.Value
ActiveCell.Offset(0, 8) = CheckBox2.Value
ActiveCell.Offset(0, 9) = TextBox8.Value
CommandButton5_Click
ComboBox1.RowSource = "a2:a" & say + 1
TextBox1.Value = WorksheetFunction.Count(Range("b2:b65000"))
End Sub

 

[dEdE]

Merhaba,
Örnek dosya ekleseydiniz belki de daha çabuk yanıt alırdınız.
Şimdi şöyle düşünelim. Sorunuza yanıt vermek isteyen kişi, önce örnek dosyayı oluşturacak. UserForm, TextBox, ComboBox v.b. gibilerini çizecek. Sonra sizin kodları deneyecek. Birçok arkadaşımızın bu kadar zamanı olmayabilir. Kaldı ki, hata belki de bize göndermediğiniz kodlardan kaynaklanıyordur. Sizin gönderdiğiniz kodlarda hata yok gibi görünüyor. Buradan yola çıkarak yaptığım Userform hatsız olarak verileri sayfaya aktardı.
Saygılar.