merhaba sayın
www.accesstr.net üyeleri,
Kullanılmayan Satır-Sütun Gizleme
yukarıda bağlantısı yazılı konuda talep edilmesi üzerine paylaşılan bilgilendirmeler akabinde,
örnek teşkil etmesi ve gerektiğinde benzer çalışmalar için kullanılması amacı ile,kullanılmayan kolon ve satırların gizlenmesini sağlamak üzere,ekran görüntüleri ile desteklenmiş olarak aşağıdaki anlatımın yapılması uygun görülmüştür.faydalı olması temennisi ile.
GİZLEME İŞLEMLERİ
1)
E kolonunun üst satırına geliniz ve SAĞ tuşa basınız.
2)
CTRL + SHIFT + SAĞ OK TUŞU sıralaması ile (önce,CTRL tuşuna basılı tutunuz,ardından SHIFT tuşuna da basılı tutunuz ve son olarak da SAĞ OK tuşuna basınız) bu tuşları seçip SAĞ tuşa basınız ve bu menüden GİZLE ifadesini seçiniz.
3)
aynı işlemi,bu sefer,satırlar için de uygulamak üzere,
CTRL + SHIFT + ALT OK TUŞU sıralaması ile bu tuşları seçip SAĞ tuşa basınız ve bu menüden GİZLE ifadesini seçiniz.
böylece,belirleyeceğiniz kolon ve satır sırasından sonraki kullanılmayacak olan kolonları ve satırları gizlemiş olursunuz.
bilginize...iyi çalışmalar,saygılar.
GÖSTERME İŞLEMLERİ
kullanılmayan kolon ve satırların gizlenmesi sonrasında,eğer tekrar bu kolonlar ve satırlar gösterilmek istenirse,
ekran görüntüleri ile desteklenmiş olarak aşağıdaki anlatımın yapılması uygun görülmüştür.
1)
son mevcut bulunan kolonun (D Kolonu) başlık kısmına gelip SOL tuşa basınız ve bırakmaksızın en sağa doğru getiriniz.bunu yapınca,resimdeki gibi son kolon değeri ifadesi belirecektir.
2)
seçili alan durumu mevcutken SAĞ tuşa basınız ve bu menüden GÖSTER ifadesini seçiniz.
3)
aynı işlemi,bu sefer,satırlar için de uygulayınız.en son mevcut satırın üzerine gelip bırakmaksızın en alt kısma kadar getiriniz.yine en son satır değeri görüntüsü belirecektir.
4)
seçili alan durumu mevcutken SAĞ tuşa basınız ve bu menüden GÖSTER ifadesini seçiniz.
böylece,gizlenen tüm kolonlar ve satırlar tekrar görünür duruma gelmiş olacaktır.
bilginize...iyi çalışmalar,saygılar.
Gizleme ve Gösterme İşlemlerinin BUTON OLAY YORDAMI İÇERİSİNE AKTARILMASI
yapılan bütün bu açıklamalarda yer alan işlemleri,eğer sayfa üzerinde iki buton ekleyip birine GİZLE diğerine de GÖSTER tanımlaması yaptıktan sonra,
GİZLE ifadeli butonun kod satırına
Columns("E:E").Select
Range("E4").Activate
Range(Selection, Selection.End(xlToRight)).Select
Selection.EntireColumn.Hidden = True
Rows("19:19").Select
Range("B19").Activate
Range(Selection, Selection.End(xlDown)).Select
Selection.EntireRow.Hidden = True
ActiveWindow.SmallScroll Down:=-18
kodları dahil ediniz.
GÖSTER ifadeli butonun kod satırına
Selection.EntireColumn.Hidden = False
Rows("18:18").Select
Range("C18").Activate
Selection.EntireRow.Hidden = False
ActiveWindow.SmallScroll Down:=-9
Rows("18:18").Select
Range("C18").Activate
Selection.EntireRow.Hidden = False
Rows("18:1048576").Select
Range("C18").Activate
Selection.EntireRow.Hidden = False
Range("E1").Select
kodlarını dahil ediniz.
bilginize...iyi çalışmalar,saygılar.
Gizleme ve Gösterme İşlemlerinin MAKRO İÇERİSİNE AKTARILMASI
eğer buton eklemek yerine bu işlemleri yapmak üzere kısayol tuşlarına atamak isterseniz,bunun için yapmanız gerekenler şunlardır:
1)
yukarıdaki resimde görüldüğü üzere,
Sub Makro1()
'ATOZ112
'AŞAĞIDAKİ KODLAR DAHİL EDİLMİŞTİR.
'KOLON VE SATIR GİZLEMEK İÇİN
Columns("E:E").Select
Range("E4").Activate
Range(Selection, Selection.End(xlToRight)).Select
Selection.EntireColumn.Hidden = True
Rows("19:19").Select
Range("B19").Activate
Range(Selection, Selection.End(xlDown)).Select
Selection.EntireRow.Hidden = True
ActiveWindow.SmallScroll Down:=-18
End Sub
Sub Makro3()
'ATOZ112
'AŞAĞIDAKİ KODLAR DAHİL EDİLMİŞTİR.
'GİZLENEN KOLON VE SATIRI ESKİ HALİNE DÖNÜŞTÜRMEK İÇİN
Selection.EntireColumn.Hidden = False
Rows("18:18").Select
Range("C18").Activate
Selection.EntireRow.Hidden = False
ActiveWindow.SmallScroll Down:=-9
Rows("18:18").Select
Range("C18").Activate
Selection.EntireRow.Hidden = False
Rows("18:1048576").Select
Range("C18").Activate
Selection.EntireRow.Hidden = False
Range("E1").Select
End Sub
buradaki kodları,YENİ MODÜL oluşturup içerisine ekleyip kaydediniz.
2)
sayfadayken,üst menüden ARAÇLAR - MAKRO - MAKROLAR ifadesini seçiniz.
3)
ekrana gelecek olan makro penceresindeyken,sırasıyla önce MAKRO1 adlı makroyu sol tuşa basıp seçili duruma getiriniz ve SEÇENEKLER yazılı butonu tıklayınız ve bir kısayol harfi tanımlayınız.örneğin;a harfi.
4)
3.maddedeki işlemleri,bu sefer diğer makro için gerçekleştiriniz.o makro için de,b harfi tanımlanmıştır.
sayfadayken,CTRL + a tuş kullanımı ile bu kolonları ve satırları gizlerken,CTRL + b tuş kullanımı ile de gizlenmiş olanları tekrar görünür duruma getirmiş olursunuz.
bilginize...iyi çalışmalar,saygılar.
EK'te,
1)
konunun 3.mesajında yapılan açıklamalarda yer alan buton olarak kullanıma örnek olması adına,
BUTONLU-ATOZ.rar
adlı örnek uygulamayı,
2)
konunuzun 4.mesajında yapılan açıklamalarda yer alan buton olarak kullanıma örnek olması adına,
MAKROLU-ATOZ.rar
adlı örnek uygulamayı inceleyebilirsiniz.
bilginize...iyi çalışmalar,saygılar.