Sütun gizleme makro hata

Katılım
28 Ocak 2015
Mesajlar
41
Excel Vers. ve Dili
Excel 2010
Arkadaşlar merhaba,
Sürekli yaptığım sütun gizleme işlemi için bir makro yazdım aşağıdaki gibi. Yalnız boş bir workbook'da istediğim gibi çalışırken, eklediğim dosyada istemediğim sütunları da gizliyor. Neden olabilir?

Şimdiden yardımlarınız için çok teşekkürler,

Sub sakla()
Range("B:B,E:E,G:H,J:L,O:O,S:U,W:Y,AD:AE").Select
Selection.EntireColumn.Hidden = True
End Sub
 

Ekli dosyalar

Muzaffer Ali

Destek Ekibi
Destek Ekibi
Katılım
5 Haziran 2006
Mesajlar
5,802
Excel Vers. ve Dili
2019 Türkçe
Siz hangi kolonları gizlemek istemediğiniz halde bu kodlar gizliyor?
 

Muzaffer Ali

Destek Ekibi
Destek Ekibi
Katılım
5 Haziran 2006
Mesajlar
5,802
Excel Vers. ve Dili
2019 Türkçe
Ben şimdi denedim gizlenmesini istemediğiniz sütunların hiçbiri gizlenmiyor.
 
Katılım
27 Ağustos 2010
Mesajlar
42
Excel Vers. ve Dili
Microsoft Office 2016 İngilizce
Kod:
Sub sakla()
Range("B:B,E:E,G:H,J:L,O:O,S:U,W:Y,AD:AE").EntireColumn.Hidden = True
End Sub
selection yazmanıza gerek yok ama yazmanız da sonucu değiştirmez. göndermiş olduğunuz excel'de test ettim problem görünmüyor.
 

Muzaffer Ali

Destek Ekibi
Destek Ekibi
Katılım
5 Haziran 2006
Mesajlar
5,802
Excel Vers. ve Dili
2019 Türkçe
Eklediğim dosyada mı denediniz, yoksa başka bir dosyada mı?
Eklediğiniz dosyada denedim.

Sizin dosyanızda VBA kod kısmı tamamen boş, belki bir yerlerde başka bir gizleme kodu çalışması da mümkün değil.

Belkide orijinal dosyanızda bu gizleme kodları çalışırken başka yerde bulunan kodlar gizlenmesini istemediğiniz kolonları gizliyordur.
 
Katılım
2 Eylül 2011
Mesajlar
146
Excel Vers. ve Dili
Office Professional Plus 2016 / 32 Bit / Türkçe
Sub sakla()
Range("B:C,E:I,K:O,Q:U,W:AA,AC,AD:AG,AI:AM,AO:AS,AU:AY,BA:BE,BG:BK,BM:BQ,BS:BW,BY:CC,CE:CI,CK:CQ:CT,CV:CX").EntireColumn.Hidden = True
End Sub

Yazdım "400" Hata kodu verdi.
 
Üst