- Katılım
- 19 Haziran 2007
- Mesajlar
- 418
- Excel Vers. ve Dili
- excel 2007
Merhaba arkadaşlar.
Daha önce kullandığım kodlarım yeni userformumda çalışmadı.
ListBox üzerinde görüntülenen verilerimin üzerine çift tıkadığımda
userformmum üzerinde TextBoxlara ve ComboBoxlara geri gelmesi gerekiyor.
Kodlarım aşağıdaki gibi. Acaba sorun nedir? ComboBoxlarım sayfadan referans alarak veri alıyor. Sorun bu olabilir mi?
Daha önce kullandığım kodlarım yeni userformumda çalışmadı.
ListBox üzerinde görüntülenen verilerimin üzerine çift tıkadığımda
userformmum üzerinde TextBoxlara ve ComboBoxlara geri gelmesi gerekiyor.
Kodlarım aşağıdaki gibi. Acaba sorun nedir? ComboBoxlarım sayfadan referans alarak veri alıyor. Sorun bu olabilir mi?
Kod:
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
If ListBox1.ListIndex < 0 Then Exit Sub
TextBox1.Text = ListBox1.Column(0)
TextBox2.Text = ListBox1.Column(2)
ComboBox1.Text = ListBox1.Column(3)
ComboBox2.Text = ListBox1.Column(4)
TextBox3.Text = ListBox1.Column(5)
TextBox4.Text = ListBox1.Column(6)
CommandButton1.Enabled = True 'False yaparsanız kaydet butonu pasif olur
CommandButton2.Enabled = True
CommandButton3.Enabled = True
End Sub
