Telefon numaralarınızı bir uzantı ile biçimlendirmeniz gerekebilir, bunu Excel'in yerleşik özelliklerini ve formüllerini kullanarak kolayca yapabilirsiniz. Bu makalede, aşağıdakiler hakkında bilgi edineceğiz Excel Telefon Numarası Formatı ile Uzatma kolay formüller ve özellikler kullanarak.

Burada şu özelliklere sahip bir veri kümemiz var İsimler & Telefon Numaraları . Şimdi biz Telefon Numaralarını Biçimlendirme ile Uzatma bu veri setini kullanarak.

Alıştırma Çalışma Kitabını İndirin

Excel'de Telefon Numarasını Uzantıyla Biçimlendirmenin 3 Yolu

1. Telefon Numarasını Uzantı ile Biçimlendirmek için Özel Biçim Özelliğinin Kullanımı

Kullanarak Özel format Özelliği Yapabilirsin. Biçim ve telefon numarası ile Uzatma .

Burada, bazı telefon numaraları var ve size nasıl yapacağınızı göstereceğim Biçim bunlar sayılar .

Bunu yapmak için,

• İlk olarak, kullanılacak hücreyi veya hücre aralığını seçin Özel Format .
• Burada, şu aralığı seçtim C5:C10 .
• Şimdi, sağ tıklayın üzerinde fare açmak için Bağlam Menüsü .
• Daha sonra şunları seçin Hücreleri Biçimlendir .

A iletişim kutusu . Hücreleri Biçimlendir görünecek.

• Oradan seçin Özel sonra Tip yerleştirin Biçim numaralarınıza uygulamak istiyorsunuz.
• Burada, ben kullandım (###) ###-### "ext" ##
• Son olarak tıklayın TAMAM. .

Sonuç olarak, şunları elde edeceksiniz Telefon Numaraları ile Uzatma .

Daha fazlasını okuyun: Excel'de Telefon Numarası Nasıl Yazılır (Mümkün Olan Her Şekilde)

2. Excel Birleşik İşlevlerini Kullanarak Telefon Numarasını Uzantı ile Biçimlendirme

Eğer isterseniz SOL ve MID fonksiyonları Telefon Numaralarını Biçimlendirme ile Uzatma .

Size prosedürü açıklayayım,

• Başlamak için, yerleştirmek üzere seçtiğiniz hücreyi seçin. sonuç değer.
• Burada, hücreyi seçtim D5 .
• Şimdi, aşağıdaki formülü D5 hücresine veya Formül Bar .

Burada, şu kombinasyonu kullandım SOL ve MID fonksiyonlar.

Formül Dağılımı

• "("&LEFT(C5,3)&")--> Bu SOL fonksiyonu geri dönecektir 3 karakterleri sol taraf .
  • Çıktı: 101

• "("&LEFT(C5,3)&")--> İşte, burada Ampersand (&) ekleyecektir Parantez .
  • Çıktı: "(101)"
• MID(C5,4,3)--> Bu MID fonksiyonu geri dönecektir 3 karakterleri orta 'den başlayarak seçilen sayının Dördüncü karakter.
  • Çıktı: "345"
• MID(C5,7,4)--> Bu olur
  • Çıktı: "6789"
• MID(C5,11,99)--> Dönüşüyor
  • Çıktı: "6"
• " ext"&MID(C5,11,99)-->
• " ext"&6--> İşte, burada Ampersand (&) metni birleştirir ext numarası ile 6 .
  • Çıktı: " ext6″
• "("&LEFT(C5,3)&")"&MID(C5,4,3)&"-"&MID(C5,7,4)&" ext"&MID(C5,11,99)

• “(“&101)&”)”&345&”-“&6789)&” ext”&6
  • Çıkış: (101)345-6789 ext6
  • Açıklama: Burada, kullanarak Ampersand (&) ile sayıların farklı biçimlerini birleştirin Uzatma .

