hücre içerisindeki metni bölme

[hakin]

A SUTUNUNDAKİ HÜCRENİN İÇERİSİNDE YAZI METNİ MEVCUT. ANCAK METİN İÇERİSİNDE ABC- STANDART VE SONRA 10 RAKAM STANDAR OLARAK GELMEKMEDİR. YAPMAK İSTEDİĞİM HÜCRENİN İÇERİSİNDEN ABC-VE 10 RAKAMI AYIRMAK İSTİYORUM.
örnek ektedir. ilgnize teşekkürler

 

[Orion1]

A1 hücresindeki metin için.

=--PARÇAAL(A1;MBUL("ABC-";A1)+4;10)

 

[hakin]

ancak hücrenin içerisindekilerinin hepsini ayrı ayrı sutunlara çıkarmak istiyorum
ABC-5239879873
ABC-5822247879
ABC-9988774455 gibi sutunlara yazmak istiyorum.

 

[mesudiye_052]

Selam;

Dizi Formüldür
CTRL+SHİFT+ENTER

Herhangi bir hücreye aşağıdaki formülü yaz ve aşağıya doğru çekerek çoğalt

=--PARÇAAL($A$1;KÜÇÜK(EĞER(PARÇAAL($A$1;SATIR($1:$65536);3)="ABC";SATIR($1:$65536));SATIR(A1))+4;10)

Saygılar;

 

[mesudiye_052]

Selam;

Önceki formül biraz ağır çalışacaktır

İkinici bir yol
mesela A9 hücresine aşağıdaki formülü yazınız

=--PARÇAAL($A$1;MBUL("ABC-";$A$1;1)+4;10)&YİNELE(" ";MBUL("ABC-";$A$1;1))

A10 hücresine aşağıdaki formülü giriniz ve girdikten sonra aşığıya doğru çoğaltınız..

=--PARÇAAL($A$1;MBUL("ABC-";$A$1;1+(UZUNLUK(PARÇAAL(B9;11;65536))))+4;10)&YİNELE(" ";MBUL("ABC-";$A$1;1+(UZUNLUK(PARÇAAL(B9;11;65536))))+4)

Saygılar;

 

[hakin]

teşekkürler formülü uyguladım ve faydalı oldu,
aynı formülde rakamdan sonra gelen örneğin adres var bunu nasıl yandaki sutuna yazdırabilirim..
ABC-5239879873 Yunus emre sk no 3 ankara
ABC-5822247879 bulvar cad sk no 8 trabzon
ABC-9988774455 mehmetçik sk no 111 mersin gibi

 

[mesudiye_052]

Selam;

aşağıdaki formülle kısmen dediğiniz olur
formülün sonundaki 40 sayısını ayarlamak gerekir

Dizi Formül

=PARÇAAL($A$1;KÜÇÜK(EĞER(PARÇAAL($A$1;SATIR(DOLAYLI("1:"&UZUNLUK($A$1)));3)="ABC";SATIR(DOLAYLI("1:"&UZUNLUK($A$1))));SATIR(A1));40)

?
Saygılar;

 

[Portnoy]

Aynı soruya benzer bir sorum da benim var.
Ekteki dosyada firbirinden faklı cumleler | sembolu ile ayrılmış durumda.
Bu cümleleri hücrelere nasıl bolebilirim?
Şimdiden yardımlarınız için teşekkür ederim.

 

[Korhan Ayhan]

Selamlar,

İlk olarak B1 hücresinin içeriğini silin.
Daha sonra A sütununu seçin.
VERİ-METNİ SÜTUNLARA DÖNÜŞTÜR menüsünü açın.
"Sınırlandırılmış" seçeneğini seçin ve ileri tuşuna tıklayın.
Ayırıcılar bölümünden DİĞER seçeneğini seçin.
Hemen yanındaki kutucuğa klavyenizin sağ tarafındaki ALTGr tuşu ile beraber yine klavyenizin sol tarafındaki SHIFT ile Z tuşunun arasındaki tuşa basarak "|" işaretini yazın.
İLERİ tuşuna tıklayın. Ve son olarak SON tuşuna tıklayarak işlemi tamamlayın.

 

[Portnoy]

Çok teşekkürler.. Sorunumu çözdü ...

 

[kenancaliskan45]

Merhabalar,

benimde bu konuya benzer bir ricam var ama. yapmak istediğim,

