将单元格值格式化为电话号码格式

时间:2012-05-03 16:16:57

标签: excel-vba vba excel

我在Sheet1的A列中列出了电话号码。目前,他们没有任何格式,存储为:1112223333

我想将它们转换为:111.222.3333

我试过了:

Format(Worksheets("Sheet1").Range("A1").Value, "###.###.####")

给了我“1112223333 ..”

编辑: 当我尝试将其格式化为:

Format(Worksheets("Sheet1").Range("A1").Value, "(###) ###-####")

完美无缺:(111)222-3333

它与我遇到的“111.222.3333”格式有关。我在这里错过了什么吗?

提前致谢

1 个答案:

答案 0 :(得分:5)

需要将句号转换为文本,否则它们将重新读为小数点:

Worksheets("Sheet1").Range("A1").NumberFormat = "###"".""###"".""####"