• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Kullanılmayan Satırların Formülle Gizlenmesi ve Açılması

  • Konbuyu başlatan Konbuyu başlatan Symetrix
  • Başlangıç tarihi Başlangıç tarihi

Symetrix

Altın Üye
Katılım
11 Ağustos 2022
Mesajlar
30
Excel Vers. ve Dili
2010 - Türkçe
Arkadaşlar kolay gelsin.
Soru; çalışma sayfası 1'de A1 hücresinden aşağıya doğru 50 satır var ben bu satırlara veri giriyorum ve girdiğim veriler diğer çalışma sayfalarına da aktarılıyor benim veri girdiğim yere 20 maddelik veri girdiğimde aktarıldığı çalışma sayfasında 20 maddelik veriden sonraki satırları otomatik gizlemesini istiyorum sayfa 1 deki yere her veri girdiğimde (20'den sonra) diğer sayfalarda o veri eklenerek satırı otomatik açsın istiyorum. Excel konusunda pek bilgim yok buradan faydalanarak yaptığımdan bana bu konuda açıklamalı olarak yardımcı olursanız çok sevinirim. Teşekkür Ederim.
 
Merhaba,

Bu işlem için excelin kendi filtre özelliğinden faydalanabilirsiniz.
 
Hocam cevabınız için teşekkür ederim ama biraz daha açar mısınız? dediğim gibi fazla bilgim olmadığından bu kadar kısa cümle ile anlamıyorum
 
Bu özelliği makro ile desteklerseniz olur gibime geliyor.
 
Bu özelliği makro ile desteklerseniz olur gibime geliyor.
hocam beni yanlış anlamayın çok kısa yazıyorsunuz anlamıyorum MEB de çalışıyorum bir satın alma excel tablosu var bununla uğraşıyorum bunu yapmam lazım dosya yükleyemiyorum yüklesem de baksanız geniş kapsamlı bir açıklama ile yapabileceğimi düşünüyorum bana Şu kodu vs şuraya yapıştır veya farklı nasıl anlatılır yardımcı olursanız çok sevinirim
 
Ben örnek dosya eklenmeyen sorularla pek ilgilenmeyi sevmiyorum. Sonrasında konu gereksiz yere uzayıp gidiyor..

Malum zaman kıymetli... Boşa harcamamak lazım..

Asıl dosyanıza benzer yapıda 20-30 satırlık örnek dosya paylaşıp durumu izah ederseniz. Bilgisi olan birçok kişi destek olacaktır.
 
Ben örnek dosya eklenmeyen sorularla pek ilgilenmeyi sevmiyorum. Sonrasında konu gereksiz yere uzayıp gidiyor..

Malum zaman kıymetli... Boşa harcamamak lazım..

Asıl dosyanıza benzer yapıda 20-30 satırlık örnek dosya paylaşıp durumu izah ederseniz. Bilgisi olan birçok kişi destek olacaktır.
Hocam Altın Üyeliğim vardı bitmiş yeniledim dosyayı yükledim. Yapılacak işlem şu; Veri giriş sayfasında bulunan B sütununa girdiğim veri bazen 10 bazen 50 oluyor 10 olduğu zamanlar 2. sayfa olan Taşınır İstek Belgesine aktarılan veride 10 oluyor ya 10. veriden sonra olan kısımlar yazdırırken veri fazla olunca 2. sayfa olarak çıkıyor tek sayfa yazdırsın ve görüntü kirliliği olmasın diye otomatik gizlenmesini istiyorum. Yani ben veri sayfasına her eklediğim kalemi diğer sayfalara aktardığında satır otomatik açılsın istiyorum.
 

Ekli dosyalar

"VERİ GİRİŞ SAYFASI" isimli sayfanızın ismi üzerinde sağ tıklayıp "KOD GÖRÜNTÜLE" işlemini seçtikten sonra karşınıza gelen pencereye aşağıdaki kodu uygulayınız.

Bu sayfada bir değişiklik yaptığınızda girdiğiniz veri kadar satır "(1)Taşınır İstek Belgesi" isimli sayfada listede görünecektir.

C++:
Private Sub Worksheet_Change(ByVal Target As Range)
    Sheets("(1)Taşınır İstek Belgesi").Range("$A$8:$I$70").AutoFilter Field:=2, Criteria1:="<>0"
End Sub
 
"VERİ GİRİŞ SAYFASI" isimli sayfanızın ismi üzerinde sağ tıklayıp "KOD GÖRÜNTÜLE" işlemini seçtikten sonra karşınıza gelen pencereye aşağıdaki kodu uygulayınız.

Bu sayfada bir değişiklik yaptığınızda girdiğiniz veri kadar satır "(1)Taşınır İstek Belgesi" isimli sayfada listede görünecektir.

C++:
Private Sub Worksheet_Change(ByVal Target As Range)
    Sheets("(1)Taşınır İstek Belgesi").Range("$A$8:$I$70").AutoFilter Field:=2, Criteria1:="<>0"
End Sub
peki ben bunu diğer sayfalara da uygulamak istiyorum bu kodu kopyalayıp sadece kodda bulunan sayfa ismini değiştirirsem olur mu
 
Olur...

Filtrelenenen hücre adrelerini de revize etmeniz gerekebilir..
 
Hocam sizin dediğiniz gibi yaptım ancak VERİ GİRİŞ SAYFASINDA 20 veriden sonrası diğer sayfada göstermiyor birde yanlışmı yaptım bilmiyorum o kodu diğer sayfalar içinde kopyaladım ama 2 sayfa oldu diğerleri olmadı.
 

Ekli dosyalar

Merhaba,

"(3)İşçilik " isimli sayfanızın isminde sonda boşluk var. Bu gözünüzden kaçmış.

Ayrıca kod alandaki sıfıra eşit olmayanları süzerek işlem yapıyor. "(4)Piyasa Araştırma Fişi" isimli sayfanızda bazı hücreleri tamamen boş bırakmışsınız. Bunlar içinde sayfaya bağlantı kurarsanız makro sorunsuz çalışacaktır.
 
hocam çok olmuyorsam 3 numaralı sayfadaki boşluğu fark etmiştim zaten kopyalayarak yapıyorum. diğer söylediğinizden pek bişey anlamadım müsaitsen bir el atabilir misiniz?
 
"(4)Piyasa Araştırma Fişi" isimli sayfanızı açınız.
Tüm hücreleri seçip gizli satırları görünür yapınız.
A46 hücresini aşağıya doğru sürükleyiniz.
B46 hücresini aşağıya doğru sürükleyiniz.
H46 hücresini aşağıya doğru sürükleyiniz.
I46 hücresini aşağıya doğru sürükleyiniz.

Bunlardan sonra sorun çıkmadan makronun çalışması gerekir.

Siz VERİ GİRİŞ SAYFASI'nda işlem yaptıkça satırlar gizlenip-görünür olacaktır.
 
hocam konu çözülmüştür. Bizzat yardımınız için teşekkür ederim.
 
Geri
Üst