Gruplandırma -MAkro

[ileri]

Arkadaşlar
A1 Den A20 Ye Kadar Gruplandırma Nasıl yapabilirm. Butona Atılarak

Butona Basınca Gruplancak Tekrar Basınca Acılıcak..!

Lütfen Yardımcı olurmusunuz.

Örnk Dosya:

 

[Levent Menteşoğlu]

Bir örnek dosya ekleyiniz. Ayrıca istediğiniz kodları makro kaydet yöntemi ile elde edebilirsiniz.

 

[ileri]

Örnek Dosya Eklenmiştir..!

 

[Levent Menteşoğlu]

Aşağıdaki kodları deneyin.

Sub gruplandir()
Range("A4:A17").Rows.Group
End Sub

Sub grupcoz()
Range("A4:A17").Rows.Ungroup
End Sub

 

[ileri]

Aşağıdaki kodları deneyin.

Sub gruplandir()
Range("A4:A17").Rows.Group
End Sub

Sub grupcoz()
Range("A4:A17").Rows.Ungroup
End Sub

Hocam Kod Calıısyor Fakat Grup Yapıyor Ama Grup u Kendisi Açıp Kapatmıyor yani Grup Olusturdugunu Görüyoruz Grup kapatdiyince grup siliniyor Onun yerine grup açılıp kapanazmı + - gibi