根据学籍号计算年龄的问题（谁给我帮忙，谢谢）

15199856373

年龄	学生姓名	学籍号	身份证件号
	学生1	G255122200210292818	5112551970061110
	学生2	G255122200311296631	5112551970061110
	学生3	G255122200401152439	5112551970061110
	学生4	G255122200401172413	5112551970061110
	学生5	G255122200401252413	5112551970061110
	学生6	G255122200402242460	5112551970061110
	学生7	G255122200403152440	5112551970061110
	学生8	G255122200405032418	5112551970061110
	学生9	G255122200405052427	5112551970061110
	学生10	G255122200405092488	5112551970061110
	学生11	G255122200406022414	5112551970061110
	学生12	G255122200408102426	5112551970061110
	学生13	G255122200408152415	5112551970061110
	学生14	G255122200409012430	5112551970061110
	学生15	G255122200410042426	5112551970061110
	学生16	G255122200410082436	5112551970061110
	学生17	G255122200411030216	5112551970061110
	学生18	G25512220041116242X	5112551970061110
	学生19	G255122200412052425	5112551970061110
	学生20	G255122200412102445	5112551970061110
	学生21	G255122200412152418	5112551970061110
	学生22	G255122200501012505	5112551970061110
	学生23	G255122200501012521	5112551970061110
	学生24	G255122200501042413	5112551970061110

15199856373

谁给我帮忙，请高手们帮忙，谢谢

amzxfgh9632

1. =DATEDIF(TEXT(MID(C2,8,8),"0000-00-00"),"2018-08-31","Y")

复制代码

amzxfgh9632

15199856373 发表于 2018-9-26 15:19
谁给我帮忙，请高手们帮忙，谢谢

公式就可以搞定

15199856373

能不能用VBA代码提取年龄？

amzxfgh9632

15199856373 发表于 2018-9-26 16:34
能不能用VBA代码提取年龄？

完全可以，无所不能的VBA

15199856373

输入函数人间很容易搞坏公式，所以我想用VBA代码来写？谢谢

15199856373

请帮忙一下，谢谢

719404338

1. Sub t()
   
2. Dim i%
   
3. For i = 2 To [c65536].End(3).Row
   
4. Range("a" & i) = Year(Now) - Val(Mid(Range("c" & i), 8, 4))
   
5. Next
   
6. End Sub

复制代码

15199856373

非常感谢，学习了