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

Symetrix

Altın Üye
Katılım
11 Ağustos 2022
Mesajlar
25
Excel Vers. ve Dili
2010 - Türkçe
Altın Üyelik Bitiş Tarihi
09-01-2027
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.
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,570
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Merhaba,

Bu işlem için excelin kendi filtre özelliğinden faydalanabilirsiniz.
 

Symetrix

Altın Üye
Katılım
11 Ağustos 2022
Mesajlar
25
Excel Vers. ve Dili
2010 - Türkçe
Altın Üyelik Bitiş Tarihi
09-01-2027
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
 

Symetrix

Altın Üye
Katılım
11 Ağustos 2022
Mesajlar
25
Excel Vers. ve Dili
2010 - Türkçe
Altın Üyelik Bitiş Tarihi
09-01-2027

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,570
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Bu özelliği makro ile desteklerseniz olur gibime geliyor.
 

Symetrix

Altın Üye
Katılım
11 Ağustos 2022
Mesajlar
25
Excel Vers. ve Dili
2010 - Türkçe
Altın Üyelik Bitiş Tarihi
09-01-2027
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
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,570
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
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.
 

Symetrix

Altın Üye
Katılım
11 Ağustos 2022
Mesajlar
25
Excel Vers. ve Dili
2010 - Türkçe
Altın Üyelik Bitiş Tarihi
09-01-2027
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

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,570
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
"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
 

Symetrix

Altın Üye
Katılım
11 Ağustos 2022
Mesajlar
25
Excel Vers. ve Dili
2010 - Türkçe
Altın Üyelik Bitiş Tarihi
09-01-2027
"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
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,570
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Olur...

Filtrelenenen hücre adrelerini de revize etmeniz gerekebilir..
 

Symetrix

Altın Üye
Katılım
11 Ağustos 2022
Mesajlar
25
Excel Vers. ve Dili
2010 - Türkçe
Altın Üyelik Bitiş Tarihi
09-01-2027
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

Üst