Hücre biçimlendirme

[KuTuKa]

Selamlar

a sütünundaki boşluk veren yine aynı sütunda telefon numaralarını boşluksuz olarak yazmak istiyorum.



a b
bende gözüken istediğim şekil
0312 354 21 39 3123542139
0312 211 03 18 3122110318
0 312 267 44 91 3122674491

 

[İhsan Tank]

Selamlar

a sütünundaki boşluk veren yine aynı sütunda telefon numaralarını boşluksuz olarak yazmak istiyorum.



a b
bende gözüken istediğim şekil
0312 354 21 39 3123542139
0312 211 03 18 3122110318
0 312 267 44 91 3122674491

Merhaba
Formül ile isterseniz

=YERİNEKOY(A1;" ";"")

Bunu
makro ile isterseniz boş bir module kopyalayın

Option Explicit
Sub birleştir_61()
Dim ts, trabzonspor, hamsi As Date
trabzonspor = MsgBox("Verileri Birleştiriyorum", vbYesNo, "Onay")
If trabzonspor = vbNo Then Exit Sub
Application.ScreenUpdating = False
hamsi = Time
For ts = 1 To Cells(Rows.Count, "A").End(xlUp).Row
Cells(ts, "B") = Replace(Cells(ts, "A"), " ", "")
Next
Application.ScreenUpdating = True
MsgBox Format(hamsi - Time, "hh:mm:ss") & vbLf _
& "Sürede İşlem Tamam", , "Bitiş"
End Sub

 

[accountant80]

A1 hücresindeyken, veri sekmesinden metni sütunlara dönüştür derseniz her boşluk olan yerden ayırıp sütunlara bölebilir daha sonra ise başka bir hücrede birleştir formülünü kullanarak hepsini tek hücrede birleştirebilirsiniz.

 

[accountant80]

Ben yazıncaya kadar İhsan Bey 2 çözüm birden göndermiş

 

[KuTuKa]

teşekkürler
yerinekoy formülünü ilkkez kullandım ingilizcesi SUBSTITUTE miş

 

[İhsan Tank]

teşekkürler
yerinekoy formülünü ilkkez kullandım ingilizcesi SUBSTITUTE miş

Rica ederim
İngilizce kullandığınızı farketmemişim.
:keyif: