Hücre değeri 0 olanlar silinsin

Katılım
23 Şubat 2007
Mesajlar
1,212
Excel Vers. ve Dili
Excel2003
Değerli dostlar,
Üzerinde çalıştığım veri tabanı 5 yıllık veri içeriyor. Bunların Sayfa1 ax2:bo65000 hücre aralığı hücre değeri sıfır olanlarını boş bırakmak istiyorum. Değiştir ile yapmaya çalıştım ancak 10,20 gibi rakamların sonundaki sıfırları da sildiği için olmadı. Nasıl bir makro kullanmalıyım.
 

mehmett

Altın Üye
Katılım
18 Mayıs 2005
Mesajlar
2,571
Excel Vers. ve Dili
Excel 2010 Türkçe
Sn kelkitli,

Araçlar, Seçenekler, Görünüm penceresinde Sıfır Değerleri'ni iptal etseniz işinizi görür mü?
 
Katılım
23 Şubat 2007
Mesajlar
1,212
Excel Vers. ve Dili
Excel2003
Sn.Mehmet Öncelikle Cevap için teşekkür ederim. Ancak seçtiğim aralığın dışında 0 olması gereken hücreler kullanıyorum. Bu yüzden sıkıntı olur.
 

N.Ziya Hiçdurmaz

Özel Üye
Katılım
28 Nisan 2007
Mesajlar
2,216
Excel Vers. ve Dili
Office 2013 TR / 32 Bit
Düzen Değiştir aranan sıfır yeni değer bölümünü boş bırakıp.Tümünü değiştir deyip bir deneyiniz.
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,256
Excel Vers. ve Dili
Ofis 365 Türkçe
Merhaba,

Aşağıdaki kod da Sayın skorpiyon,un kodları gibi olup sadece sizin seçtiğiniz hücrelerin değeri 0 ise siler.

Önce hücreleri seçiniz sonra aşağıdaki kodları çalıştırınız

Kod:
 Sub AKTAR()
    For Each Hücre In Selection
        If Hücre.Value = 0 Then Hücre.Value = ""
    Next
End Sub
 
Katılım
23 Şubat 2007
Mesajlar
1,212
Excel Vers. ve Dili
Excel2003
Değerli dostlar çok çok teşekkürler ederim. Gerçekten güzel cevaplar.
 
Katılım
7 Ocak 2007
Mesajlar
112
Excel Vers. ve Dili
6.1
merhaba arkadaşlar,
bu forumda gerçekten çok faydalı bilgiler bulmak mümkün benim küçük bir sorunum var her ne kadar bu soruma benzer örnekler bulduysamda sorunu halledemedim. sorunum şu: iki hücre arasında kalan diğer hücrelerdeki değerleri nasıl silebilirimle ilgili. örnek dosyayı ekledim yardımlarınızı bekliyorum.şimdiden teşekkürler...
 
Katılım
15 Haziran 2006
Mesajlar
3,704
Excel Vers. ve Dili
Excel 2003, 2007, 2010 (TR)
Merhabalar,

Aşağıdaki kodu kullanabilirsiniz.

Kod:
Sub Sil()
Dim hcr As Range
For Each hcr In Range("C4:N46").Cells
    If Trim(hcr) <> "P2" Then: hcr.ClearContents
Next
End Sub
NOT : Lütfen, sorularınızı bundan sonra, yeni bir Konu Başlığı açarak sorunuz.
 
Katılım
7 Ocak 2007
Mesajlar
112
Excel Vers. ve Dili
6.1
HÜcre DeĞerİnİn Sİlİnmesİ

Çok TeŞekkÜr Ederİm GerÇekten Çok İŞİme Yaradi. Bu FormÜlÜ Aslinda Farkli Bİr Şekİlde Kullanmam Gerekİyor. Yanİ Sİlmek Yerİne Gİzlemek İstİyorum. ÖrenĞİn Üstekİ FormÜlde Yİne P2 DiŞinda Kİ DİĞer DeĞerlerİn Sİlİnmesİ Yerİne Gİzlenmesİ Daha SaĞlikli Olacak. Mesela Bİr İnput İÇerİsİnde "sadece GÖsterİlmesİnİ İstedİĞİnİz DeĞerİ Gİrİn" Denİlse Ve DİĞerlerİ Sİlİnmesİ Yerİne Gİzlense Daha Sonra Eskİ Halİne Gelse Çok GÜzel Olacak. Yardimlariniz İÇİn Tekrar TeŞekkÜrler
 
Üst