Barons
Altın Üye
- Katılım
- 14 Mayıs 2005
- Mesajlar
- 967
- Excel Vers. ve Dili
- Microsoft Ofis 365
- Altın Üyelik Bitiş Tarihi
- 06-01-2040
merhaba
Aşağıdaki kodda combobox change olayında arama yaptırıyorum ama formul olan hücredeki değeri getirmiyor.Bunun bir çözümü varmıdır.? Teşekkürler
Kod:
Private Sub ComboBox33_Change()
Worksheets("veri").Select
Range("e2:e64000").Find(ComboBox33.Value).Activate
ComboBox2.Value = ActiveCell.Offset(0, 1).Value
TextBox1.Value = ActiveCell.Offset(0, 2).Value
' TextBox33.Value = ActiveCell.Offset(0, 3).Value bu değer gelmiyor çünkü bu hücrede formul var.
TextBox2.SetFocus
End sub
Aşağıdaki kodda combobox change olayında arama yaptırıyorum ama formul olan hücredeki değeri getirmiyor.Bunun bir çözümü varmıdır.? Teşekkürler
Kod:
Private Sub ComboBox33_Change()
Worksheets("veri").Select
Range("e2:e64000").Find(ComboBox33.Value).Activate
ComboBox2.Value = ActiveCell.Offset(0, 1).Value
TextBox1.Value = ActiveCell.Offset(0, 2).Value
' TextBox33.Value = ActiveCell.Offset(0, 3).Value bu değer gelmiyor çünkü bu hücrede formul var.
TextBox2.SetFocus
End sub