xl.Range("A1") = rs!soyada
xl.Range("B1") = rs!adi
Ben A1 ve B1 Olarak değiştirdim. B12 ve B13 olarak değiştirebilirsiniz.xl.Range("B12") = rs!adi
xl.Range("B13") = rs!soyada
if komutuyla yapılabilir,
Örnek dosyanızda adres, tcno , boyu, kilosu alanları yoktu...