• DİKKAT

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

Bir sütundaki "DOĞRU" olarak gösterilen verilerin karşılığının toplu olarak tek hücreye aktarılması

Katılım
28 Nisan 2010
Mesajlar
182
Excel Vers. ve Dili
2007 Türkçe
128fgh45jklm648nb3 şeklinde A1 hücresindeki veri, B1 hücresinde oluşturmuş olduğum formül sonucunda B1 sütununda "DOĞRU" ve "YANLIŞ" şeklinde sıralanmış durumda. İstediğim "DOĞRU" olarak görülen hücrelerin karşılığının B1 hücresine toplu olarak yansıması.
 

Ekli dosyalar

Kıymetli Hocam öncelikle teşekkür ederim. Benim derdim rakam ve harfleri ayırmak değil, yürümüş olduğum formül üzerinden bir çözüm bulmak.
 
Merhaba,

Microsoft 365 sürümünde METİNBİRLEŞTİR ve ARALIKBİRLEŞTİR fonksiyonları var. Belki bunlarla bahsettiğinize benzer bir çözüm üretilebilir.

Eski sürümler için örneğin A1 hücresinde ki 20 karakterlik bir veri seti için aşağıdaki yapı çok esnek olmasa da kullanılabilir.

C++:
=EĞER(ESAYIYSA(--PARÇAAL(A1;1;1));PARÇAAL(A1;1;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;2;1));PARÇAAL(A1;2;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;3;1));PARÇAAL(A1;3;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;4;1));PARÇAAL(A1;4;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;5;1));PARÇAAL(A1;5;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;6;1));PARÇAAL(A1;6;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;7;1));PARÇAAL(A1;7;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;8;1));PARÇAAL(A1;8;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;9;1));PARÇAAL(A1;9;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;10;1));PARÇAAL(A1;10;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;11;1));PARÇAAL(A1;11;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;12;1));PARÇAAL(A1;12;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;13;1));PARÇAAL(A1;13;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;14;1));PARÇAAL(A1;14;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;15;1));PARÇAAL(A1;15;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;16;1));PARÇAAL(A1;16;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;17;1));PARÇAAL(A1;17;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;18;1));PARÇAAL(A1;18;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;19;1));PARÇAAL(A1;19;1);"")&EĞER(ESAYIYSA(--PARÇAAL(A1;20;1));PARÇAAL(A1;20;1);"")
 
Microsoft 365 sürümü için alternatif;

Sayılar için;
C++:
=METİNBİRLEŞTİR("";1;EĞER(ESAYIYSA(--PARÇAAL(A1;SATIR(DOLAYLI("1:"&UZUNLUK(A1)));1));PARÇAAL(A1;SATIR(DOLAYLI("1:"&UZUNLUK(A1)));1);""))

Kalan diğer karakterler için;
C++:
=METİNBİRLEŞTİR("";1;EĞER(EHATA(--PARÇAAL(A1;SATIR(DOLAYLI("1:"&UZUNLUK(A1)));1));PARÇAAL(A1;SATIR(DOLAYLI("1:"&UZUNLUK(A1)));1);""))
 
Çok teşekkür ederim değerli hocalarım
 
Geri
Üst