Birleştir formülünde sıkıntı

[asterix1234]

Merhaba,

birleştir formülü ile işlem yapmak istiyorum, basit gibi gelen şey kabus oldu araştırdım bulamadım.


A B C D E
Adı 2. Adı Soyadı Soyadı 2 Adı Soyadı
Ali Kesen Ali KESEN
Osman Alper Gezer Osman Alper GEZER
Ayşe Nalan Koşucu Erkılıç Ayşe Nalan (Koşucu) ERKILIÇ


Sorun şu ; personelin adını soyadını (A ile D Sütunları arasındaki bilgileri)
E sütunundaki gibi birleştirmek..

Önemli sorunlardan biride şu; =CONCATENATE(A2;" ";B2;" ";C2;" ";D2)
dediğim zaman 2. adı olmayan kişilerin adı soyadı birleştiğinde fazladan boşluk oluyor arada

Nasıl çözebiliriz arkadaşlar yardımcı olurmusunuz ??

 

[Ömer]

Merhaba,

=TRIM(CONCATENATE(A2;" ";B2;" ";C2;" ";D2))

Şeklinde denermisiniz..

 

[uzmanamele]

merhaba
örnek dosya ekleseydiniz daha iyi anlaşılırdı.
birleştir terine birleştira ktf kullanabilirsiniz.

kodları yazan: Yurttaş
Public Function BİRLEŞTİRA(ALAN As Range, Optional sALAN As String = " ") As String
Dim sonuc As String, c As Range
Application.Volatile
On Error GoTo Hata
For Each c In ALAN
If c <> Empty Then sonuc = sonuc & c.Value & sALAN
Next c
sonuc = Left(sonuc, Len(sonuc) - Len(sALAN))
B&#304;RLE&#350;T&#304;RA = sonuc
On Error GoTo 0
Exit Function
Hata:
B&#304;RLE&#350;T&#304;RA = "#Error#"
End Function

a&#351;a&#287;&#305;daki linkte &#246;rne&#287;i var,
http://www.excel.web.tr/showthread.php?t=49919

 

[amelie]

&#246;rnek eklerseniz yard&#305;mc&#305; olmaya &#231;al&#305;&#351;&#305;r&#305;m.Sayg&#305;lar&#305;mla.

 

[asterix1234]

örnek eklerseniz yardımcı olmaya çalışırım.Saygılarımla.

Buyrun dosya Ekte. Teşekkürler.

Mümkünse formül ile çözüm bulmak istiyorum.... macro-vba kullanmak istemiyorum...

 

[Ömer]

Say&#305;n asterix1234,

2. nolu mesajdaki form&#252;l&#252; denemediniz mi?

=KIRP(B&#304;RLE&#350;T&#304;R(A2;" ";B2;" ";C2;" ";D2))

=TRIM(CONCATENATE(A2;" ";B2;" ";C2;" ";D2))

&#304;stedi&#287;iniz sonu&#231; bu de&#287;il mi?

 

[asterix1234]

Sayın asterix1234,

2. nolu mesajdaki formülü denemediniz mi?

=KIRP(BİRLEŞTİR(A2;" ";B2;" ";C2;" ";D2))

=TRIM(CONCATENATE(A2;" ";B2;" ";C2;" ";D2))

İstediğiniz sonuç bu değil mi?

Teşekkürler

1. si göremedim (her ne hikmetse, nasıl bakıyorsam ) :shock:
2. bazen basiret bağlanıyor kırp ile birleştirmek neden aklıma hiç gelmediki ?:dusun:

3. Çok teşekkür ederim siz ve ilgi gösteren tüm arkadaşlarımıza:hey:

 

[LEVTEPE]

Sayın asterix1234

E sütunundaki formülleri kopyalayıp Düzen-özelyapıştır - Değerler ile kaldırın. E sütununu seçip Düzen - değiştirle iki boşluğu bir boşukla değiştirin (Boşluklar ara tuşuyla verilecek). Gerekiyorsa ikinci defa uygulayın