如何获得省份证号码里面的省份信息

1、打开Excel视图－工具栏－控件工具箱，在控件工具箱中，找到“命令按钮”，在表格空白出，画一个命令按钮，。

2、双击刚才画出的命令按钮，进入command_button_click()代码窗口。

3、输入以下代码：For i = 1 To 5　　　‘从第一行开始，到第五行，５是你的实际数据数量Select Case Le熠硒勘唏ft(Sheet1.Cells(i, 1), 2)　’取身份证号码的前两位Case 11　　　　　　　‘１１代表北京Sheet1.Cells(i, 2) = "北京市"Case 12　　　　　　　　’１２代表天津Sheet1.Cells(i, 2) = "天津市"Case 13Sheet1.Cells(i, 2) = "河北省"Case 14Sheet1.Cells(i, 2) = "山西省"Case 15Sheet1.Cells(i, 2) = "内蒙古自治区"Case 21Sheet1.Cells(i, 2) = "辽宁省"Case 22Sheet1.Cells(i, 2) = "吉林省"Case 23Sheet1.Cells(i, 2) = "黑龙江省"Case 31Sheet1.Cells(i, 2) = "上海市"Case 32Sheet1.Cells(i, 2) = "江苏省"Case 33Sheet1.Cells(i, 2) = "浙江省"Case 34Sheet1.Cells(i, 2) = "安徽省"Case 35Sheet1.Cells(i, 2) = "福建省"Case 36Sheet1.Cells(i, 2) = "江西省"Case 37Sheet1.Cells(i, 2) = "山东省"Case 41Sheet1.Cells(i, 2) = "河南省"Case 41Sheet1.Cells(i, 2) = "湖北省"Case 43Sheet1.Cells(i, 2) = "湖南省"Case 44Sheet1.Cells(i, 2) = "广东省"Case 45Sheet1.Cells(i, 2) = "广西壮族自治区"Case 46Sheet1.Cells(i, 2) = "海南省"Case 50Sheet1.Cells(i, 2) = "重庆市"Case 51Sheet1.Cells(i, 2) = "四川省"Case 52Sheet1.Cells(i, 2) = "贵州省"Case 53Sheet1.Cells(i, 2) = "云南"Case 54Sheet1.Cells(i, 2) = "西藏自治"Case 61Sheet1.Cells(i, 2) = "陕西省"Case 62Sheet1.Cells(i, 2) = "甘肃省"Case 63Sheet1.Cells(i, 2) = "青海省"Case 64Sheet1.Cells(i, 2) = "宁夏回族自治区"Case 65Sheet1.Cells(i, 2) = "新疆维吾尔自治区"Case 71Sheet1.Cells(i, 2) = "台湾省"Case 81Sheet1.Cells(i, 2) = "香港特别行政区"Case 91Sheet1.Cells(i, 2) = "澳门特别行政"End SelectNext i　　　‘结束循环

4、关闭代码窗口，点击控件工具栏中的第一个按钮，“退出设计模式”

5、点击刚才画出的按钮，完成任务！