bir buton yardımı ile belirli sütunları gizlemek/göstermek

[mustafa7691]

merhaba sayın dostlar.Örnek vermedim ancak yapmak istediğim sayfadaki bir düğmeye uygun bir makro atandığı takdirde (ki ben bu makroyu bilmiyorum) belirli bir sütun aralığının (örn;D-G )gizlenmesi ve gizli ise tekrar gösterilmesi mümkünmüdür ve tabi nasıl olur.Yardımcı olursanız memnun olurum şimdiden teşekkürler ve saygılar

 

[metinozlu]

Sub Makro1()
''
'gizler
Columns("D:E").Select
Selection.EntireColumn.Hidden = True

End Sub
Sub Makro2()
''
'gösterir
Columns("C:F").Select
Selection.EntireColumn.Hidden = False
End Sub

 

[metinozlu]

Hücre aralığını düzeltilerek tekrar gönderilmiştir.
Sub Makro1()
''
'gizler
Columns("D:G").Select
Selection.EntireColumn.Hidden = True

End Sub
Sub Makro2()
''
'gösterir
Columns("C:H").Select
Selection.EntireColumn.Hidden = False
End Sub

 

[mustafa7691]

Mükemmel emeğinize sağlık,satır olsa ne yapardık hocam....