Hücre içerisindeki metinlerin bir kısmını silmek

hadromer

Altın Üye
Katılım
23 Ekim 2015
Mesajlar
402
Excel Vers. ve Dili
LTSC Professional Plus 2021 64 Bit Türkçe
Altın Üyelik Bitiş Tarihi
26-04-2028
Merhabalar,
Öncelikle herkese sağlıklı günler dilerim.
A sütununda 15bin hücreden oluşan bir dosyam var. Bu hücre içerisinde latince isimler yer almaktadır. Hücre içerisinde yer alan bu isimlerin bir kısmını silmem gerekiyor. Fakat iyi ayrı kuralımız var.
1- Eğer hücre içerisinde "var." ifadesi yoksa ilk iki isimden sonrası silinmeli
2-Eğer hücre içerisinde "var." ifadesi varsa ilk iki kelime ile "var+isim1" arası ve "var+isim1"den sonrası silinmeli. bu konuda yardımcı olursanız çok sevinirim. Teşekkürler..
Örnek Fotoğraf ve Örnek Dosya : DOWNLOAD
 
Son düzenleme:

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,738
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Deneyiniz.

C++:
=EĞER(EHATALIYSA(MBUL("var.";A2));SOLDAN(A2;BUL(" ";A2;BUL(" ";A2)+1)-1);SOLDAN(A2;BUL(" ";A2;BUL(" ";A2)+1)-1)&" "&PARÇAAL(A2;MBUL("var.";A2);BUL(" ";A2;MBUL("var.";A2)+5)-MBUL("var.";A2)))
 

hadromer

Altın Üye
Katılım
23 Ekim 2015
Mesajlar
402
Excel Vers. ve Dili
LTSC Professional Plus 2021 64 Bit Türkçe
Altın Üyelik Bitiş Tarihi
26-04-2028
Deneyiniz.

C++:
=EĞER(EHATALIYSA(MBUL("var.";A2));SOLDAN(A2;BUL(" ";A2;BUL(" ";A2)+1)-1);SOLDAN(A2;BUL(" ";A2;BUL(" ";A2)+1)-1)&" "&PARÇAAL(A2;MBUL("var.";A2);BUL(" ";A2;MBUL("var.";A2)+5)-MBUL("var.";A2)))
Çok teşekkür ederim, tam istediğim gibi çalıştı.
 

hadromer

Altın Üye
Katılım
23 Ekim 2015
Mesajlar
402
Excel Vers. ve Dili
LTSC Professional Plus 2021 64 Bit Türkçe
Altın Üyelik Bitiş Tarihi
26-04-2028
Deneyiniz.

C++:
=EĞER(EHATALIYSA(MBUL("var.";A2));SOLDAN(A2;BUL(" ";A2;BUL(" ";A2)+1)-1);SOLDAN(A2;BUL(" ";A2;BUL(" ";A2)+1)-1)&" "&PARÇAAL(A2;MBUL("var.";A2);BUL(" ";A2;MBUL("var.";A2)+5)-MBUL("var.";A2)))
Merhaba,
Kod ilk başlarda çok güzel çalışıyordu ama şimdi fotoğraftaki gibi çalışıyor. Rica etsem yardımcı olabilir miisniz ?

 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,738
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Sorun boşluk gibi görünen karakterlerin farklı olmasından kaynaklanıyor.

Bunları değiştirerek sorun aşılabilir. Formül biraz uzamış oldu.

Deneyiniz.

C++:
=EĞER(EHATALIYSA(MBUL("var.";A2));SOLDAN(A2;BUL(" ";YERİNEKOY(A2;DAMGA(160);DAMGA(32));BUL(" ";YERİNEKOY(A2;DAMGA(160);DAMGA(32)))+1)-1);SOLDAN(A2;BUL(" ";YERİNEKOY(A2;DAMGA(160);DAMGA(32));BUL(" ";YERİNEKOY(A2;DAMGA(160);DAMGA(32)))+1)-1)&" "&PARÇAAL(A2;MBUL("var.";A2);BUL(" ";YERİNEKOY(A2;DAMGA(160);DAMGA(32));MBUL("var.";A2)+5)-MBUL("var.";A2)))
 

hadromer

Altın Üye
Katılım
23 Ekim 2015
Mesajlar
402
Excel Vers. ve Dili
LTSC Professional Plus 2021 64 Bit Türkçe
Altın Üyelik Bitiş Tarihi
26-04-2028
Çok teşekkür ederim Sn. Korhan Ayhan, yeni yıl hediyesi gibi oldu:)
 
Üst