Excel Forum

Excel Forum (http://www.excel.web.tr/index.php)
-   Makro-VBA (http://www.excel.web.tr/forumdisplay.php?f=48)
-   -   Gizlenen Sütunlardaki Veriyi Genel Toplam Harici Tutma Yardımı (http://www.excel.web.tr/showthread.php?t=170328)

Believing 05-02-2018 12:02

Gizlenen Sütunlardaki Veriyi Genel Toplam Harici Tutma Yardımı
 
1 Eklenti(ler)
Sayın Uzman Arkadaşlar,

Bir çalışma kitabında makro ile gizlenen/gösterilen sütunlar bulunmaktadır. Tablonun sağında ise genel toplam sütunları bulunmaktadır. Gizlenen sütunlara ait hücrelerdeki verileri genel toplama dahil edilmemesini, aynı sütunların görünür yapılması durumunda genel toplama dahil olmasını nasıl sağlarız. Siz uzman arkadaşların çok değerli yardımlarını rica ediyorum.

Saygılarımla.

Ömer BARAN 05-02-2018 15:35

Merhaba.

Madem belgenizde, sütunları gizleme/gösterme makrosu var ve bu makroların yaptığı işleme göre, toplama dahil olma/olmama isteğiniz var;
kullanılan sütun gizleme/gösterme makro kodlarınız da dosyada olmalı ki, o kodlara ilave yapılarak öneride bulunabilsin değil mi?
Neticede istenilen işlemin tetiklenme zamanı bu sütun gizleme/gösterme olayı.

Özetle; soru için eklenen belgelerin gerçek belgenin (çok veri içermemesi iyi olur) özel bilgi içermeyen bir kopyası olması lazım.
.

Believing 06-02-2018 13:38

Sayın Ömer BARAN,

Makro veya VBA kodları konusunda yetersiz olduğum için bahsettiğiniz konuyu düşünemedim. Çalışmanın orjinal hali ekteki gibi olup, konuya gösterdiğiniz ilgi için size çok teşekkür ederim.

Saygılarımla.

Dosya Link:
http://s3.dosya.tc/server13/ww3bzd/F...EVING.rar.html

Ömer BARAN 06-02-2018 13:47

Dosyayı başka bir paylaşım sitesine yükler misiniz?
Chrome, "Tehlikeli Olabilir" uyarısı vererek dosyayı indirme işlemini tamamlamıyor.
.

Believing 06-02-2018 13:52

Elbette.

http://dosya.co/futujt13z1la/Faaliye...EVING.rar.html

Veya

https://www.dosyaupload.com/hQd3

Ömer BARAN 06-02-2018 14:49

Tekrar merhaba.

Belgenizdeki formüllerin tümüne bakmış/incelemiş değilim.
Anladığım kadarıyla; userformda ilk iki Listbox'taki seçimlere göre sütunlar, üçüncü Listbox'taki seçimlere göre de satırlar gizleniyor veya gösteriliyor.

Gördüğüm kadarıyla matematiksel işlemleri kodlarla değil, sayfadaki formüllerle yapıyorsunuz.
Bu nedenle; fikir olarak şunu söyleyebilirim.
► Sütün gizleme/gösterme kodlarında;
-- Columns(....).Hidden=True satırından sonra Cells(1,....)=0
-- Columns(....).Hidden=False satırlarından sonra Cells(1,....)=1
► Satır gizleme/gösterme kodlarında da;
Rows(....).Hidden = True satırından sonra Cells(....,1)=0
Rows(....).Hidden = False satırından sonra Cells(....,1)=1
şeklinde satırlar ekleyip,
-- A sütununa, gizlenen satırlar için 0, gösterilen satırlar için 1 yazdırmak,
-- 1'inci satıra, gizlenen sütunlar için 0, gösterilen sütunlar için 1 yazdırmak,
>> ardından da kullandığınız formülleri bu 1 sayılarını koşul olarak kullanacak şekilde güncellemek
(EĞER ile olabilir/TOPLA.ÇARPIM işleminde koşul göstermek olabilir, ETOPLA ile olabilir, formüllerin yapısına göre uygun olanı seçersiniz)
çözüm olur gibi geldi bana.
.

Believing 06-02-2018 15:02

Sayın Ömer bey,

Anlatımız için size çok teşekkür ederim.
İnşallah anlatımınızdan yola çıkarak yapabilirim.

Saygılarımla.

Ömer BARAN 06-02-2018 15:10

Kodlarınızı, F8 tuşuna basarak adım adım çalıştırın ki;
gizleme ve gösterme kod satırını görebilesiniz, ona göre de belirttiğim şekilde işlem yaparsınız.

Gösterme/gizleme işlemi;
-- For....Next döngüsüyle tek tek yapılıyorsa önceki cevabımda belirttiğim gibi,
-- topluca yapılıyorsa Range(....)=0 veya Range(....) = 1 gibi kod satırıyla
işlemi yapmanız gerekebilir.
.

Believing 06-02-2018 15:24

Sayın Ömer bey,

Genel Toplam sütunları için neler yapmalıyım?

Saygılarımla.

Ömer BARAN 06-02-2018 16:58

Tekrar merhaba.

Ekteki belgeye bazı ilaveler yaptım.
Dosya içerisine eklediğim açıklamalara ve kodlara bakınız.
Kontroller gerçekleştirin.

GENEL TOPLAMlar dediğiniz alanlarda da istenillenin gerçekleştiğini sanıyorum.
Olmadı ise satır/sütun gibi net alan belirterek sorunu yazın tekrar bakılır.

Cevap eki olup sildiğim, çözüm önerisinin uygulandığı belge : Faaliyet_BELIEVING.rar
.


Saat 20:27

Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.