VBA – 数字格式社会安全号
在美国,社会安全号码(SSN)是发给美国公民,永久居民和临时(在职)居民的9位数字。该号码由美国政府的独立机构社会保障局(Social Security Administration)发布给个人。尽管其主要目的是为了跟踪社会保障目的的个人,但是社会保障号码已成为事实上的用于税务和其他目的的身份证号码。
如果您收到员工名单,其中的社会保险号(SSN)
格式不同,即某些格式是文本,数字和常规,或可能带有破折号。为了删除破折号,您可以简单地使用“查找和替换”命令或使用快捷键CTRL +H。您可以将数字格式化为社会安全号码。例如,您可以将9位数字123456789格式化为123-45-6789。
在本文中,我们将学习如何使用VBA代码转换SSN格式的数字。
问题:我有一个社会保险号列表,我想使用VBA代码将它们全部转换为给定格式:(000-00-0000)。
为了将数字转换为SSN格式,我们需要按照以下步骤启动VB编辑器:
单击“开发人员”选项卡。从“代码”组中选择“ Visual Basic”
-
将以下代码复制到标准模块中
-
我们将运行宏,并以所需的格式获取SSN;请参阅下面的快照:
Sub SSN_Format() Dim r As Range Application.ScreenUpdating = False With Range("A1").CurrentRegion For Each r In .Cells With r .Value = Application.Text(.Value, "000-00-0000") End With Next r End With Application.ScreenUpdating = True End Sub
结论:这样,我们可以使用excel格式功能以正确的格式显示社会保险号。
如果您喜欢我们的博客,请在Facebook上与您的朋友分享。您也可以在Twitter和Facebook上关注我们。
我们很高兴收到您的来信,请让我们知道我们如何改进,补充或创新我们的工作,并为您做得更好。写信给我们[email protected]