Bir Hücre içerisinde yazılı firma ismi ve yaptığı işi anlatan yazı var.
(Firmaismi-Yaptığıiş) bu şekilde .. benim istediğim "-" den sonrasını başka bir hücreye ayırmak.
sizin yukarıdaki formülleri denemedim fakat yapamadım. firma isimleri bazıları uzun bazıları kısa, keza işlerde aynı o şekilde.

Yardımcı olabilirseniz çok sevinirim

 

[Ömer]

Merhaba,

Veriniz A1 hücresinde olduğunu varsayarsak,

=SAĞDAN(A1;UZUNLUK(A1)-BUL("-";A1))

formülü ile istediğiniz veriyi alabilirsiniz.

 

[randzafer]

Merhaba,

Veriniz A1 hücresinde olduğunu varsayarsak,

=SAĞDAN(A1;UZUNLUK(A1)-BUL("-";A1))

formülü ile istediğiniz veriyi alabilirsiniz.

Ömer Üstad benim de size bir sorum olacaktı yardımcı olursanız sevinirim. Dosya ekledim. İyi çalışmalar

 

[randzafer]

Bu konuda üstadlardan yardımcı olabilecek kimse yok mu acaba ?

 

[Ömer]

Merhaba,

Bu şekilde deneyin.
Detaylı deneme yapmadım.

C2:

=SOLDAN(A2;MBUL("<IS_HAZIRLIK>";A2)-1)&"<IS_HAZIRLIK>"

C3:

=PARÇAAL(YERİNEKOY(A3;C2;"");MBUL("<IS_HAZIRLIK>";YERİNEKOY(A3;C2;""))+UZUNLUK("<IS_HAZIRLIK>")+1;MBUL("<IS_OPERASYON>";YERİNEKOY(A3;C2;""))-MBUL("<IS_HAZIRLIK>";YERİNEKOY(A3;C2;""))+1)

C4:

=PARÇAAL(YERİNEKOY(A4;C3;"");MBUL("<IS_OPERASYON>";YERİNEKOY(A4;C3;""))+UZUNLUK("<IS_OPERASYON>")+2;MBUL("<IS_EVRAK_DAGIT>";YERİNEKOY(A3;C3;""))-MBUL("<IS_OPERASYON>";YERİNEKOY(A3;C3;""))-1)

.

 

[excelokyanus500]

Merhaba

Deneyin

msndösna- öms,csc =Kelimeparçala(A1;"-";2)



Function Kelimeparçala(Kelime As String, simge As String, kaçıncı As Integer) As Variant
Kelimeparçala = Split(Kelime, simge)(kaçıncı - 1)
End Function

 

[randzafer]

Ömer bey, bir önceki hücreden bağımsız almak istesek formül nasıl olur? Yani mesela sadece '<IS_OPERASYON>' un 1.sini almak istesek?
Çünkü bazı dosyaları bağımsız almam gerekiyor.
Yardımlarınız için teşekkürler.

 

[randzafer]

Üstad bir de şöyle bir durum var bazı hücrelerde mesela '<IS_OPERASYON>' yok '<IS_HAZIRLIK>' ile '<IS_EVRAK_DAGIT>' var ve sadece yani değişken olabiliyor dosyalar, dolayısıyla hangi veriyi istiyorsak diğer bölümlerden bağımsız çalıştırabileceğim bir formül olmalı.
Teşekkürler...

 

[randzafer]

Deneyin

msndösna- öms,csc =Kelimeparçala(A1;"-";2)



Function Kelimeparçala(Kelime As String, simge As String, kaçıncı As Integer) As Variant
Kelimeparçala = Split(Kelime, simge)(kaçıncı - 1)
End Function

Üstad deniyorum ama hata veriyor, "-öms,csc" de hat veriyor , "msndösna" sa hata veriyor?
Emeğin için teşekkürler, nasıl çözeriz o sorunu?

 

[Korhan Ayhan]

Ekteki dosyayı inceleyiniz.

Kullanıcı tanımlı fonksiyon kullanılmıştır.

Kullanılan fonksiyon;

Function KPARÇAAL(Veri As Range, Ayıraç As String, Kriter As String, Kaçıncı As Integer) As Variant
    Dim Data As Variant, Say As Long

    Data = Split(Veri.Text, Ayıraç)
    
    For X = 0 To UBound(Data)
        If Right(Data(X), Len(Kriter)) = Kriter Then
            Say = Say + 1
            If Say = Kaçıncı Then
                KPARÇAAL = Data(X) & Ayıraç
                Exit For
            End If
        End If
    Next
End Function