ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 7651|回复: 13

[求助] 紧急求助老师身份证号有15位或18位怎么设置才能自动录入前面不变的编号数字?

[复制链接]

TA的精华主题

TA的得分主题

发表于 2009-7-5 17:04 | 显示全部楼层 |阅读模式
各位老师,现在我在做农民水稻和玉米良种补贴表,数据量非常大,现遇到录入身份证号的具体问题了:有的农民是18位,前面的8位数字是固定不变的,可以用自定义单元格格式的办法,自动录入前8位,不须手工输入;但麻烦的是,有的农户的身份证号是15位,15位身份证号的前6位数字是固定不变的,18位和15位的身份证号都是在表格的同一列录入,这样设置了18位的单元格自定义格式,15位的身份证号录入时就不能用了,15位身份证号只有前面的6位数字是不变的,18位和15位是间隔录入(即:有时候来登记的农民是18位,有时候来登记的农民是15位),我的要求是:18位身份证号的前8位数字和15位身份证号的前6位数字要自动输入,且在同一列录入,请问老师怎样解决这个问题,因为工作忙,请速帮忙,谢谢!

[ 本帖最后由 yanggeman110 于 2009-7-5 17:22 编辑 ]

TA的精华主题

TA的得分主题

发表于 2009-7-5 17:15 | 显示全部楼层
据我所知,18和15都是前6位不变的。怎么18的是前8位不变呢?例如18位430400196712230315   15位就是430400671223315啊
="430400"&B1

[ 本帖最后由 lhdcxz 于 2009-7-5 17:20 编辑 ]

TA的精华主题

TA的得分主题

发表于 2009-7-5 17:18 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2009-7-5 17:20 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
自定义我倒不会
用宏数倒可以,先在A列输后面不同的
B1=IF(LEN(A1)>9,"XXXXXXXX"&A1,"YYYYYY"&A1)

TA的精华主题

TA的得分主题

 楼主| 发表于 2009-7-5 17:31 | 显示全部楼层
原帖由 lhdcxz 于 2009-7-5 17:15 发表
据我所知,18和15都是前6位不变的。怎么18的是前8位不变呢?例如18位430400196712230315   15位就是430400671223315啊
="430400"&B1

谢谢朋友们帮助!18位身份证是前6位加19,固定不变;15位身份证,是前6位不变,没有19.所以我说18位身份证号是前8位固定不变,15位身份证号是前6位不变

TA的精华主题

TA的得分主题

发表于 2009-7-5 17:36 | 显示全部楼层
原帖由 yanggeman110 于 2009-7-5 17:31 发表

谢谢朋友们帮助!18位身份证是前6位加19,固定不变;15位身份证,是前6位不变,没有19.所以我说18位身份证号是前8位固定不变,15位身份证号是前6位不变

只固定六位,18位的多输两位不就行了,要不就用VBA

TA的精华主题

TA的得分主题

发表于 2009-7-5 17:44 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
哈哈哈哈,难道就 没有2000后的农民了?

TA的精华主题

TA的得分主题

 楼主| 发表于 2009-7-5 17:49 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
原帖由 987654321 于 2009-7-5 17:36 发表

只固定六位,18位的多输两位不就行了,要不就用VBA

谢谢帮助!只固定六位?怎么设置自定义单元格格式?18位号应当自定义成:“43215619”0000000000,15位的应当定义成:“432156”000000000,只能定义一个呀,我不懂VBA,有没有简便一点的方法

TA的精华主题

TA的得分主题

发表于 2009-7-5 17:58 | 显示全部楼层
曲线救国:这样可行?(18位需要录入10个数字,15位需要录入9个)
A2录入
B2:10110119(前8位)
=IF(LEN(A2)=10,$B$2&A2,LEFT($B$2,6)&A2)

[ 本帖最后由 npwz0427 于 2009-7-5 18:00 编辑 ]

TA的精华主题

TA的得分主题

发表于 2009-7-5 18:01 | 显示全部楼层
原帖由 yanggeman110 于 2009-7-5 17:49 发表

谢谢帮助!只固定六位?怎么设置自定义单元格格式?18位号应当自定义成:“43215619”0000000000,15位的应当定义成:“432156”000000000,只能定义一个呀,我不懂VBA,有没有简便一点的方法

自定义格式:"432156"0
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-4-27 06:25 , Processed in 0.039777 second(s), 10 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表