• DİKKAT

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

Solda boş olan hücreleri listele

Katılım
16 Kasım 2011
Mesajlar
173
Excel Vers. ve Dili
2010 türkçe
Selamlar excel severler
Solundaki boş hücrelerde boş olanları hücrede listelere bilir miyim?
Örneğin 5 sütun da 3 ü işlem yapmış 2 birim işlem yapmamış.
6. Hücrede işlem yapmayanları yazmak istiyorum.
Mümkün müdür?
 
Merhaba,

Eğer kontrol etmek istediğiniz sütun sayısı az ise iç içe Eğer formülü ile basit bir şekilde çözebilirsiniz. Ayraçları değiştirmek için dilerseniz formüldeki ", " kısmını değiştirebilirsiniz.

Kod:
=EĞER(B2="";$B$1&", ";"")&EĞER(C2="";$C$1&", ";"")&EĞER(D2="";$D$1&", ";"")&EĞER(E2="";$E$1&", ";"")&EĞER(F2="";$F$1;"")

Şöyle görünecektir;

247103
 
Aşağıdaki KTF yi 6. hücreye uygulayın. Fonksiyondaki hucler A1:A5 olmalı
Kod:
Function bos(hucler As Range)
For i = 1 To hucler.Count
If Len(hucler(i)) = 0 Then
a = a & hucler(i).Address & "  "
End If
Next
bos = Replace(a, "$", "")
End Function
 
Merhaba,

Eğer kontrol etmek istediğiniz sütun sayısı az ise iç içe Eğer formülü ile basit bir şekilde çözebilirsiniz. Ayraçları değiştirmek için dilerseniz formüldeki ", " kısmını değiştirebilirsiniz.

Kod:
=EĞER(B2="";$B$1&", ";"")&EĞER(C2="";$C$1&", ";"")&EĞER(D2="";$D$1&", ";"")&EĞER(E2="";$E$1&", ";"")&EĞER(F2="";$F$1;"")

Şöyle görünecektir;

Ekli dosyayı görüntüle 247103
Çok Teşekkür ederim sayın Doğan Bu işimi görecek. Elinize sağlık
 
Aşağıdaki KTF yi 6. hücreye uygulayın. Fonksiyondaki hucler A1:A5 olmalı
Kod:
Function bos(hucler As Range)
For i = 1 To hucler.Count
If Len(hucler(i)) = 0 Then
a = a & hucler(i).Address & "  "
End If
Next
bos = Replace(a, "$", "")
End Function
Sayın ali cimri bunu maalesef yapamadım. Sanırım KTF kullanmayı bilmiyorum.
Fonksiyonu sayfa 1 e yapıştırdım 6. hücreye =bos(a2:e2) yazdım. Yine olmadı biraz daha açar mısınız rica etsem?
 
KTF kodlarını bir modüle yapıştırın.
Kontrol etmek istediğiniz veriler B1:F1 arasında ise
G1 hücresine = bos(B1:F1) yazın.
 
Yazdığım KTF, B1:F1 arasını kontrol ederken a2 c2 gibi sonuç vermez.
G1 Hücresinde =bos(B2:F2)

A

B

C

D

E

F

G



Excel





Webtr



C2 D2 F2
 
Ofis 365 için alternatif olsun..

TEXTJOIN = METİNBİRLEŞTİR
IF = EĞER

C++:
=TEXTJOIN("-";;IF(A2:E2="";$A$1:$E$1;""))

1697781316208.png
 

Ekli dosyalar

Geri
Üst