Private Sub UserForm_Initialize()
Dim i As Long
Worksheets("veri").Select
ComboBox2.Clear
For i = 2 To [a65536].End(3).Row
ComboBox2.AddItem Cells(i, 2)
Next i
End Sub
Benim VERİ adli bir sayfam var
Userformda texbox1 e yazacağım sicili yazıp enter tuşuna basınca
VERİ sayfasında B2:B
aralığında arayacak varsa eger
texbox2 ye. c2:c
Texbox3e. d2: d
Texbox4e. E2:E
Değerini getirecek
bilgileri veri sayfasından alıyor. sanırım siz bilgileri personel kaydından aldırcaksınız o sekılde duzenleyebılırsınız .
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.