最近在发愁一件事情:用透视表做的月统计表,总感觉太low了。
于是兰色又开启天马行空式的思索.....哈哈,脑海里竟然浮现出日历的模板,说做就做,做出的效果真的不一般,不仅颜值拉满,而且非常的实用。
你以为仅如此吗?NO! 它还可以查看详细销售项目汇总。
还可以生成详细销售清单
嘿嘿...我猜你肯定想知道是怎么做到的,下面跟兰色一起做吧。
步骤1 做日历
在第一个格中输入公式
=DATE(C3,E3,1)-WEEKDAY(DATE(C3,E3,1),2)+1
其他日期用+1和+7即可生成。
把非本月的日期隐藏:按ctrl从下向上选取日期行添加条件格式
条件:=month(C6)<>$E$3
格式:自定义代码 ;;;(3个分号)
再把通过自定义代码d把日期显示成天数。
步骤2 添加每日销售汇总数字
=IF(MONTH(C6)<>$E$3,0,SUMIF(销售明细表!$B:$B,C6,销售明细表!$G:$G))
注:如果不是本月日期结果返回0,是本月就根据日期用SUMIF从销售明细表中汇总金额。销售明细表!$B:$B为日期列,销售明细表!$G:$G为金额列。
步骤3 生成销售汇总和销售明细
这里要使用两段代码辅助完成
把选取的日期输入到单元格中的事件程序:
添加方法:在工作表标签上右键 - 查看代码 - 把下面代码粘贴到右侧的空白处
Private Sub Worksheet_SelectionChange(ByVal Target As Range)On Error Resume NextIf Target.Column < 10 And Target.Column > 2 And Target.Row > 5 And Target.Row < 16 ThenIf IsDate(Target) Then [Q2] = TargetElse [Q2] = Target.Offset(-1, 0) End If 生成明细End IfEnd Sub
生成销售明细的筛选代码
添加方法:在工作表标签上右键 - 查看代码 - 在新窗口中插入 - 模块,把下面的代码粘贴空白处。
Sub 生成明细() Sheets("销售明细表").Range("B1:L1100").AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=Range("销信日历!Criteria"), CopyToRange:=Range("Q5:AA5"), _ Unique:=FalseEnd Sub
如果你的版本是office365,上面这段代码可以用filter公式完成。
步骤4 另存为启用宏的excel工作簿
转眼间,日历已经翻到了2023年,新的一年无论是工作还是学习都要学会拒绝拖延,提高时间利用效率,快来给自己制定一份元气满满的新年计划吧!
2023年日历计划表当然,如果你觉得自己设计和制作计划表过于困难,可以通过借助现成的表格模板,今天我给大家带来一套2023年日历计划表。
这是用Excel设计制作的,通过结合日历表来制定计划,月份之间跳转简单,当月当天计划内容一目了然,还可以自动汇总统计计划完成情况。
1、 月份跳转方便用办公软件打开2023年日历计划表,即可查看不同月份计划内容,不同月份之间可以直接点击跳转查看,非常方便。
2、自动汇总事项可以自己选择当月计划内容完成程度,计划内容事项可以自动汇总统计,包括已完成和未完成事项都可统计,当月当天计划内容一目了然就可以看到,很适合团队计划内容共享和项目推进;
3、操作简单方便因为这是用Excel制作的表格,所以不需要我们下载和注册复杂的软件,直接用常用的办公软件打开就可以操作,如果需要团队内容共享,只需要上传在线文档即可,大家可以共同编辑和执行计划。
简单来说,这套2023日历和计划表,可以让工作和学习有条不紊!职场人士和在校学生都有用!2023已开启,我们满怀希望和信心,我们希望比以前会更好,让我们从做计划开始吧!