Makro ile sütun sıralaması

[Leturc]

Arkadaşlar merhabalar,

Başlıktan da anlayacağınız üzere, makro ile sütunların sıralarını belirlemek istiyorum.

Yani makro ile bazı sütunlarının gizlediğim çalışmamda, geriye kalan sütunları kafamdaki düzene göre sıralamak istiyorum.

Yardımcı olabilirseniz çok sevinirim.

İyi Çalışmalar.

Sub Facture()

Call Resize

Rows("4:7").Group

Columns("B:B").Group
Columns("E:E").Group
Columns("G:H").Group
Columns("J").Group
Columns("T:U").Group
Columns("Z:AH").Group
ActiveSheet.Outline.ShowLevels ColumnLevels:=1, RowLevels:=1

With ActiveSheet.PageSetup
.Orientation = xlPortrait
.Zoom = 65
End With
End Sub

 

[Korhan Ayhan]

Selamlar,

Sorunuzu örnek dosya ile desteklermisiniz. Ayrıca hangi sütunları nereye nasıl taşımak istediğinizide lütfen detaylıca açıklayın.