Excel精华版整理从身份证号码中提取性别Q:A1单元格中是15位的身份证号码,要在B1中显示性别(这里忽略15位和18位身份证号码的判别)B1=if(mod(right(A1,1),2)>0,"male","female")请问这个公式有无问题,我试过没发现问题。
但在某个网站看到作者所用的是如下公式:B1=if(mid(A1,15,1)/2=trunc(mid(A1,15,1)/2),"female","male")提取性别(无论是15位还是18位)=IF(LEN(A1)=15,IF(MOD(MID(A1,15,1),2)=1,"男","女"),IF(MOD(MID(A1,17,1),2)=1,"男","女"如果身份证号的输入已是15或18位,用公式=IF(MOD(LEFT(RIGHT(A1,(LEN(A1)=18)+1)),2),"男","女"xls--->exe可以么?如果只是简单的转换成EXE,当然可以。
如果你指的是脱离Excel也可以运行,好像没听说过可以。
当然,通过DDE,是可以不运行Excel但调用它的所有功能的,但前提仍然是你的计算机上已经安装了Excel列的跳跃求和若有20列(只有一行),需没间隔3列求和,该公式如何做?前面行跳跃求和的公式不管用。
假设a1至t1为数据(共有20列),在任意单元格中输入公式:=SUM(IF(MOD(TRANSPOSE(ROW(1:20)),3)=0,(a1:t1))按ctrl+shift+enter结束即可求出每隔三行之和。
跳行设置:如有12行,需每隔3行求和=SUM(IF(MOD((ROW(1:12)),3)=0,(A1:A12)))能否象打支票软件那样输入一串数字它自动给拆分成单个数字?如我输入123456.52它自动给拆成¥1 2 3 4 5 6 5 2 的形式并且随我输入的长度改变而改变?我所知函数不多,我是这样做的,如有更方便的方法,请指点例如:在A1输入小写金额,则:千万:B1=IF(A1>=10000000,MID(RIGHTB(A1*100,10),1,1),IF(A1>=1000000,"¥",0))百万:C1=IF(A1>=1000000,MID(RIGHTB(A1*100,9),1,1),IF(A1>=100000,"¥",0))十万:D1=IF(A1>=100000,MID(RIGHTB(A1*100,8),1,1),IF(A1>=10000,"¥",0))万:E1=IF(A1>=10000,MID(RIGHTB(A1*100,7),1,1),IF(A1>=1000,"¥",0))千:F1=IF(A1>=1000,MID(RIGHTB(A1*100,6),1,1),IF(A1>=100,"¥",0))百:G1=IF(A1>=100,MID(RIGHTB(A1*100,5),1,1),IF(A1>=10,"¥",0))十:H1=IF(A1>=10,MID(RIGHTB(A1*100,4),1,1),IF(A1>=1,"¥",0))元:I1=IF(A1>=1,MID(RIGHTB(A1*100,3),1,1),IF(A1>=0.1,"¥",0))角:J1=IF(A1>=0.1,MID(RIGHTB(A1*100,2),1,1),IF(A1>=0.01,"¥",0))分:K1=IF(A1>=0.01,RIGHTB(A1*100,1),0)公式中最后一个0改为""如何编这个公式我想编的公式是: a/[84 - (b×4)]其中a是一个数值,小于或等于84;b是包含字符C的单元格的个数;C是一个符号。
这个公式的关键是要统计出包含字符C的单元格的个数,可我不会。
dongmu=a/(84-countif(b,"=c")*4)我试了一下,不能运行,我想是因为没有指定出现“c”的单元格的范围。
比如说“c”在D2-D30中随机出现,在上述公式中要先统计出出现“c”的单元格的个数。
这个公式如何做?再一次感谢!受dongmu朋友公式的启发,我做出了需要的公式=a/(84-COUNTIF(D3:D30,"c")*4)skysea575 :其中a是一个数值,小于或等于84;b是包含字符C的单元格的个数;C是一个符号。
"包含字符C"在这里的意思不清楚。
你的公式中只可以计算仅含有“C”字符的单元格数。
可能你的想法是计算字符中凡是含有这个字或字母的词。
如“文章”和“文字”中都有一个“文”字,是否计算在内?将文件保存为以某一单元格中的值为文件名的宏怎么写假设你要以Sheet1的A1单元格中的值为文件名保存,则应用命令:ActiveWorkbook.SaveCopyAs Str(Range("Sheet1!A1")) + ".xls"IE中实现链接EXCEL表我想在IE中实现链接EXCEL表并打开后可填写数据,而且可以实现数据的远程保存(在局域网内的数据共享更新),我的设想是在NT中上提供电子表格服务,各位局域网内用户在IE浏览器中共享修改数据,请问我该如何操作才能实现这一功能。
我是初学者,请尽量讲得详细一点。
<a href="C:\mm.xls" target="x"> mm.xls</a><a href="" target="x">桌面</a><iframe name="x" width=780 height=400></iframe>**************************************************************貼到計事本- 存為Home.htm擺桌面上- 設為共享- 區域網路其他電腦設捷徑連結Home.htm懂這三行字的結構,即可寫出網頁資料庫系統其中每個字都是[物件名稱]檔案多了改用<Frame>這個元件要設幾個框隨便您EXCEL中求两陈列的对应元素乘积之和Q:即有简结一点的公式求如:a1*b1+a2*b2+b3*b3...的和.应有一函数XXXX(A1:A3,B1:B3)或XXXX(A1:B3)A:roof在B4中输入公式"=SUM(A1:A3*B1:B3)",按CTRL+SHIFT+ENTER结束.dongmu=SUMPRODUCT(A1:A10,B1:B10)求助日期转换星期的问题Q:工作中须将表格中大量的日期同时转换为中英文的星期几请问如何处理英文的星期转换,谢谢!A:Rowen1.用公式:=text(weekday(xx),"ddd")2.用VBA,weekday(),然后自定义转换序列3.用"拼写检查",自定义一级转换序列4....dongmu转成英文: =TEXT(WEEKDAY(A1),"dddd")转成中文: =TEXT(WEEKDAY(A1),"aaaa")研究彩票,从统计入手Q:我有一个VBA编程的问题向你请教。
麻烦你帮助编一个。
我一定厚谢。
有一个数组列在EXCEL中如: 01 02 03 04 05 06 07和01 04 12 19 25 26 3202 08 15 16 18 24 2801 02 07 09 12 15 2209 15 17 20 22 29 32比较,如果有相同的数就在第八位记一个数。
如01 04 12 19 25 26 32 202 08 15 16 18 24 28 101 02 07 09 12 15 22 209 15 17 20 22 29 32 0这个数列有几千组,只要求比较出有几位相同就行。
我们主要研究彩票,从统计入手。
如果你有兴趣我会告诉你最好的方法。
急盼。
A:roof把“01 02 03 04 05 06 07 ”放在表格的第一行,“01 04 12 19 25 26 32 2”放第二行。
把以下公式贴到第二行第八个单元格“A9”中,按F2,再按CTRL+SHIFT+ENTER.=COUNT(MATCH(A2:G2,$A$1:$G$1,0))如何自动设置页尾线条?Q:各位大虾:菜鸟DD有一难题请教,我的工作表通常都很长,偏偏我这人以特爱美,所以会将表格的外框线和框内线条设置为不同格式,但在打印时却无法将每一页的底部外框线自动设为和其他三条边线一致,每次都必须手工设置(那可是几十页哦!),而且如果换一台打印机的话就会前功尽弃,不知哪位大侠可指教一两招,好让DD我终生受用,不胜感激!A:roof打印文件前试试运行以下的代码。
打印后关闭文件时不要存盘,否则下次要把格式改回来就痛苦了。
(当然你也可以另写代码来恢复原来的格式):Sub detectbreak()mycolumn = Range("A1").CurrentRegion.Columns.CountSet myrange = Range("A1").CurrentRegionFor Each mycell In myrangeSet myrow = mycell.EntireRowIf myrow.PageBreak = xlNone ThenGoTo NexElseSet arow = Range(Cells(myrow.Offset(-1).Row, 1), Cells(myrow.Offset(-1).Row, mycolumn))With arow.Borders(xlEdgeBottom).LineStyle = xlDouble '把这一行改成自己喜欢的表线.Weight = xlThick.ColorIndex = xlAutomaticEnd WithEnd IfNex: Next mycellEnd Sub求工齡A:老夏=DATEDIF(B2,TODAY(),"y")=DATEDIF(B2,TODAY(),"ym")=DATEDIF(B2,TODAY(),"md")=DATEDIF(B2,TODAY(),"y")&"年"&DATEDIF(B2,TODAY(),"ym")&"月"&DATEDIF(B2,TODAY(),"md")&"日"********************************************************DATEDIF() Excel 2000 可以找到說明 Excel 97 沒有說明是個暗槓函數如何用excel求解联立方程:Q:x-x(7/y)^z=68 x-x(20/y)^z=61 x-x(30/y)^z=38到底有人会吗?不要只写四个字,规划求解,我想要具体的解法,A:wenou这是一个指数函数的联列方程。