Textbox ve comboBox ile yan yana kayıt.

[bluesexcel]

Merhaba üstadlar benim şölye bir sorunum var combobox ile kayıt yapıyorum herşey gayet iyi ve normal ama combobox2 yani comboboxadet1 kaydetmiyor herhangi bir hata da vermiyor sorun ne olabilir ?
Kodlar alttaki. ilginiz için şimdiden teşekkür ederim


Private Sub CommandButton1_Click()

If Trim(Me.TextBoxurun.Value) = "" Then
Me.TextBoxurun.SetFocus
MsgBox "Lütfen Ürün Adı Giriniz."
Exit Sub
End If

If Trim(Me.ComboBoxfirma) = "" Then
Me.ComboBoxfirma.SetFocus
MsgBox "Lütfen Firma Seçiniz"
Exit Sub
End If

If Trim(Me.ComboBoxadet1) = "" Then
Me.ComboBoxadet1.SetFocus
MsgBox "Lütfen Birim Seçiniz"
Exit Sub

End If

With Sheets("FİRMALAR")
Satır = .Range("c65536").End(3).Row + 1
.Cells(Satır, 3) = ComboBoxfirma
.Cells(Satır, 5) = ComboBoxadet1
.Cells(Satır, 4) = TextBoxurun

End With
End Sub

 

[bluesexcel]

Sorunu çözdüm hücreye kaydediyormuş ama bir sebepten ötürü göstermiyordu hücreyi silip tekrar hücre ekledim sorun çözüldü.