如何在excel中将身份z号码中间的数字批量转换为XXX

比如号码在A列，在B1输入公式：

=REPLACE(A1,5,LEN(A1)-7,REPT("",LEN(A1)-7))

下拉填充

如果位数都是18位，可以简化

=REPLACE(A1,5,11,REPT("",11))

在EXCEL软件中，快速的将身份z号转换成出生日期，可使用分列功能实现。

方法步骤如下：

1、打开需要 *** 作的EXCEL表格，选中相关单元格，在数据选项卡中找到并点击“分列”。

2、在分列向导1中选择“固定宽度”，然后点击下一步。

3、向导2中，分别在身份z的出身年月日前后点击一下鼠标左键，然后点击右下角的完成即可。

4、返回EXCEL表格，发现已成功将身份z号转换成出生日期。

步骤如下：首先在EXCEL宏编程里新建一函数id15to18(),输入代码：Public Function ID15to18(sCode15 As String) As String Dim i, num As Integer

Dim code As String

num = 0

IDCode = Left(sCode15, 6) + "19" + Right(sCode15, 9)

For i = 18 To 2 Step -1

num = num + (2 ^ (i - 1) Mod 11) (Mid(IDCode, 19 - i, 1))

Next i

num = num Mod 11

Select Case num

Case 0

code = "1"

Case 1

code = "0"

Case 2

code = "X"

Case Else

code = Trim(Str(12 - num))

End Select

IDCode = IDCode + code

End Function 自定义函数ID15to18() ２、保存后直接在EXCEL里调用就可以了。例：A列是15位身份z号　B例要求是18位身份z号　　　A1　　　　　　　　　B1=ID15to18(A1)

身份z号码取出取出生日期，假设A1中是身份z号码，在D1中录入或复制以下公式

=MID(A1,7,8)

或

=MID(A1,7,4)&"年"&MID(A1,11,2)&"月"&MID(A1,13,2)&"日"

即可取出