Arkadaşlar bu kodun açıklamasını rica ediyorum.
Kodun ne işe yaradığını biliyorum. ListBox taki veriyi a5:d34 de arıyor ve a değişkeni olarak aklında tutuyor. ama bana kodun mantığı lazım. İnşallah anlatabilmişimdir.
a=Sheets("Sayfa2").Range("A5 : D34").Find(ListBox1.Value).Row
.....
For i = 8 To 52
.....
Cells(a, i)
Parça parça alıp yazdım
Kodun ne işe yaradığını biliyorum. ListBox taki veriyi a5:d34 de arıyor ve a değişkeni olarak aklında tutuyor. ama bana kodun mantığı lazım. İnşallah anlatabilmişimdir.
a=Sheets("Sayfa2").Range("A5 : D34").Find(ListBox1.Value).Row
.....
For i = 8 To 52
.....
Cells(a, i)
Parça parça alıp yazdım
Son düzenleme: