Hücre içinde isteğe uyarlanmış. Çift tel No girebilmek.

[ikikan]

Arkadaşlar bir hücre gurubuna çift tel girmek zorundayım
isteğe uyarlanmış kodu olan veya bilen varsa yardımlarını bekliyorum.


000 000-####---000 000-####

 

[YUSUF44]

Excelde 15 basamaktan sonrası 0 olarak görünür. Bu nedenle istediğiniz pratikte mümkün değil. Mutlaka aynı hücrede olmaları gerekiyorsa farklı iki hücreye yazıp üçüncü bir hücrede birleştirme yapabilirsiniz. Örneğin aşağıdaki formül E1 ve F1 hücrelerindeki sayıları formülde belirtilen şekilde birleştirir:

=METNEÇEVİR(E1;"0000 000 00 00")&"-"&METNEÇEVİR(F1;"0000 000 00 00")

 

[excelokyanus500]

Şu şekillerde deneyiniz..

1) Telefon numaraları zaten hücrelerde yazılı ve birleştirmek istiyorsanız:

BİRLEŞTİR(A4; DAMGA(10); B4; DAMGA(10); C4)

2) Numaralar mevcut değil ve elle yeni giriyorsanız:

Önce isteğiniz hücreye iki telefonun birincisini yazarak giriniz ve bir boşluk (TAB) oluşturun hücreden çıkmadan ardından Alt + Enter tuşuna basınız ve ikinci numarayı yazınız.
Bu sizin örnek hücreniz olacak.
Diğer hücrelere de bir iki numara arasında bir boşluk olacak şekilde giriş yapın. Giriş işlemi bitince örnek hücrenizi seçin ve biçim boyacını tıklayın(Fırça ikonu). Giriş yaptığınız hücreleri seçerseniz onlarında artık alt alta geldiklerini göreceksiniz.

3) Makro ile yapayım diyorsanız:

Sub HucredeIkiTel()
'Telefonların arası bir boşluk ile girilmiş olmalıdır. İstediğniz kadar 
'telefon numarası yazabilirsiniz hücrelere.
Dim rng As Range: Set rng = Application.Range("A2:A32") 'Kendinizinkini ayarlayın. 
Dim cel As Range
For Each cel In rng.Cells
    With cel
    cel.Replace What:=" ", Replacement:="" & Chr(10) & "", LookAt:=xlPart
    cel.EntireRow.AutoFit
    End With
Next cel
End Sub