日期函数_百度文库
您的浏览器Javascript被禁用，需开启后体验完整功能，
享专业文档下载特权
&赠共享文档下载特权
&10W篇文档免费专享
&每天抽奖多种福利
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
&&日期函数
阅读已结束，下载本文需要
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，同时保存到云知识，更方便管理
加入VIP
还剩3页未读，
定制HR最喜欢的简历
你可能喜欢 上传我的文档
 上传文档
 下载
 收藏
粉丝量：83
该文档贡献者很忙，什么也没留下。
 下载此文档
excel中公式
下载积分：500
内容提示：excel中公式
文档格式：PDF|
浏览次数：44|
上传日期： 02:38:25|
文档星级：
全文阅读已结束，如果下载本文需要使用
 500 积分
下载此文档
该用户还上传了这些文档
excel中公式
关注微信公众号> 问题详情
在Excel2010中，对工作表中公式单元格复制时，____。A.其公式中的绝对引用和相对引用都不变B.其
悬赏：0&答案豆
提问人：匿名网友
发布时间：
在Excel2010中，对工作表中公式单元格复制时，____。A.其公式中的绝对引用和相对引用都不变B.其公式中的绝对引用和相对引用都会自动调整C.其公式中的绝对引用不变，相对引用自动调整D.其公式中的绝对引用自动调整，相对引用不变
为您推荐的考试题库
您可能感兴趣的试题
1在Word中，_______的作用是能在屏幕上显示所有文本内容。A.标尺B.控制框C.最大化按钮D.滚动条2在Word中，如果当前光标在表格中某行的最后一个单元格的外框线上，按Enter键后，_____。A.光标所在行加高B.光标所在列加宽C.在光标所在行下增加一行D.对表格不起作用3打开窗口的控制菜单的操作可以单击控制菜单框或者_________。A.按【Ctrl】+【Space】B.双击标题栏C.按【Shift】+【Space】D.按【Alt】+【Space】4一个磁盘格式化后，盘上的目录情况是_____。A.多级树形目录B.一级子目录C.只有根目录D.没有目录，需要用户建立
我有更好的答案
请先输入下方的验证码查看最佳答案
图形验证：
验证码提交中……
每天只需0.4元
选择支付方式
支付宝付款
郑重提醒：支付后，系统自动为您完成注册
请使用微信扫码支付(元)
支付后，系统自动为您完成注册
遇到问题请联系在线客服QQ：
恭喜你被选中为
扫一扫-免费查看答案！
请您不要关闭此页面,支付完成后点击支付完成按钮
遇到问题请联系在线客服QQ：
恭喜您！升级VIP会员成功
提示：请截图保存您的账号信息，以方便日后登录使用。
常用邮箱：
用于找回密码
确认密码：EXCEL中如何实现角度度分秒的输入以及数据处理？
EXCEL中如何实现角度度分秒的输入以及数据处理？
09-02-25 &
实话哦！我炒的，但很有用啊！1、SOS,如何解决EXCEL日期的2000年问题 各位老大，我想对一段数字进行编辑改成日期形式,如011211，前两位作为年，中间两位作为月份，最后两位作为日，导成****-**-**,可是怎么老是显示，（大家知道，我想要的是）假设 A1单元格数据为：011211=DATE(&20&&LEFT(A1,2),MID(A1,3,2),RIGHT(A1,2)) 2、还没解决的四舍六入的有效数字取舍的问题，请细看条件答复我。谢谢！ 其实四舍六入，我想你们是理解了的最后一位是4舍去，是6时向前进一位再舍去。最关间的是奇进偶舍，奇进偶舍分两种情况：一．如果数字5后面还有数字，那么在取舍时不论5的前面是奇还是偶数都把5当作6看而进一位；二．5后面没有数字，又分两种情况：1．如果5的前面是偶数则把5当作4舍取而不进位，如果 5的前面是奇数则把5当作6进一位。例如：1.525为1.52，1.535为1.54，1.，1.。 试试下面公式吧！ =IF(RIGHT(TRUNC(A1*1000),1)=&5&,IF(A1*1000&TRUNC(A1*1000),ROUNDUP(A1,2),ROUNDDOWN(A1,2)+ISODD(RIGHT(TRUNC(A1*100),1))*0.01),ROUND(A1,2)) 3、日期函数加法求助 在一列输入&2002年7月&等这样的日期数据,想在另一列产生上加6个月的数据结果,即可显示&2003年1月&,用函数如何写? =DATE(YEAR($A1),MONTH($A1)+6,DAY($A1)) 4、怎样输入以0开头的数字序号？ 在输入高考学生序号时，遇到问题：序号如
，输完后，前面的0总是不翼而飞。 请问如何才能做到输入的序号既能保留前面的0，又具备自动下拉填充功能？ 在第1个单元格中输入&'&，在第2个单元格中输入&'&，然后选中两个单元格拖拉即可（输入的&'&号不会显示出来）。 5、怎样使工作表中某个格子的结果等于这张表的名字 试试看，不过档案必须已经存盘，Sheet1!A1可自行替换 =MID(CELL(&filename&,Sheet1!A1),FIND(&]&,CELL(&filename&,Sheet1!A1),1)+1,LEN(CELL(&filename&,Sheet1!A1))) 6、如果你要把时间一分一秒地加起来，但当分的数值大于60时又不想进位到小时，那可以怎办呢？ 先把有关储存格的数字格式定义为 [mm]:ss ，然后输入分秒的数值。方括号的意思是分的数值不会进位（成小时）。 要注意输入的方法，例如 1分35秒，则需输入「0:1:35」，不用理会公式栏的「上午」或「下午」字句。 这样依旧可以用普通的加减算法，或如SUM()的函数，见下图： 7、如何将小写的数字转换成人民币大写格式 =IF(ISNUMBER(A1),IF(TRUNC(A1)=0,IF(AND(MID(TEXT(TRUNC(A1,2),&0.00&),LEN(TEXT (TRUNC(A1,2),&0.00&))-1,1)=&0&,RIGHT(TEXT(TRUNC(A1,2),&0.00&),1)=&0&),&零元&,&&),TEXT(TRUNC(A1),&[DBNUM2]&)&&元&)&(IF(MID(TEXT(TRUNC(A1,2), &0.00&),LEN(TEXT(TRUNC(A1,2),&0.00&))-1,1)=&0&,IF(OR(TRUNC(A1)=0,RIGHT(TEXT (TRUNC(A1,2),&0.00&),1)=&0&),&&,&零&),TEXT(MID(A1,LEN(TEXT(TRUNC(A1,2), &0.00&))-1,1),&[DBNUM2]&)&&角&))&(IF(RIGHT(TEXT(TRUNC(A1,2), &0.00&),1)=&0&,&&,TEXT(RIGHT(TEXT(TRUNC(A1,2),&0.00&),1),&[DBNUM2]&)& &分&)),IF(A1=&&,&&,&不是有效金额,请重新输入!&)) 8、有没有一个函数可以得到某一个日期是本年的第几周？ =WEEKNUM(A2,1) 一年中的周数，一周开始于星期日 (11) =WEEKNUM(A2,2) 一年中的周数，一周开始于星期一 (10) 9、怎样才能实现2002-7月减去2001-6等于1年1个月? A1==2002-7 b1=DATEDIF(A1,A2,&y&)&&年&&MOD(DATEDIF(A1,A2,&m&),12)&&月& 关于养老保险的年限计算问题 养老保险中缴费年限的计算公式为： 例:2002年8月-1995年10月+1个月=6年11个月.请问在EXCEL中如何用函数计算？ =DATEDIF($A1,$B1,&y&)&&年&&(DATEDIF($A1,$B1,&ym&)+1)&&月& 10、怎么统计A3:A44里有多少个&△&?请教! 公式=COUNTIF(A3:A44,&*&&&△&&&*&)公式=COUNTIF(A3:A44,&*△*&) 数组公式={=SUM(LEN(R1C1:R3C1)-LEN(SUBSTITUTE(R1C1:R3C1,&△&,&&)))} 11、请问在EXCEL中如何把&&格式的数值转换为日期型 =DATE(LEFT(RC[-1],4),MID(RC[-1],5,2),RIGHT(RC[-1],2)) =DATEVALUE(TEXT(C9,&#-##-##&)) 注意c9 是存储
的单元格 =DATE(LEFT(A2,4),MID(A2,5,2),RIGHT(A2,2))，需要将单元格设置成&日期&格式 12、用身份证号码来提取出生年月日怎么做？ 用身份证号码来提取出生年月日怎么做？倒如说：用591提取出751205，并以日的格式输出。 假设身份证号码存在A1里，用公式：=if(or(len(a1)=15,len(a1)=18),date(mid(a1,7,2+int(len (a1)/16)*2),mid(a1,9+int(len(a1)/16)*2,2),mid(a1,11+int(len(a1)/16)*2,2)), &错误号码!&) 然后设好日期格式即可! 13、请问如何求a1格和b1格的时间差? 单元格为日期 a1格为
16:44 B1格为
15:30 请问如何求得B1-a1的时间差并把它放在c1格中? =ABS(B1-A1) 14、如上所示数据，有上百条记录，而有些记录是同一人的，如下数据所示：
15:30 | 小张
15:20 | 小张
15:10 | 大李
9:30 | 老黄
12:05 | 老黄 得到b1-a1的时间后,再如何把同一人所用的总的时间都相加出来？ =SUMIF($C$1:$C$5,C2,$D$1:$D$5) 15、我的两个单元格分别为82人和81人，怎么让他们相加？ =(LEFT(A1,2)+LEFT(A2,2))&&人& 16、请教各位，现有出生日期，如何准确计算一个人的年龄（周岁）？ =DATEDIF(A1,NOW(),&y&) 17、如何自动汇总花名册中的男女等人数？ 因工作需要，需在花名册后面自动汇总出本单位的男、女、本科、大专、中专、正处、副处、正科、副科、科员等相关人数供领导参考。我试着用FREQUNCY 函数计算，但该函数只适用于数值，对于像&男&这样的文本却不行，没办法，只好将文本转换成数值，如将&男&替换成&1&、&女&替换成&2&，据此才汇总出男、女的人数。请问版主有否更简便的函数呢？另：花名册中的&出生年月&设置的是日期格式，为&19XX年X月&，应如何汇总出25岁、26-35 岁、36-45岁、46-55岁、56岁以上的人数？ =countif(a1:a100,&男&) 汇总年龄段人数用的是FREQUENCY函数 18、excel关于日期时间相减的问题 我工作中要计算误工时间，如： 14:23到 15:17之间时间间隔为多少分 计算天数： =DATEDIF(E8,E9,&d&) 计算小时数： =HOUR(E9-E8) 计算分钟数： =MINUTE(E9-E8) 总计分钟数＝天数×24×60+小时数×60+分钟数：=24*60*(a1-a2) B1=(A1-A2), 然后设置单元格格式为&[mm]:@& 10、DATEDIF函数使用详解 计算两个日期之间的天数、月数或年数。提供此函数是为了与 Lotus 1-2-3 兼容。 DATEDIF(start_date,end_date,unit) Start_date 为一个日期，它代表时间段内的第一个日期或起始日期。日期有多种输入方法：带引号的文本串（例如 &&）、系列数（例如，如果使用 1900 日期系统则 36921 代表 2001 年 1 月 30 日）或其它公式或函数的结果（例如，DATEVALUE(&&)）。有关日期系列数的详细信息，请参阅 NOW。 End_date 为一个日期，它代表时间段内的最后一个日期或结束日期。 Unit 为所需信息的返回类型。 Unit 返回 &Y& 时间段中的整年数。 &M& 时间段中的整月数。 &D& 时间段中的天数。 &MD& start_date 与 end_date 日期中天数的差。忽略日期中的月和年。 &YM& start_date 与 end_date 日期中月数的差。忽略日期中的日和年。 &YD& start_date 与 end_date 日期中天数的差。忽略日期中的年。 Microsoft Excel 按顺序的系列数保存日期，这样就可以对其进行计算。如果工作簿使用 1900 日期系统，则 Excel 会将 1900 年 1 月 1 日保存为系列数 1。而如果工作簿使用 1904 日期系统，则 Excel 会将 1904 年 1 月 1 日保存为系列数 0，（而将 1904 年 1 月 2 日保存为系列数 1）。例如，在 1900 日期系统中 Excel 将 1998 年 1 月 1 日保存为系列数 35796，因为该日期距离 1900 年 1 月 1 日为 35795 天。请查阅 Microsoft Excel 如何存储日期和时间。 Excel for Windows 和 Excel for Macintosh 使用不同的默认日期系统。有关详细信息，请参阅 NOW。 示例DATEDIF(&&,&&,&Y&) 等于 2，即时间段中有两个整年。 DATEDIF(&&,&&,&D&) 等于 440，即在 2001 年 6 月 1 日和 2002 年 8 月 15 日之间有 440 天。 DATEDIF(&&,&&,&YD&) 等于 75，即在 6 月 1 日与 8 月 15 日之间有 75 天，忽略日期中的年。 DATEDIF(&&,&&,&MD&) 等于 14，即开始日期 1 和结束日期 15 之间的差，忽略日期中的年和月。 还是养老保险的问题！比四舍五入麻烦！ 假如算出缴费年限是15年1、2、3、4、5、6 个月，则通通计为15.5，而7、8、9、10、11个月则又通通计为16，该怎样用函数表达？ =IF(DATEDIF($A9,$B9,&ym&)+1&6,DATEDIF($A9,$B9,&y&)+1&&年&,DATEDIF ($A9,$B9,&y&)&&.5年&) 关于日期转换年龄的问题？ 各位好，有一问题急需各位帮助解决：如在A列输入1993年02月，要在B列自动显示出距今年的实际年龄，但这有一要求是，需以每年的8月为限，如1993年3月是9岁，1993年9月就应是10岁。请各位给予帮助解决，谢谢了 =IF(MONTH(A4)&=8,YEAR(TODAY())-YEAR(A4),YEAR(TODAY())-YEAR(A4)-1) 如何准确计算两个日期之间的月数 现在的函数datedif无法解决大小月的问题，如至其计算值为0；另外，edate也无法计算指定日期后几个月的时间，如后一个月，其结果为，而不是想要的。如何解决 A 1 日期 2
公式 说明（结果） =MONTH(A3)-MONTH(A2) 在同一年中两个日期之间经历的月份 (3) =(YEAR(A4)-YEAR(A3))*12+MONTH(A4)-MONTH(A3) 跨年份的两个日期之间经历的月份 (15) 在工作中遇到这样一个问题，怎样解决？ 比如 SUM（A1：AN）这个N先不能确定，判断以后才能确定( 最好使用函数解决)。 =SUM(INDIRECT(&$A$1:$A$&&N)) SUM(INDIRECT(&$A$1:$A$&&countif(D1:D10,&&0&))) 如何用函数实现？ 我想知道的是如何用函数来实现，而是用筛选的方法。 问题同下：有一组数，A1：A9依次是61，50，31，60，63，70，71，72，80，如何快速的算出&小于60的有几个数&，&大于等于60，小于等于69的有几个数&，&大于等于70，小于等于79的有几个数&！ 使用countif语句，如 =countif(A1:A9,&&60&) 就可以得出小于60的数目，类推。 如何填入月份即可自动引用对应月份的天数[求助]--&kevin转移 如何用最简单的办法解决下述问题： 在一个单元格中填入1-12中的一个数字，就可在其他单元格的计算公式中引用其对应月份的公历天数？（数字变换，公历天数同时变化） =IF(AND(TRUNC(A1)=A1,A1&=12,A1&=1),IF(AND(A1=2,TRUNC(YEAR(NOW())/4) =YEAR(NOW())/4),29,CHOOSE(A1,31,28,31,30,31,30,31,31,30,31,30,31)),&开玩笑吧：）&)] 也许还可以再简单点: =IF(AND(TRUNC(A1)=A1,A1&=12,A1&=1),DAY(DATE(YEAR(NOW()),A1+1,1)-1),&开玩笑吧：）&) 问：可选的下拉式文字（小三角形）如何做出来？ 如：职称可选的下拉式文字分别助工、工程师、高级工程师等 在单元格中预先输入下拉中的文字 数据－有效性－设置－下拉菜单（序列）－来源：&高级工程师,工程师&，中间用逗号分隔。 因工作需要要对一些数量作出统计，因水平有限没法解决各位朋友，请各位大虾帮帮忙，将感激不尽！ 1、统计某区域内重复的单元格数量，并按顺序排列出来; 2、统计D列中包含字母&1A&的行的A列非空单元格数。 例：（在此例中结果应为2） A B C D 1 编号 姓名 许可证号 序号 2 戴新华 1A01 3 1331086 李 英 1A02 4 陈积慧 1A03 5 王建华 1A04 6 1331004 唐顺英 1A05 7 1331005 汤 勇 A06 8 1331008 周礼忠 B01 9 1331009 唐盛五 无 B02 10 1331010 张小元 1590 C01 11 1331012 龙小英 C02 12 1331013 唐木莲 C03 =SUM((LEFT($D$1:$D$12,2)=&1A&)*($A$1:$A$12&&&&)) Excel 彩蛋 财务人员会比其他人拥有较多的乐趣。这一点我们可以从微软的应用程序中所隐藏的复活节彩蛋看出端倪来。过去的 5 年之中，微软的Excel在每一个主要版本的产品中都隐藏了3D 的游戏，是所有 PC 版的软件中最好的复活节彩蛋娱乐。即使你的电脑上没有 Excel，你仍然可以从下面选择其他的彩蛋。 微软 Excel 2000彩蛋内容： 一个叫Dev Hunter的赛车游戏 寻宝秘笈： 1.在Excel 2000中打开一个新的文件。 2.在&文件&菜单中选择&另存为&，并在&文件类型&菜单中选择&Web页&。 3.选择&工作表&并勾选&加入功能&。 4.按&发布&按键。在发布为Web画面对话框中，选择&发布&按键。 5.打开你的Internet Explorer (IE浏览器)。打开刚刚用Excel存的HTML文件。你将在浏览器的页面中间看到一个Excel的活页簿。 6.一直按Page Down到第2000列，然后按住Tab直到光标停在WC栏。 7.按住键盘上的Shift、Ctrl和Alt键，用鼠标按再左上角的Office商标。 8. 现在，你被引进一个类似Spy Hunter的全屏幕游戏里，这个游戏是Dev Hunter。使用键盘上的方向键来移动。你将看到开发人员的名字印列在你所经过的路面上。 9.如果你够积极，你可以按空白键发射，按O可丢弃oil slicks。当画面变暗的时候，你可以按H键来打开头上的灯。(注意： 你的系统必须具有DirectX ，才能找到这个彩蛋。) 微软 Excel 97 彩蛋内容： 一个模拟飞行游戏 寻宝秘笈： 1.打开一个空白的活页簿，然后按F5。 2.输入&X97:L97&后按下Enter键。 3.按键盘上的Tab键。 4.按住键盘上的Ctrl-Shift键不放，并用鼠标选择工具列上的&图标精灵&按键。 5.一个3D的模拟飞行游戏就会出现。使用鼠标来控制飞行；鼠标右键往前； 左键控制往回转。(注意： 你的系统必须具有DirectX ，才能找到这个彩蛋。) 微软 Excel 95 彩蛋内容： 一个叫做Hall of Tortured Souls的游戏 寻宝秘笈： 1.打开一个空白的活页簿。 2.选择第 95 列。 3.按一下Tab键到栏位B。 4.选择&说明&菜单中的&关于Microsoft Excel&选项。 5.按住键盘上的Ctrl、Alt和Shift三个按键，然后用鼠标按&技术支持&按键。 6.一个名为Hall of Tortured Souls 就会出现。使用光标来移动方向。 7.若想继续搜寻Excel开发人员的图片，请将游戏中的人物转身掉头180度并走下阶梯。输入excelkfa 后墙壁自然会消失，接着会出现一条狭窄的走道引导你走向目的。(注意： 你的系统必须具有DirectX ，才能找到这个彩蛋。) Qualcomm Eudora Pro (3.x to 4.2) 彩蛋内容： Eudora 内对各部门的另类趣译 寻宝秘笈： 1.选择&说明&表单中的&关于Eudora&选项。 2.按&Credits&或&More Credits&按键 (视你所使用的版本而定)。 3.人员的姓名表便开始一一列出，但这并非最精采的部分。只要再按住键盘的 Ctrl 键就会出现一些绰号和有关部门名称的趣味含义〔例如，&市场部&这个标题就会变成&Marketing Weenies&，而&业务&则变成&没问题，这可以加到产品里面&等。 在SUMIF中，当条件为某日至某日时，如何表达？ =SUMIF(B2:B13,&&=&,C2:C13) - SUMIF(B2:B13,&&&,C2:C13) 注意储存格格式为通用即可 这个算式J6=F5*(B5-H5)，而F5有可能是正数，也有可能是负数，（B5-H5）也有可能是正是负，但是，我要的结果总是一个正数，怎么做呢？ 什么叫你要的结果总是一个正数？当它结果为负数时你打算怎么处理？1、把负数转为正数，那么就加个绝对值上去，即=ABS(F5*(B5-H5))，2、返回其他值，那么加个IF上去，即=IF(F5*(B5-H5)&0,&NA&,F5*(B5-H5)) 象四舍五入的问题，请教！ 如=12.**，**表示01~12，而01~06计为12.5，07~12则进位为13，有解否？ 假定12.**保存在B1单元格中，则输入公式假定12.**保存在B1单元格中，则输入公式=IF(B1*100-INT(B1)*100&=6,INT(B1)+0.5,INT(B1)+1)即可 以元为单位的数字转换为万元为单位呢？ 如：348984，转换后为35 =ROUND(A1/10000,0) 关于个人所得税公式的问题！！ 我编了个计算个人所得税的公式在计算8万以下的收入时都正常，但当我将条件加到大于10万时，公式计算显示出，超出范围！为什么？ EXCEL中的IF函数有使用的限制吗？ 现将公式附下：=IF(CI277&0,(IF(CI277&=500,CI277*0.05,(IF(CI277&=2000, (CI277*0.1-25),(IF(CI277&=5000,(CI277*0.15-125),(IF(CI277&=20000,(CI277*0.2 -375),IF(CI277&=40000,CI277*0.25-1375,&超出范围&))))))))),0) .我只列到4万，以下依次是6万，8万，10万。 加IF到8万都正常，但加到10万就出问题！ TO: =IF (A1&=0,IF(A1&40000,IF(A1&500,A1*5%,IF(A1&%,IF(A1& %,IF(A1&2%,A1*25%)))),IF(A1&6%,IF(A1& 8%,IF(A1&*40%,A1*45%)))),&数据错误&) (!!!)=IF(A1&=500,A1*0.05,(IF(A1&=2000,(A1*0.1-25),(IF(A1&=5000,(A1*0.15-125),(IF(A1&=20000,(A1*0.2-375),IF(A1&=40000,(A1*0.25-1375),&&)))))))&IF(A1&=6.3-1500,IF(A1&=8.35-1750,IF(A1&=*0.4-2000)))) 如何把两列的数合并成一列？ 例如：在C1中输入&＝A1&B1&，就可以将A1与B1并列， 如果输入&＝A1&&,&&B1&，得到的结果是&A1,B1&这时的A1和B1只是作为文字并排而已。 怎么去掉一列中所有的日 只要年月 怎么去掉一列中所有的日 只要年月 有 1000多行 例如 变成 1999.09 所有列都要变 =left(a1,7) a1为日期所在的单元格。 如何编写表达&今天&与过去某日期之差（天）的函数 =DATEDIF(A1,NOW(),&y&)&&years,&&DATEDIF(A1,NOW(),&ym&)&& months&&DATEDIF(A1,NOW(),&md&)&& days& =today()-a1 肯定可以的，A1是检验日期，记得把当前单元格的格式设为常规 用拖拽复制公式时，如何使公式中的工作表序号变化，而单元格号不变？ [求助]用拖拽复制公式时，如何使公式中的工作表序号变化，而单元格号不变？ eg:='26'!Q18 ='27'!Q18 ='28'!Q18 ='..'!Q18 使用 INDIRECT 函数和 ROW 函数，引用 Q18 时用绝对地址，即： =INDIRECT(ROW()+?&&!$Q$18&) 其中的&?&是修正值，用你行数与工作表序号的差值来代替这个&?&。 如果都要引用A1单元格，可用$a$1表示！- 如何快速制作下拉选单？ ALT+DOWN(下箭头) 如何快速输入当前日期？ Ctrl+;! 如何将数字转换成文本？ TEXT()函数
请登录后再发表评论!
MicroSoft FAQ Converting Decimal Degrees to Degrees/Minutes/Seconds Function Convert_Degree(Decimal_Deg) As Variant With Application \'Set degree to Integer of Argument Passed Degrees = Int(Decimal_Deg) \'Set minutes to 60 times the number to the right \'of the decimal for the variable Decimal_Deg Minutes = (Decimal_Deg - Degrees) * 60 \'Set seconds to 60 times the number to the right of the \'decimal for the variable Minute Seconds = Format(((Minutes - Int(Minutes)) * 60), &0&) \'Returns the Result of degree conversion \'(for example, 10.46 = 10~ 27 \' 36&) Convert_Degree = & & & Degrees & &° & & Int(Minutes) & &\' & _ & Seconds + Chr(34) End With End Function Example: A1 =10.6 B1 = Convert_Degree(A1) Converting Degrees/Minutes/Seconds to Decimal Degrees Function Convert_Decimal(Degree_Deg As String) As Double \' Declare the variables to be double precision floating-point. Dim degrees As Double Dim minutes As Double Dim seconds As Double \' Set degree to value before &°& of Argument Passed. degrees = Val(Left(Degree_Deg, InStr(1, Degree_Deg, &°&) - 1)) \' Set minutes to the value between the &°& and the &\'& \' of the text string for the variable Degree_Deg divided by \' 60. The Val function converts the text string to a number. minutes = Val(Mid(Degree_Deg, InStr(1, Degree_Deg, &°&) + 2, _ InStr(1, Degree_Deg, &\'&) - InStr(1, Degree_Deg, _ &°&) - 2)) / 60 \' Set seconds to the number to the right of &\'& that is \' converted to a value and then divided by 3600. seconds = Val(Mid(Degree_Deg, InStr(1, Degree_Deg, &\'&) + _ 2, Len(Degree_Deg) - InStr(1, Degree_Deg, &\'&) - 2)) _ / 3600 Convert_Decimal = degrees + minutes + seconds End Function Example: =Convert_Decimal(&10° 27\' 36&&&)
请登录后再发表评论!蜂鸟手机端
焦圈，为摄影而生
&&打印工作表时怎样让数据连续出现在每一页上
Excel 技巧 53例 （一） 1、如何在已有的单元格中批量加入一段固定字符？ 例如：在单位的人事资料，在excel中输入后，由于上级要求在原来的职称证书的号码全部再加两位，即要在每个人的证书号码前再添上两位数13，如果一个一个改的话实在太麻烦了，那么我们可以用下面的办法，省时又省力： 1）假设证书号在A列，在A列后点击鼠标右键，插入一列，为B列 ； 2）在B2单元格写入： =&13& & A2 后回车； 3）看到结果为 13xxxxxxxxxxxxx 了吗？鼠标放到B2位置，单元格的下方不是有一个小方点吗，按着鼠标左键往下拖拽直到结束。当你放开鼠标左键时就全部都改好了。 若是在原证书号后面加13 则在B2单元格中写入：=A2 & &13& 后回车。 2、如何设置文件下拉窗口的最下面的最近运行的文件名个数？ 打开&工具&，选&选项&，再选&常规&，在&最近使用的文件清单&下面的文件个数输入框中改变文件数目即可。若不在菜单中显示最近使用的文件名，则将&最近使用的文件清单&前的复选框去除即可。 3、在EXCEL中输入如&1-1&、&1-2&之类的格式后它即变成1月1日，1月2日等日期形式，怎么办？ 这是由于EXCEL自动识别为日期格式所造成，你只要点击主菜单的&格式&菜单，选&单元格&，再在&数字&菜单标签下把该单元格的格式设成文本格式就行了。 4、在EXCEL中如何使它象WORD一样的自动定时保存文件？ 点击&工具&菜单&自动保存&项，设置自动保存文件夹的间隔时间。如果在&工具&菜单下没有&自动保存&菜单项，那么执行&工具&菜单下&加载宏...&选上&自动保存&，&确认&。然后进行设置即可。 5、用Excel做多页的表格时，怎样像Word的表格那样做一个标题，即每页的第一行（或几行）是一样的。但是不是用页眉来完成？ 在EXCEL的文件菜单－页面设置－工作表－打印标题；可进行顶端或左端标题设置，通过按下折叠对话框按钮后，用鼠标划定范围即可。这样Excel就会自动在各页上加上你划定的部分作为表头。 6、在Excel中如何设置加权平均？ 加权平均在财务核算和统计工作中常常用到，并不是一项很复杂的计算，关键是要理解加权平均值其实就是总量值（如金额）除以总数量得出的单位平均值，而不是简易的将各个单位值（如单价）平均后获得的那个单位值。在Excel中可设置公式解决（其实就是一个除法算式），分母是各个量值之和，分子是相应的各个数量之和，它的结果就是这些量值的加权平均值。 7、如果在一个Excel文件中含有多个工作表，如何将多个工作表一次设置成同样的页眉和页脚？如何才能一次打印多个工作表？ 把鼠标移到工作表的名称处（若你没有特别设置的话，Excel自动设置的名称是&sheet1、sheet2、sheet3.......&），然后点右键，在弹出的菜单中选择&选择全部工作表&的菜单项，这时你的所有操作都是针对全部工作表了，不管是设置页眉和页脚还是打印你工作表。 8、EXCEL中有序号一栏，由于对表格进行调整，序号全乱了可要是手动一个一个改序号实在太慢太麻烦，用什么方法可以快速解决？ 如果序号是不应随着表格其它内容的调整而发生变化的话，那么在制作EXCEL表格时就应将序号这一字段与其它字段分开，如在&总分&与&排名&之间空开一列，为了不影响显示美观，可将这一空的列字段设为隐藏，这样在调整表格（数据清单）的内容时就不会影响序号了。 9、用Excel2000做成的薪水表，只有第一个人有薪水条的条头（如编号、姓名、岗位薪水.......，想输出成薪水条的形式。怎么做？ 这个问题应该这样解决：先复制一张薪水表，然后在页面设置中选中工作表选项，设置打印工作表行标题，选好薪水条的条头，然后在每一个人之间插入行分页符，再把页长设置成薪水条的高度即可。 使用自定义方式重装了一遍中文office97，Excel的打印纸选项中只有A4一种，怎么办？ 随便安装一个打印机驱动程序就可以了。 10、在Excel中小数点没法输入，按小数点，显示的却是逗号，无论怎样设置选项都无济于事，该怎么办？ 这是一个比较特殊的问题，我曾为此花了十几个小时的时间，但说白了很简易。在Windows的控制面板中，点击&区域设置&图标，在弹出的&区域设置属性&对话面板上在&区域设置&里选择&中文（中国）&，在&区域设置属性&对话面板上在&数字&属性里把小数点改为&.&（未改前是&，&），按&确认&按钮结束。这样再打开Excel就一切都正常了。 11、如何快速选取特定区域？ 使用F5键可以快速选取特定区域。例如，要选取A2：A1000，最简便的方法是按F5键，出现&定位&窗口，在&引用&栏内输入需选取的区域A2：A1000。 12、如何快速返回选中区域？ 按Ctr+BacksPae（即退格键）。 13、如何快速定位到单元格？ 方法一：按F5键，出现&定位&对话框，在引用栏中输入欲跳到的单元格地址，单市&确认&按钮即可。 方法二：单击编辑栏左侧单元格地址框，输入单元格地址即可。 14、&Ctrl＋*&的特殊功用？一般来说，当处理一个工作表中有很多数据的表格时，通过选定表格中某个单元格，然后按下 Ctrl＋* 键可选定整个表格。Ctfl＋* 选定的区域是这样决定的：根据选定单元格向四周辐射所涉及到的有数据单元格的最大区域。 15．如何快速选取工作表中所有包含公式的单元格？ 有时，需要对工作表中所有包含公式的单元格加以保护，或填入与其它单元格不同的颜色，以提醒用户注意不能在有此颜色的区域内输入数据。以下方法可以帮助快速选取所有包含公式的单元格：选择&编辑&＼&定位&，单击&定位条件&按钮，在&定位条件&对话框中选择&公式&项，按&确认&按钮即可。 16、如何在不同单元格中快速输入同一数内容？ 选定单元格区域，输入值，然后按 Ctrl＋ Ener键，即可实现在选定的单元格区域中一次性输入相同的值。 17、只记得函数的名称，但记不清函数的参数了，怎么办？ 如果你知道所要使用函数的名字，但又记不清它的所有参数格式，那么可以用键盘快捷键把参数粘贴到编辑栏内。 具体方法是：在编辑栏中输入一个等号其后接函数名，然后按 Ctr＋ A键，Excel则自动进入&函数指南DD步骤 2之2&。当使用易于记忆的名字且具有很长一串参数的函数时，上述方法显得特别有用。 18、如何把选定的一个或多个单元格拖放至新的位置？ 按住Shift键可以快速更改单元格内容的次序。具体方法是： 选定单元格，按下Shift键，移动鼠标指针至单元格边缘，直至出现拖放指针箭头（空心箭头），然后按住鼠标左键进行拖放操作。上下拖拉时鼠标在单元格间边界处会变成一个水平&工&状标志，左右拖拉时会变成垂直&工&状标志，释放鼠标按钮完成操作后，选定的一个或多个单元格就被拖放至新的位置。 19、如何让屏幕上的工作空间变大？ 可以将不用的工具栏隐藏，也可以极大化Excel窗口，或者在&视图&菜单中选择&全屏显示&命令。 20、如何使用快显菜单？ 快显菜单中包含了一些操作中最常用的命令，利用它们可以大大提高操作效率。首先选定一个区域，然后单击鼠标右健即可调出快显菜单，根据操作需要选择不同命令。 （二） 21、如何使用快显菜单？ 快显菜单中包含了一些操作中最常用的命令，利用它们可以大大提高操作效率。首先选定一个区域，然后单击鼠标右健即可调出快显菜单，根据操作需要选择不同命令。 22、如何防止Excel自动打开太多文件？ 当Excel启动时，它会自动打开Xlstart目录下的所有文件。当该目录下的文件过多时，Excel加载太多文件不但费时而且还有可能出错。解决方法是将不该位于Xlstart目录下的文件移走。另外，还要防止EXcel打开替补启动目录下的文件：选择&工具&＼&选项&＼&普通&，将&替补启动目录&一栏中的所有内容删除。 23、如何去除网格线？ 1）除去编辑窗口中的表格线，单击&工具&菜单中的&选项&，再选中&视图&，找到&网格线&，使之失效； 2）除去打印时的未定义表格线 有时会出现这样的情况：你在编辑时未定义的表格线（在编辑窗中看到的也是淡灰色表格线），一般情况下在打印时是不会打印出来的，可有时却偏偏不听使唤给打印出来了，特别是一些所谓的&电脑&VCD中编辑的Excel表格更是这样。要除去这些表格线，只要在单击&文件&、&页面设置&、&工作表&菜单，点击一下&网格线&左边的选择框，取消选择&网格线&就行了。 24、如何快速格式化报表？ 为了制作出美观的报表，需要对报表进行格式化。有快捷方法，即自动套用Excel预设的表格样式。方法是： 选定操作区域，选取&格式&菜单中的&自动套用格式&命令，在格式列表框中选取一款你满意的格式样式，按&确认&按钮即可。要注意的是，格式列表框下面有包含&数字&、&边框线&、&字体&等6个&应用格式种类&选项，若某项前面的&x&不出现，则在套用表格样式时就不会用该项。 25、如何快速地复制单元格的格式？ 要将某一格式化操作复制到另一部分数据上，可使用&格式刷&按钮。选择含有所需源格式的单元格，单击工具条上的&格式刷&按钮，此时鼠标变成了刷子形状，然后单击要格式化的单元格即可将格式拷贝过去。 26、如何为表格添加斜线？ 一般我们习惯表格上有斜线，而工作表本身并没有提供该功能。其实，我们可以使用制图工具来实现： 单击&制图&按钮，选取&直线&，鼠标变成十字型．将其移至要添加斜线的开始位置，按住鼠标左键拖拽至终止位置，释放鼠标，斜线就画出来了。另外，使用&文字框&按钮可以方便地在斜线上下方添加文字，但文字周围有边框，要想取消它，可选中文字框，调出快显菜单，选择&对象格式&＼&图案&，选择&无边框&项即可。 27、如何快速地将数字作为文本输入？ 在输入数字前加一个单引号&&&，可以强制地将数字作为文本输入。 28、如何定义自己的函数？ 用户在Excel中可以自定义函数。切换至 Visual Basic模块，或插入一页新的模块表（Module），在出现的空白程序窗口中键入自定义函数VBA程序，按Enter确认后完成编 写工作，Excel将自动检查其正确性。此后，在同一工作薄内，你就可以与使用Exed内部函数一样在工作表中使用自定义函数，如： Function Zma If a＜ 60 Then im＝&不及格& Else Zm=&及格& End If End Function 29、如何在一个与自定义函数驻留工作簿不同的工作簿内的工作表公式中调用自定义 函数？ 可在包含自定义函数的工作薄打开的前提下，采用链接的方法也就是在调用函数时加上该函数所在的工作簿名。假设上例中的自定义函数Zm所在工作薄为MYUDF.XLS，现要在另一不同工作簿中的工作表公式中调用Zm函数，应首先确保MYUDF.XLS被打开，然后使用下述链接的方法： =MYUDF.XLS！ ZMb2 30、如何快速输入数据序列？ 如果你需要输入诸如表格中的项目序号、日期序列等一些特殊的数据系列，千万别逐条输入，为何不让Excel自动填充呢？在第一个单元格内输入起始数据，在下一个单元格内输入第二个数据，选定这两个单元格，将光标指向单元格右下方的填充柄，沿着要填充的方向拖拽填充柄，拖过的单元格中会自动按Excel内部规定的序列进行填充。如果能将自己常常要用到的某些有规律的数据（如办公室人员名单），定义成序列，以备日后自动填充，岂不一劳永逸！选择&工具&菜单中的&选项&命令，再选择&自定义序列&标签，在输入框中输入新序列，注意在新序列各项2间要输入半角符号的逗号加以分隔（例如：张三，李四，王二&&），单击&增加&按钮将输入的序列保存起来。 31、使用鼠标右键拖拽单元格填充柄？上例中介绍了使用鼠标左键拖拽单元格填充柄自动填充数据序列的方法。其实，使用鼠标右键拖拽单元格填充柄则更具灵敏性。在某单元格内输入数据，按住鼠标右键沿着要填充序列的方向拖拽填充柄，将会出现包含下列各项的菜单：复制单元格、以序列方式填充、以格式填充、以值填充；以天数填充、以工作日该充、以月该充、以年填充；序列&&此时，你可以根据需要选择一种填充方式。 32．如果你的工作表中已有某个序列项，想把它定义成自动填充序列以备后用，是否需要按照上面介绍的自定义序列的方法重新输入这些序列项？ 不需要。有快捷方法：选定包含序列项的单元格区域，选择&工具&＼&选项&＼&自定义序列&，单击&引入&按钮将选定区域的序列项添加至&自定义序列&对话框，按&确认&按钮返回工作表，下次就可以用这个序列项了。 33、上例中，如果你已拥育的序列项中含有许多重复项，应如何处理使其没有重复项，以便使用&引入&的方法快速创建所需的自定义序列？ 选定单元格区域，选择&数据&＼&筛选&＼&高级筛选&，选定&不选重复的记录&选项，按&确认&按钮即可。 34、如何对工作簿进行安全保护？ 如果你不想别人打开或更改你的工作簿，那么想法加个密码吧。打动工作薄，选择&文件&菜单中的&另存为&命令，选取&选项&，根据用户的需要分别输入&打开文件口令&或&更改文件D令&，按&确认&退出。工作簿（表）被保护之后，还可对工作表中某些单元格区域的重要数据进行保护，起到双重保护的功能，此时你可以这样做：首先，选定需保护的单元格区域，选取&格式&菜单中的&单元格&命令，选取&保护&，从对话框中选取&锁定&，单由&确认&按钮退出。然后选取&工具&菜单中的&保护&命令，选取&保护工作表&，根据提示两次输入口令后退出。 注意：不要忘记你设置有&口令&。 35、如何使单元格中的颜色和底纹不打印出来？ 对那些加了保护的单元格，还可以设置颜色和底纹，以便让用户一目了然，从颜色上看出那些单元格加了保护不能更改，从而可增加数据输入时的直观感觉。但却带来了问题，即在黑白打印时如果连颜色和底纹都打出来，表格的可视性就大打折扣。解决办法是：选择&文件&＼&页面设置&＼&工作表&，在&打印&栏内选择&单元格单色打印&选项。之后，打印出来的表格就面目如初了。 36、工作表保护的口令忘记了怎么办？ 如果你想使用一个保护了的工作表，但口令又忘记了，有办法吗？有。选定工作表，选择&编辑&＼&复制&、&粘贴&，将其拷贝到一个新的工作薄中（注意：一定要是新工作簿），即可超越工作表保护。当然，提醒你最好不用这种方法盗用他人的工作表。 37、&$&的功用： Excel一般使用相对地址来引用单元格的位置，当把一个含有单元格地址的公式拷贝到一个新的位置，公式中的单元格地址会随着改变。你可以在列号或行号前添加符号&$&来冻结单元格地址，使之在拷贝时保持固定不变。 38、如何用汉字名称代替单元格地址？ 如果你不想使用单元格地址，可以将其定义成一个名字。 定义名字的方法有两种：一种是选定单元格区域后在&名字框&直接输入名字，另一种是选定想要命名的单元格区域，再选择&插入&＼&名字&＼&定义&，在&当前工作簿中名字&对话框内键人名字即可。使用名字的公式比使用单元格地址引用的公式更易于记忆和阅读，比如公式&=SUM（实发薪水）&显然比用单元格地址简易直观，而且不易出错。 39、如何在公式中快速输入不连续的单元格地址？ 在SUM函数中输入比较长的单元格区域字符串很麻烦，尤其是当区域为许多不连续单元格区域组成时。这时可按住Ctrl键，进行不连续区域的选取。区域选定后选择&插入&＼&名字&＼&定义&，将此区域命名，如Group1，然后在公式中使用这个区域名，如&＝SUM（Group1）&。 40、如何定义局部名字？ 在默认情况下，工作薄中的所有名字都是全局的。其实，可以定义局部名字，使之只对某个工作表有效，方法是将名字命名为&工作表名！名字&的形式即可。 41、如何命名常数？ 有时，为常数指定一个名字可以节省在整个工作簿中更改替换此常数的时间。例如，在某个工作表中常常需用利率4.9％来计算利息，可以选择&插入&＼&名字&＼&定 义&，在&当前工作薄的名字&框内输入&利率&，在&引用位置&框中输入&＝ 0.04.9&，按&确认&按钮。 42、工作表名称中能含有空格吗？ 能。例如，你可以将某工作表命名为&Zhu Meng&。有一点结注意的是，当你在其它工作表中调用该工作表中的数据时，不能使用类似&＝ ZhU Meng！A2&的公式，否则Excel将提示错误信息&找不到文件Meng&。解决的方法是，将调用公式改为&＝‘Zhu Mg‘! A2&就行了。当然，输入公式时，你最好养成这样的习惯，即在输入&＝&号以后，用鼠标单由 Zhu Meng工作表，再输入余下的内容。 43、给工作表命名应注意的问题？有时为了直观，往往要给工作表重命名（Excel默认的荼表名是sheet1、sheet2.....），在重命名时应注意最好不要用已存在的函数名来作荼表名，否则在下述情况下将产征收岂义。我们知道，在工作薄中复制工作表的方法是，按住Ctrl健并沿着标签行拖拽选中的工作表到达新的位置，复制成的工作表以&源工作表的名字+（2）&形式命名。例如，源表为ZM，则其&克隆&表为ZM（2）。在公式中Excel会把ZM（2）作为函数来处理，从而出错。因而应给ZM（2）工作表重起个名字。 44、如何拆分或取消拆分窗口？ 当我们给一个工作表输入数据时，在向下滚动过程中，尤其是当标题行消失后，有时会记错各列标题的相对位置。这时可以将窗口拆分为几部分，然后将标题部分保留在屏幕上不动，只滚动数据部分。其方法是在主菜单上单击&窗口&＼&拆分窗口&。取消拆分窗口时除了使用&窗口&＼&撒消拆分窗口&命令外，有捷径：将鼠标指针置于水平拆分或垂直拆分线或双拆分钱交点上，双击鼠标即可取消已拆分的窗口。 45、如何给工作簿扩容？ 选取&工具&＼&选项&命令，选择&常规&项，在&新工作薄内的工作表数&对话栏用上下箭头改变打开新工作表数。一个工作薄最多可以有255张工作表，系统默认值为6。 46、如何减少重复劳动？ 我们在实际应用Excel时，常常遇到有些操作重复应用（如定义上下标等）。为了减少重复劳动，我们可以把一些常用到的操作定义成宏。其方法是：选取&工具&菜单中的&宏&命令，执行&记录新宏&，记录好后按&停止&按钮即可。也可以用VBA编程定义宏。 47、如何快速地批量更改数据？ 假若有一份 Excel工作簿，里面有所有职工薪水表。现在想将所有职工的补贴增加50（元），当然你可以用公式进行计算，但除此之外还有更简易的批量更改的方法，即使用&选择性粘贴&功能： 首先在某个空白单元格中输入50，选定此单元格，选择&编辑&＼&复制&。选取想更改的单元格区域，例如从E2到E150。然后选择&编辑&＼&选择性粘贴&，在&选择性粘贴&对话框&运算&栏中选中&加&运算，按&确认&健即可。最后，要删除开始时在某个空白单元格中输入的50。 48、如何快速删除特定的数据？ 假若有一份Excel工作薄，其中有大量的产品单价、数量和金额。如果想将所有数量为0的行删除，首先选定区域（包含标题行），然后选择&数据&＼&筛选&＼&自动筛选&。在&数量&列下拉列表中选择&0&，那么将列出所有数量为0的行。此时在所有行都被选中的情况下，选择&编辑&＼&删除行&，然后按&确认&即可删除所有数量为0的行。最后，取消自动筛选。 49、如何快速删除工作表中的空行？ 以下几种方法可以快速删除空行： 方法一：如果行的顺序无关紧要，则可以根据某一列排序，然后可以方便地删除空行。 方法二：如果行的顺序不可改变，你可以先选择&插入&＼&列&，插入新的一列入在A列中顺序填入整数。然后根据其它任何一列将表中的行排序，使所有空行都集中到表的底部，删去所有空行。最后以A列重新排序，再删去A列，恢复工作表各行原来的顺序。 方法三：使用上例&如何快速删除特定的数据&的方法，只不过在所有列的下拉列表中都选择&空白&。 50、如何使用数组公式？ Excel中数组公式非常有用，它可建立产生多值或对一组值而不是单个值进行操作的公式。要输入数组公式，首先必须选择用来存放结果的单元格区域，在编辑栏输入公式，然后按ctrl＋Shift＋Enter组合键锁定数组公式，Excel将在公式两边自动加上括号&{}&。不要自己键入花括号，否则，Excel认为输入的是一个正文标签。要编辑或清除数组公式．需选择数组区域并且激活编辑栏，公式两边的括号将消失，然后编辑或清除公式，最后按Ctrl＋shift＋Enter键。 51、如何不使显示或打印出来的表格中包含有0值？ 通常情况下，我们不希望显示或打印出来的表格中包含有0值，而是将其内容置为空。例如，图1合计列中如果使用&=b2+c2+d2&公式，将有可能出现0值的情况，如何让0值不显示？ 方法一；使用加上If函数判断值是否为0的公式，即： =if（b2＋c2＋d2＝0，&&， b2＋c2＋d2） 方法二：选择&工具&＼&选项&＼&视窗&，在&窗口选项&中去除&零值&选项。 方法三：使用自定义格式。 选中 E2：E5区域，选择&格式&＼&单元格&＼&数字&，从&分类&列表框中选择&自定义&，在&格式&框中输入&G/通用格式；G/通用格式；；&，按&确认&按钮即可。 52、在Excel中用Average函数计算单元格的平均值的，值为0的单元格也包含在内。有没有办法在计算平均值时排除值为0的单元格？ 方法一：如果单元格中的值为0，可用上例&0值不显示的方法&将其内容置为空，此时空单元格处理成文本，这样就可以直接用Average函数计算了。 方法二：巧用Countif函数 例如，下面的公式可计算出b2:B10区域中非0单元格的平均值：=sum（b2: b10）/countif（b2: b1o，&&&0&） 53、如何在Excel中实现&自动更正&功能？ Word用户都知道，利用Word的&自动更正&功能可以实现数据的快速输入．但在Excel中却没有类似&自动更正&功能的菜单命令。其实，使用VloopuP函数可以巧妙地解决这一问题。
器材讨论区
品牌讨论区
主题交流区
选择论坛版块
提出您的问题