Ã?rneğin veriler B1:K1 aralığında olsun ve siz bunları A1:A10 aralığına yerleştirmek istiyorsunuz. (Ã?nemli olan yatayda ve düşeyde aynı hücre sayısı olmalıdır).
1] A1:A10 aralığını fare ile seçtikten sonra, formul çubuğuna aşağıdaki formulü yazın:
=TRANSPOSE(B1:K1)
2] Formulü, Ctrl + Shift + Enter tuş bileşeniyle girin. (Bu bir dizi formulüdür)
Edit: Pardon, makro ile cevap istemişiniz...
Makro kullanarak;
Kod:
Sub Test()
Range("A1:A10") = Application.Transpose(Range("B1:K1"))
End Sub
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.