• DİKKAT

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

Excel boş hücreleri boş olarak algılamıyor.

Katılım
19 Nisan 2013
Mesajlar
3
Excel Vers. ve Dili
2010 türkçe
Merhaba;

Ekteki dosyada görüleceği gibi D2, E2, E3 hücreleri boş hücrelerdir. Hücrenin içinde formül veya Space(Boşluk) yer almamaktadır. Ancak A2 hücresine gelip CTRL+sağ_yön_tuşu kombinasyonunda D2 hücresine gelmesi gerekirken G2 hücresine atlıyor. Ne zaman ki bu boş görünen hücrelere birer kez girip ya da F2 ile açıp birşey yapmadan Enter a bile bassam o zaman bu hücreleri boş gibi algılıyor. Dosya ilk açıldığında
CTRL+A
F5
Özel
Boşluklar
yapıp tamam dediğimde "Hiçbir boş hücre bulunamadı" uyarısı çıkıyor. Dosya bana CD ile geldi ve sanırım Access ten veya SQL den aktarım yapılarak oluşmuş. İlk oluşturma aşamasına geçemem veriler bir kurumdan alınmış. Dosyanın yaklaşık 20.000 (Yirmibin) satırdan oluştuğunu düşünürsek tek tek boş hücreleri aktif hale getiremem. Bu durumda bu hücrelerin gerçekten boş gibi gözükmesini nasıl sağlarım
Makrodan çok anlamam ancak tüm hücreleri tek tek seçip F2 yaptırıp sonra da Enter yaptıran bir makro oluşturmak mümkün olur mu? Çok şey istedim sanırım yine de yardımcı olan olursa çok minnettar olurum.
 

Ekli dosyalar

Öncelikle CTRL+A veya tablo kısmının sol üstteki butona basarak tüm hücreleri seçili hale getirdim. Daha sonra CTRL+H ile Değiştir işlevini açtım. Aranan değer kısmını boş bırakıp Yeni değer kısmına karmaşık harfler girdim hücrelerin hiçbirinde olmayan. Değiştir deyip öncelikle bu boş hücrelerin içinde değer yazdırdım. Daha sonra işlev kutusunu kapatmadan aranan ve yeni değer kutularında verilerin yerini değiştirdim. Yani o karmaşık harf dizisini alıp aranan değer kısmına yazdım ve yeni değer kısmını boş bıraktım. Bu işlemden sonra boş hücreler orijinal boş hücre oldu :)
 
Öncelikle CTRL+A veya tablo kısmının sol üstteki butona basarak tüm hücreleri seçili hale getirdim. Daha sonra CTRL+H ile Değiştir işlevini açtım. Aranan değer kısmını boş bırakıp Yeni değer kısmına karmaşık harfler girdim hücrelerin hiçbirinde olmayan. Değiştir deyip öncelikle bu boş hücrelerin içinde değer yazdırdım. Daha sonra işlev kutusunu kapatmadan aranan ve yeni değer kutularında verilerin yerini değiştirdim. Yani o karmaşık harf dizisini alıp aranan değer kısmına yazdım ve yeni değer kısmını boş bıraktım. Bu işlemden sonra boş hücreler orijinal boş hücre oldu :)

Kolay ve pratik bir yol izlemişsiniz.Tebrikler...
 
Öncelikle CTRL+A veya tablo kısmının sol üstteki butona basarak tüm hücreleri seçili hale getirdim. Daha sonra CTRL+H ile Değiştir işlevini açtım. Aranan değer kısmını boş bırakıp Yeni değer kısmına karmaşık harfler girdim hücrelerin hiçbirinde olmayan. Değiştir deyip öncelikle bu boş hücrelerin içinde değer yazdırdım. Daha sonra işlev kutusunu kapatmadan aranan ve yeni değer kutularında verilerin yerini değiştirdim. Yani o karmaşık harf dizisini alıp aranan değer kısmına yazdım ve yeni değer kısmını boş bıraktım. Bu işlemden sonra boş hücreler orijinal boş hücre oldu :)

Sen ne kralsın ya. İki gündür kafayı yiyecektim senin sayende çözdüm.

Kod:
Range("B7:K7").SpecialCells(xlCellTypeBlanks).EntireColumn.Delete

Bu kodla boş hücreler olduğu zaman sütunları sil diyordum ama hücreler boş olduğu halde silmiyordu hata veriyordu. Formatlarımı değiştirmedim, arka planlanları tabloları aklıma ne geldiyse yaptım ama hücreler boş olduğu halde dolu gösteriyordu. Senin sayende aşağıdaki CTRL+H makrosu yaptım ve düzeldi. Paylaşımın için teşekkürler.

CTRL+H makrosu

Kod:
Range("B7:K7").Select
    Selection.Replace What:="", Replacement:="aaaa", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
    Selection.Replace What:="aaaa", Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
 
Bazen basit düşünmek çözüm yolu olabiliyor. ;)
 
Geri
Üst