excel中如何取身份证的后六位 比如身份证号码在A列,在B1输入公式=RIGHT(A1,6)公式向下复制
Excel如何做一个自动出题表格? 您好,看到这个问题我很兴奋,因为刚刚自己做了一个简单的随机出题的VBA小程序,也是一个VBA小练习,可能对您有帮助,因为无法上传附件,只能简要讲述用法。如果需要源文件,可以私信我。1、新建一个EXCEL工作簿,命名为“随机出题”,将第一个工作表命名为“题库”,新建一个工作表,命名为“试卷”。具体方法请参见如上动图。2、在名为“题库”的工作表中,A列为编号,B列为英文,C列为中文。将题目对应粘贴进去。在名为“试卷”的工作表A1单元格录入“题目”二字作为标题。具体方法请参见如上动图。3、点击【开发工具】→Visual Basic→右键点击插入模块,将下面的代码复制进去。具体方法请参见如上动图。Sub 随机出题()Dim d As Object,arr,rng As Range,arr1,n As Integer,i As Integer,j As Integer,x As LongSet d=CreateObject(\"scripting.dictionary\")x=Application.CountA(Sheets(\"题库\").Range(\"a:a\"))line1:i=InputBox(\"请输入随机出题数量\",\"出题数量\")If i>;x ThenMsgBox(\"数量超出题目总数\"&x&\",请重新输入\")GoTo line1End Ifline2:j=InputBox(\"请输入随机出题类型\",\"出题类型\",\"1为英文,2为中文\")If j<;>;1 And j<;>;2 ThenMsgBox(\"输入内容不符合要求。
EXCEL怎么从数据中截取去自己想要的部分?