Basit toplu sorgu formu oluşturma

[freecrax]

Arkadaşlar herkese hayırlı günler
A Stununda yer almakta olan sıralı tc listesinden oluşturduğum userform üzerinde yer alan textbox1 commandbutton1 ile kutucuguna çektirdiğim TC Numarasını commandbutton2 ile kopyalamak ve en son kendim sorguladığım adresi textbox 2 ye kendim yazıp commandbutton3 ile sorgulanan tc karşısında yer alan b stununa yazdırmak istiyorum. Foto mevcut teşekkürler şimdiden
Bu forma ait koda ihtiyaç duymaktayım yardımcı olursanız sevinirim.

 

[freecrax]

Yardımcı olabilecek üstadımız varmı acaba

 

[askm]

Bir örnek dosya eklerseniz daha çabuk çözüm alabilirsiniz.

 

[freecrax]

Bir örnek dosya eklerseniz daha çabuk çözüm alabilirsiniz.

http://s3.dosya.tc/server18/0fpeen/Ornek.rar.html
Cevap verdiğiniz için teşekkür ederim örnek dosyamı linke yükledim yardımcı olursanız çok sevinirim.
Sorgulatma hususunu ben başka bir makra eklentisiyle gerçekleştireceğim sadece fotoğrafta anlattığım buton ve textboxlara istediğim verileri getirmek ve yerleştirmek istiyorum yardımcı olursanız çok sevinirim.

 

[askm]

Buton2 ne için kullandığınızı anlamadım. Aşağıdaki kodlar resimde belirttiğiniz işlemleri yapar.

Public satir As Integer
Private Sub CommandButton1_Click()
For i = 2 To Range("A" & Rows.Count).End(3).Row
    If Cells(i, 2) = Empty Then
        satir = i
        TextBox1.Text = Cells(i, 1)
        Exit For
    End If
Next i
End Sub

Private Sub CommandButton2_Click()
TextBox1.Copy
End Sub

Private Sub CommandButton3_Click()
Cells(satir, 2) = TextBox2.Text
End Sub

 

[freecrax]

Çok teşekkür ediyorum verdiğiniz bilgi için button iki konusunu halledeceğim
kodlar işe yaradı çok sağolun hocam