hücreden sayılar ile metni ayırabilme

Katılım
20 Ocak 2010
Mesajlar
15
Excel Vers. ve Dili
exel2007 türkçe
slm
ben sistemden rapor çektiğim zaman isimler ve tel noları aynı hücrede çıkıyor bunu ayırmak için ne yapabilirim sağdan ve soldan formüllerini denedim isim ve numaralar aynı sayıda olmadıkları için olmuyor bana yan hücrede sadece rakamları çıkaracak bir formül lazım teşekkürr ederim
 

leumruk

Uzman
Uzman
Katılım
15 Nisan 2007
Mesajlar
3,471
Excel Vers. ve Dili
Office 2010 & 2013 tr
slm
ben sistemden rapor çektiğim zaman isimler ve tel noları aynı hücrede çıkıyor bunu ayırmak için ne yapabilirim sağdan ve soldan formüllerini denedim isim ve numaralar aynı sayıda olmadıkları için olmuyor bana yan hücrede sadece rakamları çıkaracak bir formül lazım teşekkürr ederim
Merhaba,
Örnek bir dosya ekleyiniz.
 

uzmanamele

Uzman
Uzman
Katılım
26 Eylül 2007
Mesajlar
9,421
Excel Vers. ve Dili
excel 2010
merhaba
bu işinizi görür mü?

A1 hücrede uzmanamele 03121234567 şeklindeyse
Kod:
=ARA(9,99999999999999E+307;--SAĞDAN(A1;SATIR($A$1:$A$1024)))
A2 hücrede 03121234567 uzmanamele şeklindeyse
Kod:
=ARA(9,99999999999999E+307;--SOLDAN(A2;SATIR($A$1:$A$1024)))
not:
syn Ali beyden (ç)alıntıdır.
 
Katılım
20 Ocak 2010
Mesajlar
15
Excel Vers. ve Dili
exel2007 türkçe
teşekkürler formül normalde işe yarayacak fakat benim raporun bazı rakamlaerında boşluk ve - var onlar olması nedeni ile formül işe yaramıyor ekte ki dosyayı inceleyebilirsiniz
 

Ekli dosyalar

leumruk

Uzman
Uzman
Katılım
15 Nisan 2007
Mesajlar
3,471
Excel Vers. ve Dili
Office 2010 & 2013 tr
Merhaba,
Örneği deneyiniz.
Kod:
Sub Ayir()
For i = 1 To [a65536].End(3).Row
For x = 1 To Len(Cells(i, 1))
deg = Mid(Cells(i, 1), x, x)
If Val(deg) Then
Cells(i, 2) = Mid(Cells(i, 1), 1, x - 1)
Cells(i, 3) = LTrim(Mid(Cells(i, 1), x, Len(Cells(i, 1))))
GoTo Atla
End If
Next
Atla:
Next
End Sub
 

Ekli dosyalar

Ali

Özel Üye
Katılım
21 Temmuz 2005
Mesajlar
7,924
Excel Vers. ve Dili
İş:Excel 2016-Türkçe
teşekkürler formül normalde işe yarayacak fakat benim raporun bazı rakamlaerında boşluk ve - var onlar olması nedeni ile formül işe yaramıyor ekte ki dosyayı inceleyebilirsiniz
O zaman sizde Süleyman Bey'in önerdiği formülü

=ARA(9,99999999999999E+307;--SAĞDAN(YERİNEKOY(YERİNEKOY(A2;" ";"");"-";"");SATIR($A$1:$A$1024)))

şeklinde kullanırsınız.

.
 
Katılım
20 Ocak 2010
Mesajlar
15
Excel Vers. ve Dili
exel2007 türkçe
teşekkür ederim süper oldu peki aynı şekilde aynı hücre içerisindeki sayı ve metinlerden sadece metni ayırabilirmiyiz...
 

Ali

Özel Üye
Katılım
21 Temmuz 2005
Mesajlar
7,924
Excel Vers. ve Dili
İş:Excel 2016-Türkçe
teşekkür ederim süper oldu peki aynı şekilde aynı hücre içerisindeki sayı ve metinlerden sadece metni ayırabilirmiyiz...

B2 hücresine

=YERİNEKOY(A2;DEĞİŞTİR(A2;1;MİN(MBUL({0;1;2;3;4;5;6;7;8;9};A2&"0123456789"))-1;"");"")

yazıp aşağı doğru çekiniz.

.
 
Katılım
20 Ocak 2010
Mesajlar
15
Excel Vers. ve Dili
exel2007 türkçe
B2 hücresine

=YERİNEKOY(A2;DEĞİŞTİR(A2;1;MİN(MBUL({0;1;2;3;4;5;6;7;8;9};A2&"0123456789"))-1;"");"")

yazıp aşağı doğru çekiniz.

.
teşekkür ederim çok süper olmuş.. elinize ve beyninize sağlık :)
 
Üst