Amerika Birleşik Devletleri'nde, bir Sosyal Güvenlik numarası (SSN), ABD vatandaşlarına, daimi sakinlere ve geçici (çalışan) sakinlere verilen dokuz haneli bir sayıdır. Numara, Amerika Birleşik Devletleri hükümetinin bağımsız bir kurumu olan Sosyal Güvenlik İdaresi tarafından bir bireye verilir. Birincil amacı bireyleri Sosyal Güvenlik amaçlarıyla takip etmek olsa da, Sosyal Güvenlik numarası vergilendirme ve diğer amaçlar için fiili bir ulusal kimlik numarası haline gelmiştir.
Sosyal Güvenlik numaralarının (SSN) aynı biçimde olmadığı, yani bazılarının metin, sayısal ve genel olduğu veya tire içerebileceği çalışan listeleri alırsanız. Kısa çizgileri kaldırmak için Bul ve Değiştir komutunu veya CTRL + H kısayol tuşunu kullanabilirsiniz.
Bir numarayı Sosyal Güvenlik numarası olarak biçimlendirebilirsiniz. Örneğin, 9 basamaklı bir sayı olan 123456789'u 123-45-6789 olarak biçimlendirebilirsiniz.
Bu yazıda, VBA kodunu kullanarak sayıları SSN formatında nasıl dönüştüreceğimizi öğreneceğiz.
Soru: Bir sosyal güvenlik numarası listem var ve hepsini VBA kodunu kullanarak verilen biçime (000-00-0000) dönüştürmek istiyorum.
Sayıları SSN formatına dönüştürmek için VB editörünü başlatmak için aşağıdaki adımları izlememiz gerekiyor:
- Geliştirici sekmesine tıklayın
- Kod grubundan Visual Basic'i seçin
- Aşağıdaki kodu standart modüle kopyalayın
Sub SSN_Format() Dim r As Range Application.ScreenUpdating = False With Range("A1").CurrentRegion For Her r In .Cells with r .Value = Application.Text(.Value, "000-00-0000") End With Sonraki r Application.ScreenUpdating İle Sonlandır = True End Sub
- Makroyu çalıştıracağız ve gerekli formatta SSN'yi alacağız; aşağıdaki anlık görüntüye bakın:
Çözüm: Bu sayede sosyal güvenlik numaralarını uygun formatta görüntülemek için excel formatı özelliğini kullanabiliriz.
Bloglarımızı beğendiyseniz, Facebook'ta arkadaşlarınızla paylaşın. Ayrıca bizi Twitter ve Facebook'ta da takip edebilirsiniz.
Sizden haber almayı çok isteriz, işimizi nasıl iyileştirebileceğimizi, tamamlayabileceğimizi veya yenileyebileceğimizi ve sizin için daha iyi hale getirebileceğimizi bize bildirin. Bize e-posta sitesinde yazın
