Aynı Hücreden Sayı ve Metin Alma

[vitamin]

Arkadaşlar, ek'li dosyada ki formül mümkün müdür acaba?

Teşekkürler.

 

[Türker]

Merhaba Arkadaşım

Ben formulle birşeyler yaptım ama veri girdiğin hücrede standar giriş yapman lazım
aksi taktirde yazılım mantığına göre yanlış veri çıkar karşına.
İyi çalışmalar.

 

[vitamin]

Merhabalar Türker bey.
Aslında doğru ama veri girişi sırasında bu standardı oluşturmak için vakit harcamak gerekiyor.

Veri girişinde bu standart için harcanacak vakit daha sonra, bu ayrıştırmayı manuel yaparak harcanıyır.

Aslında şu şekilde olabilir mi diye düşünmüştüm ben;

=formül 1 : fiş, fat, ft, fş den sonra başlayan rakamları al...
=formül 2 : rakamlardan sonra başlayan metin/ünvanları al... gibi.

Olabilir mi, mümkün mü bu şekilde?

Teşekkürler.

 

[halit3]

Arkadaşlar, ek'li dosyada ki formül mümkün müdür acaba?

Teşekkürler.

Fonksiyonlarla mümkün

kodu modülün içine koyun

Function SAYILARIBUL(hucre)
' HÜCRENİN İÇİNDEKİ SAYI DEĞERLERİNİ VERİYOR
Dim i As Integer
For i = 4 To Len(hucre)
Sayi = Mid(hucre, i, 1)
If IsNumeric(Sayi) = True Then
SAYILARIBUL = SAYILARIBUL & Sayi
End If
SAYILARIBUL = SAYILARIBUL * 1
Next i
End Function

Function RAKAMLARIBUL(hucre)
' HÜCRENİN İÇİNDEKİ SAYI OLMAYAN DEĞERLERİ VERİYOR
Dim i As Integer
For i = 10 To Len(hucre)
Sayi = Mid(hucre, i, 1)
If IsNumeric(Sayi) <> True Then
RAKAMLARIBUL = RAKAMLARIBUL & Sayi
End If
Next i
RAKAMLARIBUL = Replace(RAKAMLARIBUL, ",", "")
End Function

B2 hücresine =SAYILARIBUL(A2)
C2 hücresine =RAKAMLARIBUL(A2)

 

[vitamin]

Sn. Halit,

Bu ne kadan mikemmel bir formül yavv...

Emeğine sağlık, teşekkür ederim.

 

[Ergün Güler]

Arkadaşlar, ek'li dosyada ki formül mümkün müdür acaba?

Teşekkürler.

Selam,
Fonksiyonlar ile çözüm ektedir.inceleyiniz.

A sütununuzda herhangi bir değişiklik yapmadım.
Fatura no.dan önce "." ve sonra "," boşluksuz olmak kaydıyla formüller doğru çalışacaktır.
Metin uzunluğu kısalığı FT, FAT, yazması veya hiç yazmaması önemli değildir.
Benzer şekilde de Ünvandan önce ", " bir boşluk ile beraber yazmak kaydıyla herhangi bir sorun yaşamayacaksınız.

İyi çalışmalar

 

[vitamin]

Halit bey, merhaba tekrar.

Sol baştaki numara 4 ralama çıktığında, aşağıdaki şekilde sonuç veriyor.

Yani, 495 yerine, 8495 gibi....

1008 FİŞ.495,CARREFOUR EXPRES 8495 CARREFOUR EXPRES

 

[vitamin]

Sn. Ergün Güler,

Fat/ft/fiş/fş öncesinde ve sonrasında boşluk olmayacak şekilde ayarlayabilir miyiz formülü acaba?

Yani her iki tarafta da boşluk olmayacak şekilde...

Teşekkürler.

 

[halit3]

Halit bey, merhaba tekrar.

Sol baştaki numara 4 ralama çıktığında, aşağıdaki şekilde sonuç veriyor.

Yani, 495 yerine, 8495 gibi....

1008 FİŞ.495,CARREFOUR EXPRES 8495 CARREFOUR EXPRES

For i = 4 To Len(hucre)

yukarıda bölümü aşağıdaki ile değiştirin

For i = 5 To Len(hucre)

 

[Korhan Ayhan]

Selamlar,

Ergün beyin formülünü aşağıdaki şekilde değiştirirseniz boşluklar olmaz.

C2 hücresine;

=KIRP(PARÇAAL($A2;BUL(",";$A2)+1;UZUNLUK($A2)-BUL(",";$A2)))

 

[vitamin]

Arkadaşlar, yardımcı olan herkese teşekkür ederim.

 

[halit3]

örnek dosyanı ekliyorum.

 

[Ergün Güler]

Sn. Ergün Güler,

Fat/ft/fiş/fş öncesinde ve sonrasında boşluk olmayacak şekilde ayarlayabilir miyiz formülü acaba?

Yani her iki tarafta da boşluk olmayacak şekilde...

Teşekkürler.

Selam,
Sorunuzu pek anlayamadım. Sayın Korhan Bey'in 10.sıradaki sunduğu çözümü ben de denedim. sizin verdiğiniz örneklere göre farklı birşey olmadı.
Sorunuzu biraz daha detaylı açar mısınız?

Fat/fiş "boşluk olmayacak şekilde" istiyorsunuz. Zaten örnek dosyanızdaki örneklerde boşluk yok. Yani önünde "." sonunda "," var. Zaten benim sunduğum çözüm "boşluk olmayacak şekilde" ayaralanmıştım.
Tüm örneklerinizi gözden tek tek geçirerek çözüm bulmaya bulduk.
Sizin verdiğiniz örnekler tüm ihtimalleri hesaba katarak olmalıydı.
Bence siz örnekerinizi dediğim gibi çoğaltarak dosyanızı güncelleyiniz.