yan yana sütunları alt alta yazdırmak

[reyta]

merhaba,
A,B,C sütunlerındaki bilgileri alt alta yazdırmak istiyorum nasıl yapabilirim.
yardımcı olur musunuz?

http://www.hizliresimyukle.net/u/39/18/59d31839_orginal.jpg

 

[Emir Hüseyin Çoban]

. . .

Dağıtmak istediğiniz hücre aralığı seçin (A1:C3)
daha sonra kodları çalıştırın.

Sub KOD()

sat = 1
For Each alan In Selection
Cells(sat, "E") = alan.Value
sat = sat + 1
Next

End Sub

. . .

 

[reyta]

teşekkürler.