如图,单元格A1中为一全角数字身份证号
我们可以用asc公式改为半角数字,在B1单元格中输入“=asc(a1)”
回车后数字格式已转变完成。
B2单元格中:
=ASC(A2)
下拉公式。假设身份证号码在A列。
你是想换成数字格式吧
那就显示不全了
位数太多
'对各表运行下面的宏
Sub Macro2()
Selection.SpecialCells(xlCellTypeConstants, 23).Select
For Each cl In Selection
cl.Value = Application.WorksheetFunction.Asc(cl)
Next
End Sub
用ASC()函数 加个辅助列