ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 4149|回复: 19

[Excel 函数与公式] 【55期函数】]配合单元格格式给千年日历公式减肥【16楼已总结】

[复制链接]

TA的精华主题

TA的得分主题

发表于 2009-11-23 15:22 | 显示全部楼层 |阅读模式
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
答题要求:
写出考虑1900年2月以前的系统误差和不考虑系统误差两个公式
公式完全正确,并且公式长度满足以下要求的给予加技术分
考虑误差的公式长度<90字(包括"="算在内)的加技术分2分
不考虑误差的公式长度<80字(包括"="算在内)的加技术分1分,<75字的加2分.
如有创新解法,视具体情况给予评分。

补充说明:

1、要求多单元格数组公式不变,公式不使用ROW,COLUMN函数;
2、公式不能使用辅助列,也不能定义名称;
3、结果可以使用自定义单元格格式简化公式长度。
4、答题E友,不要反复加贴,每人只占用一个楼层,在原贴编辑修改即可,以方便查阅和评分。


答题结束时间:12月23日。


[ 本帖最后由 wshcw 于 2011-3-24 14:30 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2009-11-24 11:43 | 显示全部楼层


[ 本帖最后由 alzeng 于 2009-11-24 22:54 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2009-11-24 11:58 | 显示全部楼层
考虑误差80个字符:
=DAY(A1-DAY(A1)-MOD(A1-DAY(A1),7)+{0;1;2;3;4;5}*7+{1,2,3,4,5,6,7}+(A1<61)*39081)
不考虑误差65个字符:
=DAY(A1-DAY(A1)-MOD(A1-DAY(A1),7)+{0;1;2;3;4;5}*7+{1,2,3,4,5,6,7}
单元格自定义格式看附件

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2009-11-24 15:11 | 显示全部楼层
不考虑误差:=DAY({0;1;2;3;4;5}*7+{2,3,4,5,6,7,8}+A1-DAY(A1)-WEEKDAY(A1-DAY(A1)+1))
考虑误差:=(DAY({0;1;2;3;4;5}*7+{2,3,4,5,6,7,8}+A1-DAY(A1)-WEEKDAY(A1-DAY(A1)+1))-(A1<61))/(A1<>60)

附件自定义格式说明
T7单元格自定义格式:[=0]31;[<15]"";0
I3:W4单元格自定义格式:[>15]"";[=0]"";0
除T7外,I7:W8单元格自定义格式[<15]"";0

================================================
-DAY(A1)用得好,单元格格式用到位,是用减量调整的,但总体上
没发挥好.

                                               ===wshcw===
================================================

[ 本帖最后由 wshcw 于 2009-12-24 22:54 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2009-12-18 10:29 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
=TEXT({1,2,3,4,5,6,7}+7*{0;1;2;3;4;5}-WEEKDAY(A1-DAY(A1)+1)+1,"[>"&DAY(DATE(YEAR(A1),MONTH(A1)+1,))&"]"""";;#")
=TEXT({1,2,3,4,5,6,7}+7*{0;1;2;3;4;5}-WEEKDAY(A1-DAY(A1)),"[>"&DAY(EOMONTH(A1,0))&"]"""";;#")


============================================================
请把附件发上来.

                                                                           ===wshcw===
============================================================

[ 本帖最后由 wshcw 于 2009-12-18 19:02 编辑 ]

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2009-11-25 12:09 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
不考虑误差公式:
=DAY(FLOOR(A1-DAY(A1),7)+{0;1;2;3;4;5}*7+{1,2,3,4,5,6,7})
考虑误差公式:
=DAY(FLOOR(A1-DAY(A1),7)+{0;1;2;3;4;5}*7+{1,2,3,4,5,6,7}-(A1<32))-(A1>31)*(A1<61)



==================================================
不考虑误差公式只有57个字符,写得很精采,单独加一分,但考虑误差
公式就没上一个精采.

                                                ===wshcw===
==================================================

[ 本帖最后由 wshcw 于 2009-12-24 22:44 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2009-11-25 14:24 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
再次修改,目前只能这样了

=====================================================
-DAY(A1)用得好,单元格格式用到位,是用减量调整的,总体发挥很好.
                           
                                                        ===wshcw===
=====================================================

[ 本帖最后由 wshcw 于 2009-12-24 22:56 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2009-11-26 10:52 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助



[ 本帖最后由 zhaozyuan 于 2009-11-26 12:26 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2009-12-3 11:55 | 显示全部楼层
答案如下:


=======================================
没按要求完成,而用条件格式来做,不能评分了.

                                               ===wshcw===
========================================

[ 本帖最后由 wshcw 于 2009-12-24 23:15 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

TA的精华主题

TA的得分主题

发表于 2009-12-7 11:31 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
不考虑误差(77)
=TEXT(FLOOR(A1-DAY(A1),7)+{1,2,3,4,5,6,7}+{0;1;2;3;4;5}*7,"mdd")-MONTH(A1)/1%

考虑误差(89)
=TEXT(FLOOR(A1-DAY(A1),7)+(A1%<1)*365+{1,2,3,4,5,6,7}+{0;1;2;3;4;5}*7,"mdd")-MONTH(A1)/1%

单元格数字格式:"[>31] ;[>0]0;;"
========================================================
把附件传上来看看.
                                                           ===wshcw===
========================================================

附件已经加上。


照顾Excel2007,单元格数字格式修改为: "[>31] ;;0;"  |附件更新
===================================================
能想到FLOOR函数,很不错,但公式就应该更短一些.
                                                       ===wshcw===
====================================================

[ 本帖最后由 wshcw 于 2009-12-24 23:21 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

评分

1

查看全部评分

您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-12-4 01:20 , Processed in 0.052155 second(s), 20 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表