Site Overlay

Excel de sütunları alt alta birleştirme

Bu işlemi makro ile yapabilirsiniz, ALT+F8 tuşlarına basın. Yeni Makro oluşturun ve aşağıdaki kodu yapıştırıp çalıştır tuşuna basın.

Sub alt_alta_yaz()
Dim i As Integer, son As Long
son = Range("a655360").End(3).Row
For i = 2 To Range("a1").End(xlToRight).Column
Range(Cells(son, i), Cells(son, i).End(xlUp)).Cut Range("a655360").End(3)(2, 1)
Next i
i = Empty: son = Empty
End Sub
© 2024 Arif Akyüz. Tüm Hakları Saklıdır. Gizlilik politikası
Yasal Uyarı: Bu sitede yer alan makaleler bilgi amaçlıdır ve hatalar içerebilir. Site sahibi, bu bilgilerin kullanımı sonucunda oluşabilecek zararlardan sorumlu tutulamaz.