我在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”格式有关。我在这里错过了什么吗?
提前致谢
答案 0 :(得分:5)
需要将句号转换为文本,否则它们将重新读为小数点:
Worksheets("Sheet1").Range("A1").NumberFormat = "###"".""###"".""####"