Şimdi, basın GİRİŞ ile beklenen telefon numarası biçimini almak için Uzatma .

• Burada, aşağıdakileri kullanabilirsiniz Doldurma Kolu için Otomatik Doldurma hücrelerin geri kalanı için formül.

Daha Fazla Oku: Excel'de Ülke Kodu ile Telefon Numarası Nasıl Biçimlendirilir (5 Yöntem)

3. Telefon Numarasını Uzantı ile Biçimlendirmek için VBA Kullanma

Aynı zamanda Visual Basic Uygulaması (VBA) için Telefon Numaralarını Biçimlendirme ile Uzatma . Burada, ben bir Özel Alt üzerinde uygulanacak olan Levha .

Size prosedürü açıklayayım,

İlk önce Geliştirici sekmesini>> ardından Visual Basic.

Ardından, yeni bir pencere açacaktır Uygulamalar için Microsoft Visual Basic .

• Şimdi, seçin Levha çünkü bu bir Özel Alt .

• Ardından, şunları seçin Çalışma Sayfası gelen Genel .

• Ardından, şunları seçin Değişim itibaren Beyannameler.

Şimdi, aşağıdaki kodu Levha .

 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column 1 Then Exit Sub If Target.Count> 1 Then Exit Sub If Len(Target) = 8 Then With Target Application.EnableEvents = False .Value = "(" & Left(.Value, 3) & ") " & Mid(.Value, 4, 3) & "-" & "ext" & Right(.Value, 2) Application.EnableEvents = True Exit Sub End With EndIf Len(Hedef) = 10 Then With Target Application.EnableEvents = False .Value = "(" & Left(.Value, 3) & ") " & Mid(.Value, 4, 4) & "-" & "ext" & Right(.Value, 3) Application.EnableEvents = True Exit Sub End With End If If Len(Hedef) = 12 Then With Target Application.EnableEvents = False .Value = "(" & Left(.Value, 3)& ") " & Mid(.Value, 4, 3) & "-" & Mid(.Value, 7, 4) & _ "-" & "ext" & Right(.Value, 3) Application.EnableEvents = True Exit Sub End With End If End Sub 

Burada, ben bir Private Sub Worksheet_Change(ByVal Target As Range) 'deki her yeni girişi kontrol edeceği Çalışma Sayfası koşulunu yerine getirip getirmediği Hedef (Len) .. sayı koşulunu karşılıyorsa Telefon Numarası ile biçim alacaktır. Uzatma .

Kod Dökümü

• Burada, ben kullandım çoklu IF ifadeleri için formatı yazdım. 8,10, ve 12 Rakamlar, İhtiyacınıza göre değiştirebilirsiniz.
• Daha sonra Değer hücreyi seçmek için Değer sonra da VBA Sol ve Orta fonksiyonlarını vermek için Biçim benim seçimim.

Not: Kod sütun için çalışacaktır A .

• Şimdi, Kaydet koduna geri dönün ve çalışma sayfası .
• Buraya şunu yazdım 8 basamaklı içindeki sayı A1 Hücre.

Ardından, tuşuna basın GİRİŞ ile seçtiğiniz formatı elde etmek için Uzatma .

İşte, burada Biçim 3 tip rakamdan oluşur.

Daha fazlasını okuyun: Telefon Numarası Formatını Değiştirmek için Excel Formülü (5 Örnek)

Uygulama Bölümü

Burada, açıklanan yöntemi uygulayabilmeniz için bir alıştırma sayfası sağladım.

Sonuç

Açıklamaya çalıştım. 3 kolay ve hızlı yollar telefon numarasını biçimlendir ile uzatma Bu farklı yollar, her tür sayıyı biçimlendirmenize yardımcı olacaktır. Son olarak, herhangi bir öneriniz, fikriniz veya geri bildiriminiz varsa lütfen aşağıya yorum yapmaktan çekinmeyin.