EXCEL日历控件的应用
Excel日历还有这功能?真是厉害了!
Excel日历还有这功能?真是厉害了!
先来拆解下怎么实现这个功能,先获取到我鼠标点击的单元格日期然后随便匹配下(比如用vlookup)提前准备的事项即可。难点在于旁边的标签怎么知道我是点击的哪一天呢?如果是公式引用,那必须要公式范围或引用位置发生变化才行,但我只是点击了某个单元格根本没有修改任何公式,所以能获取到我鼠标实时点击位置才是关键,普通公式实现不了,VBA代码可以。
先准备一个日历框架,填入日期,把单元格格式设置为自定义 d 将日期单元格区域命名为日期
打开VBE界面,可以按快捷键alt+F11 或点击菜单栏开发工具-visual basic ,找到当前工作表并双击,将代码复制进去
(以下代码可进行复制)
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("日期")) Is Nothing Then
Range("J4") = ActiveCell.Value
End If
End Sub
代码贴进去后暂时不用管,切回到Excel界面,点击日期区域可以看到右侧J4单元格会有显示(代码中预设获取到点击数据后显示在J4) 在其他sheet表做一个详情页,参考如下,内容可以自定义
在J5单元格写入公式=IFERROR(VLOOKUP(J4,详情!$A$2:$B$15,2,0),"暂无计划")
插入一个形状并填充颜色,为了有便签显示的效果
在形状上插入一个文本框,鼠标点击文本框边框处(鼠标会变成双十字状),在编辑栏输入=J4
EXCEL控的时间管理法则利用日历与提醒功能
EXCEL控的时间管理法则利用日历与提醒
功能
EXCEL控的时间管理法则:利用日历与提醒功能
在如今快节奏的生活中,时间管理成为越来越重要的一个技能。对
于喜欢使用电子表格软件EXCEL的人来说,掌握如何利用其中的日历
与提醒功能来提高时间管理效率是一种非常便利且高效的方法。本文
将为您介绍EXCEL控的时间管理法则,帮助您更好地利用日历与提醒
功能来管理您的时间。
一、设置日历
首先,打开EXCEL软件,在顶部工具栏中找到“格式”选项,点击
下拉菜单中的“日期”选项,可以选择“长日期”、“短日期”等不同的日期
格式。选择你喜欢的日期格式并应用。
接下来,可以在EXCEL工作表中设置一个日历表格,以便更清楚
地显示每天的任务和安排。可以使用表格功能来创建一个自定义的日历,包括日期、星期几、任务等栏位,以便更好地进行时间管理和安排。将重要的任务在每天的栏位中进行填写,并根据优先级进行标记,以便清晰明了地管理您的时间。
二、利用提醒功能
EXCEL中的提醒功能可以帮助您及时了解并提醒您的重要任务和
安排。在设置提醒之前,您需要先保存您的EXCEL文件。之后,点击
顶部工具栏中的“文件”选项,选择“选项”来打开设置界面。
在设置界面的左侧菜单中选择“高级”选项,然后在右侧窗口中找到“提醒”选项。在提醒选项中,您可以选择开启或关闭提醒功能,并进
行更细致的设置。
例如,您可以设置提前几分钟或几小时来提醒您的任务,以确保您
有足够的时间做好准备。另外,您还可以选择每天、每周或每月重复
提醒的方式,以确保您不会错过重要的任务或会议。
三、利用条件格式设置
在Excel中使用日期控件方法详解(补充日历控件12.0的用法)
在Excel中使用日期控件方法详解
1. 插入日期控件
①. 打开需要插入日期控件的工作薄,依次点击【视图】【工具栏】【控件工具箱】,调出控件工具栏。
②. 点击控件工具栏中的〖其他控件〗,选择(Microso ft Date and Time PickerControl,version 6.0)控件。
③. 在工作表内需要填写日期的单元格中画出日期控件图标,调整大小与单元格一致。
2. 编辑代码
①点击控件工具栏中的〖查看代码〗,进入代码编辑页面,编辑如下代码:
OptionExplici t
Private Sub DTPicke r1_Cha nge()
ActiveC ell.Value = DTPicke r1.Value
DTPicke r1.Visible = False
End Sub
Private Sub Workshe et_Sel ection Change(ByVal TargetAs Range)
With Me.DTPicke r1
If Target.Column= 1 And Target.Count = 1 Then
.Visible = True
.Width = Target.Width + 15
.Left = Target.Left
.Top = Target.Top
.Height= Target.Height
Else
.Visible = False
End If
End With
End Sub
excel日历控件
excel日历控件
excel日历控件[excel日历控件的调出方法步骤]
1、添加整个月份的日历
关上一个excel表格,页面表格左上角“扳手和锤子”这个其它控件的按钮。
在弹出的对话框中,找到底部的日历控件,点击确定按钮。
握住鼠标左键在表格上面拖曳,构成一个黑色的矩形,抬起鼠标。
插入日历插件成功。拖动可移动日历的位置和大小。
2、嵌入单个日期的日历控件
如何添加单个的日历控件,第一步的方法和上面的一样。点击表格左上角“扳手和锤子”这个其它控件的按钮。
在冲破的对话框中找出microsoftdateandtimepickercontrol6.0的控件,挑选该控件,页面确认按钮。
按住鼠标左键在表格上面拖动,行程一个黑色的矩形,松开鼠标。
填入单个日历插件顺利。拖曳可移动日历的边线和大小。
有些人会说我的excel怎么找不到“其它控件”的按钮。其实呢,它需要我们自己添加才能被显示出来。我们看下怎么添加。
找出文档左上角office按钮,右击,挑选“自定义快速访问工具栏”。
在跳出的excel选项中依次选择自定义--不在功能区中的命令--其它控件--添加--确定。我们就可以在表格左上角插入其它控件的按钮。
猜猜你讨厌:
1.excel加入日期控件的教程
2.excel中版展开调用日历控件的操作方式技巧
3.excel中如何添加日历控件
4.excel单元格中怎样填入日历模板
5.excel加日历控件的方法
6.excel怎样通过日历控件嵌入日历
excel日历工作计划
excel日历工作计划
在日常工作中,我们经常需要制定工作计划,特别是对于需要长期跟进的项目或者任务,一个清晰的工作计划可以帮助我们更好地安排时间、提高工作效率。而在制定工作计划的过程中,Excel 日历工作计划可以成为我们的得力助手。
首先,我们需要在Excel中创建一个日历工作计划的表格。可以根据需要选择月度、季度或者年度的时间跨度,然后按照日期填写每天的具体工作内容。在填写工作内容时,可以根据重要性和紧急程度进行标注,以便更好地安排工作优先级。
其次,在日历工作计划中,我们可以设置提醒功能,以便在工作日程安排发生变化时及时提醒自己。这样可以避免因为疏忽而错过重要的工作任务,提高工作的及时性和准确性。
另外,Excel日历工作计划还可以进行数据分析和统计。通过对工作内容、工作时间、工作进度等数据进行分析,可以及时发现工作中存在的问题和瓶颈,从而及时调整工作计划,提高工作效率和质量。
此外,Excel日历工作计划还可以与其他工作软件进行联动。比如可以将日历工作计划与Outlook等日程管理软件进行同步,这样可以方便地在不同设备上查看和修改工作计划,提高工作的灵活性和便捷性。
最后,要注意定期对日历工作计划进行总结和调整。在工作计划执行过程中,难免会遇到一些意外情况和变化,因此需要定期对工作计划进行检查和调整,以确保工作计划与实际工作情况保持一致。
总之,Excel日历工作计划是一种非常实用的工作管理工具,可以帮助我们更好地安排工作时间、提高工作效率,建议大家在日常工作中充分利用这一工具,相信会对工作产生积极的影响。
Excel在时间管理中的应用
Excel在时间管理中的应用
随着现代社会的快节奏发展,时间管理成为了一项至关重要的能力。而在时间管理中,Excel作为一款强大的电子表格软件,为我们提供了
许多便捷和高效的工具和功能。本文将详细介绍Excel在时间管理中的
应用,并探讨如何利用其功能提升时间管理效率。
首先,Excel提供了强大的日历功能,使得我们可以轻松地创建和
管理日程安排。通过Excel的日期格式和函数,我们可以创建一个清晰
且易于理解的日历表。我们可以将每天的任务安排在不同的单元格中,设置提醒和优先级,还可以添加备注和备注,以便更好地管理和安排
时间。此外,我们还可以根据需要自定义单元格样式,提高可读性和
可视化效果。
其次,Excel提供了强大的排序和筛选功能,帮助我们更好地管理
时间和任务。通过将任务列表输入到Excel表格中,我们可以根据各种标准进行排序,如任务的优先级、截止日期、重要性等。这样一来,
我们可以很容易地找到最紧急或最重要的任务,并确保它们得到及时
处理。同时,Excel的筛选功能可以根据各种条件对任务进行筛选,帮
助我们快速找到符合特定条件的任务,从而更高效地安排和管理时间。
另外,Excel的公式和图表功能也可以在时间管理中发挥重要作用。通过利用公式和函数,我们可以自动计算任务的工作量和进度,并实
时更新。例如,我们可以使用计算函数来自动计算任务的所需时间,
并与实际用时进行比较,以便及时调整和优化时间安排。此外,Excel
的图表功能可以将时间数据可视化,帮助我们更好地理解和分析时间
分配和利用情况。通过图表的呈现,我们可以清楚地看到任务的时间
Excel中插入日期控件
Excel中插入日期控件
2009-07-03 17:12
在Excel中有很多地方要用到日期
自己写实在太麻烦而且每个人写的日期格式还有可能不同
还是弄个日期控件选吧!
如图:
1.【可以跳过】如果你要设置日期的格式化可以选中所要插入日期控件的列
右键选择【设置单元格格式】---在数字这一栏选项卡中的分类选择【日期】--自己选择一种日期样式
2.选中要插入日期控件列的单位格【插入】---【对象】---在对象类型中选择【日历控件11.0】,进行插入
3.出现如图日历控件,拖放到合适位置
(要先进入设计模式才能对控件进行拖放,点击那个有尺子的图标进入设计模式)
4.退出设计模式,双击日历控件,进入代码编写,输入以下代码
-------------------------------------------------------------------------------------
Private Sub Calendar1_Click()
ActiveCell = Calendar1.Value
Me.Calendar1.Visible = False
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'此处的6和7为你要显示日历的列序号
If Target.Column = 6 Or Target.Column = 7 Then
Me.Calendar1.Left = Target.Left
Me.Calendar1.Top = Target.Top
EXCEL日期数据录入技巧使用日期下拉菜单或使用漂亮的控件
EXCEL日期数据录入技巧使用日期下拉菜单或使用漂亮
的控件
在Excel中,我们经常需要录入日期数据。使用日期下拉菜单或漂亮的控件可以提高数据录入的准确性和效率。下面是一些常用的Excel日期数据录入技巧。
一、使用日期下拉菜单
1.创建一个日期列表
首先,我们需要创建一个日期列表,可以按照下面的步骤进行操作:-在一个单元格中输入起始日期,比如"2024/01/01";
-在下一个单元格中输入下一个日期,比如"2024/01/02";
-选中这两个单元格,将鼠标移到右下角的小黑点上,直到光标变为十字箭头,按住鼠标左键拖动到需要的日期范围,比如"2024/12/31";
-松开鼠标左键,就会生成一个日期列表。
2.创建数据验证规则
接下来,我们需要将日期列表应用到需要录入日期的单元格中,可以按照下面的步骤进行操作:
-选中需要应用日期列表的单元格,比如"A2:A100";
-在"数据"选项卡中的"数据工具"分组中,点击"数据验证"按钮;
现在,对应的单元格就会显示一个下拉箭头,点击箭头就会显示日期列表,可以从列表中选择一个日期进行录入。
Excel提供了一些漂亮的控件,可以快速和直观地选择日期,比如下拉式日期选择器、日历控件等。以下是两种常见的漂亮控件的使用方法。
1.下拉式日期选择器
- 在Excel中,打开"文件"选项卡,选择"选项";
- 在"Excel选项"对话框中,选择"自定义功能区";
-在"功能区"选项卡中,选中"开发工具"复选框,然后点击"确定"按钮;
- 在Excel的顶部菜单中,选择"开发工具"选项卡,然后点击"插入"按钮;
在Excel中使用日期控件方法详解(补充日历控件12.0的用法)
在Excel中使用日期控件方法详解(补充日历控件12.0的用法)在excel中使用日期控件方法详解
1.插入日期控件
①.打开需要插入日期控件的工作薄,依次点击【视图】【工具栏】【控件工具箱】,调出控件工具栏。
②. 单击控件工具栏中的其他控件,然后选择(Microsoft日期和时间选择器控件,
版本6.0)控件。
③.在工作表内需要填写日期的单元格中画出日期控件图标,调整大小与单元格一致。
2.编辑代码
①点击控件工具栏中的〖查看代码〗,进入代码编辑页面,编辑如下代码:optionexplicit
privatesubdtpicker1_uuChange()活动单元格。value=dtpicker1。ValuedPicker1。visible=falseendsub
privatesubworksheet_selectionchange(byvaltargetasrange)withme.dtpicker1
iftarget。列=1和目标。计数=1次。可见=真实
.width=target.width+15.left=target.left.top=target.top.height=target.heigh telse
.visible=falseendifendwithendsub
【提示】:上列代码中,红色的1表示该控件作用于工作表中第一列,如需调整,直
接修改为相应的列数即可;如果需要将该控件作用于某一行,则把代码中target.column
改为target.row即可。
② 关闭代码编辑页面并返回工作表。单击控件工具栏中的属性,进入属性编辑页面,并将复选框属性调整为true。
Excel如何在窗体中插入并使用日历控件?窗体,控件,日历
件名,不同版本可能会有不同),这时“控件⼯具箱”最后会出现⽇历控件图标,如下图所⽰:
选中⽇历控件即可在窗体绘制了。
⽤法:可引⽤⽇历控件的值,如textbox1.text=Calendar1.Value,类型为⽇期。
<>
Excel2010中添加日历控件的操作方法
Excel2010中添加日历控件的操作方法
推荐文章
Excel中2010版快速插入日历的操作方法热度: Excel中进行添加单选按钮复选框和隐藏组合框的方法热度:Excel中2010版进行添加数据透视表的操作方法热度:Excel中2010版进行快速访问工具添加分隔符的操作方法热度:Excel中2010版进行添加开发工具选项卡的操作方法热度:
我们都知道,excel有直接快速插入当前日期和时间的功能,但是当我们要插入其他日期时,我们该怎么做呢?今天,店铺就教大家在Excel2010中添加日历控件的操作方法。
Excel2010中添加日历控件的操作步骤如下:
通过菜单的开发工具插入日历控件。
首先在菜单区域右击,选择右击菜单的自定义工具栏customize the ribbon...,弹出对话框,将developer添加到右边,确认退出,则菜单栏就会出现developer选项。
选择developer项,然后点击insert,选择更多控件more controls,然后在弹出的窗口选择日历控件,确定退出。这时候你会发现,鼠标光标变成了十字图标,点击需要添加日期的单元格,则日历添加成功。
添加的日历控件好像锁定了,点击下拉箭头根本没有反应,怎么回事呢?
原因是添加进来的控件是处于设计状态,这时候只要将设计状态取消,就可以选择日期了。
工作计划日历Excel
工作计划日历Excel
工作计划日历Excel是一种电子表格工具,用于在日历视图中记录和管理工作计划的时间和任务。它可以帮助人们更方便地跟踪工作进度,协调和安排任务,提高工作效率。
工作计划日历的使用方式可以因人而异,但通常包括以下几个方面:
1. 创建新的工作计划日历:在Excel中,可以通过新建表格来创建一个新的工作计划日历。可以根据需求选择日历的起始日期以及显示的时间范围。可以设置每日的时间间隔,使得工作时间更加精确。
2. 添加任务和事件:在日历中,可以添加任务和事件。可以使用工作计划日历的列和行来记录任务的具体事项,如任务名称、负责人、开始时间、结束时间等。也可以使用颜色、字体、图标等方式来标记不同类型的任务,以便更好地区分和识别。
3. 设置提醒和提醒功能:工作计划日历还可以帮助用户设置提醒功能,提醒用户何时开始或完成某项任务。通过设置提醒,可以在指定的时间收到系统或软件的通知,以确保任务按时完成。提醒功能有助于提醒用户了解下一步需要做的事项,并避免遗漏。
4. 分享和协作:工作计划日历可以在团队中共享和协作。多个人可以同时编辑
和更新日历,以便实时跟踪和了解任务的状态和进程。此外,还可以在工作计划日历中添加备注、附件和链接,方便团队成员之间的沟通和协调。
5. 数据分析和报表生成:工作计划日历可以帮助用户分析和报表生成。通过统计任务的完成情况、时间分布等数据,可以评估及时性和效率性。并且可以生成图表和报表,以便更直观地展示工作计划和进展情况。
总之,工作计划日历Excel是一种简单实用的工具,可以帮助人们更好地组织和管理工作。通过使用工作计划日历,可以将工作计划清晰地展现在时间轴上,方便跟踪和协调任务的进行。同时,还能通过提醒功能、共享协作等特性,提高工作效率和团队协作效果。最后,通过数据分析和报表生成,可以评估和改进工作计划的实施情况,从而不断提升工作质量和效果。
excel的datepicker使用方法
excel的datepicker使用方法
Excel是一款功能强大的电子表格软件,它不仅可以用于数据的计算和分析,还可以进行数据的可视化和展示。在Excel中,日期选择器(Date Picker)是一种非常实用的工具,可以帮助用户快速选择日期并输入到单元格中。本文将介绍Excel中日期选择器的使用方法。
一、在Excel中插入日期选择器
要在Excel中使用日期选择器,首先需要将日期选择器插入到工作表中。插入日期选择器的方法如下:
1. 打开Excel并选择要插入日期选择器的工作表。
2. 在菜单栏中选择“开发工具”选项卡,如果没有该选项卡,需要先进行设置。
3. 在“开发工具”选项卡中,点击“插入”按钮,然后选择“日期选择器”。
4. 在工作表中选择一个合适的位置,点击鼠标左键插入日期选择器。
二、设置日期选择器的属性
在插入日期选择器后,可以对其进行各种属性的设置,以满足不同的需求。日期选择器的属性设置方法如下:
1. 右键点击日期选择器,选择“属性”。
2. 在属性窗口中,可以设置日期选择器的字体、颜色、大小等外观
属性。
3. 可以设置日期选择器的日期格式,包括年、月、日的显示格式。
4. 可以设置日期选择器的位置和大小,以适应工作表的布局。
三、使用日期选择器选择日期
在插入日期选择器并设置好属性后,就可以使用日期选择器选择日期了。使用日期选择器的方法如下:
1. 点击日期选择器上的箭头按钮,可以选择年、月和日。
2. 点击箭头按钮后,会弹出一个下拉框,可以通过上下箭头选择需要的年、月或日。
3. 选择完日期后,点击日期选择器旁边的“确定”按钮,日期将会自动输入到相应的单元格中。
excel 日历模板
excel 日历模板
在日常工作和生活中,我们经常需要使用到日历来安排时间、记录重要事件和
安排会议。而Excel作为一款功能强大的办公软件,提供了丰富的模板和功能,可
以轻松创建个性化的日历。本文将介绍如何使用Excel创建日历模板,方便您在工
作和生活中更加高效地安排时间和记录重要事件。
首先,打开Excel并创建一个新的工作表。在第一行输入月份和年份,例如“2023年1月”,并将文本居中对齐。接下来,在第二行输入星期几的标题,从
星期日到星期六,依次排列。然后,在第三行开始,填入日期数字,从1号开始,直到该月的最后一天。可以通过在单元格中输入“=DATE(年份, 月份, 日期)”来自动生成日期。
接下来,可以通过设置单元格的格式来美化日历模板。可以选择合适的字体、
颜色和边框样式,使得整个日历看起来更加美观和清晰。同时,可以使用条件格式来标记特殊日期,比如生日、节假日或者重要会议,以便更快速地识别。
除了基本的日期和星期几之外,我们还可以在日历模板中添加其他信息,比如
工作安排、会议日程、重要事件等。可以在每一天的单元格中输入相关的内容,或者使用备注功能添加更详细的信息。这样一来,日历不仅可以用来记录日期,还可以作为工作和生活的安排表。
另外,为了方便查看和打印,我们可以设置打印区域和打印格式。在打印区域
中选择整个日历的范围,然后设置合适的打印格式,比如纸张大小、横向或纵向打印、页眉页脚等。这样可以确保在打印时日历的格式和内容都能够完整地呈现出来。
最后,保存日历模板并进行必要的调整。可以将日历模板保存为Excel文件,
2019年日历表excel
2019年日历表Excel
介绍
本文介绍如何使用Excel创建一个2019年日历表。日历表是一个常用的工具,可以帮助我们记录并查看时间、安排日程等。使用Excel创建日历表可以更加方便
灵活地编辑和自定义日历内容。
步骤
步骤1:创建新的Excel文档
首先,打开Excel并创建一个新的文档。
步骤2:设置日期格式
在Excel的工具栏上,找到“格式”选项卡,并点击“日期”按钮。选择一个你喜欢的日期格式,比如“年-月-日”。
步骤3:创建表头
在第一个单元格(A1)输入“日期”作为表头。如果需要,可以在其他列输入自
定义的表头,比如“星期一”、“星期二”等等。
步骤4:填充日期
在第二行开始,填充日期数据。你可以手动输入日期,也可以使用Excel的日
期函数自动填充日期。例如,在第二个单元格(B2)输入1/1/2019,然后选中该
单元格,鼠标拖动填充手柄直至填充到1/31/2019。
步骤5:添加星期几
在第二行的表头下方,输入日期对应的星期几。你可以手动输入星期几,也可
以使用Excel的公式来自动计算。例如,假设星期几对应的列从B列开始,输入下列公式到B3单元格中:`=TEXT(B2,
excel calendar使用方法
excel calendar使用方法
Excel Calendar使用方法
一、简介
Excel是一款常用的办公软件,其中的日历功能可以帮助用户管理时间、安排日程和跟踪重要事件。本文将详细介绍如何使用Excel日历功能。
二、创建日历
1. 打开Excel软件并新建一个工作簿。
2. 在工作簿的第一个工作表中,选择你希望日历显示的日期范围,通常是一个月或一年。
3. 在第一行的第一个单元格中输入日期的起始值,例如2022年1月1日。
4. 在第一行的后续单元格中,使用公式或手动输入日期序列。例如,可以在第一个单元格中输入"=A1+1",然后将此公式拖动到其他单元格中以自动生成日期序列。
5. 根据需要,可以在日历中添加其他信息,例如节假日或重要事件。
三、设置格式
1. 选择整个日历区域,包括日期和其他信息。
2. 在Excel的主菜单中,选择"开始"或"格式",然后根据需要选择合适的字体、颜色和边框样式。
3. 可以使用合并单元格功能来合并日期所在的单元格,以便更好地显示日历。
四、自定义日历
1. 如果需要显示特定的日期范围,可以在第一行中输入起始日期和终止日期,然后使用公式或手动输入日期序列。
2. 如果需要显示特定的星期或工作日,可以使用Excel的日期函数来筛选日期序列。例如,可以使用"工作日"函数来排除周末日期。
3. 如果需要在日历中标记特定的事件,可以在日期下方的单元格中输入相关信息,并使用条件格式化功能来突出显示这些事件。
五、打印日历
1. 在打印之前,可以调整日历的大小和布局,以适应打印纸张的大小。可以调整行高、列宽和边距。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
EXCEL日历控件的应用
1 日历控件功能
日历控件可以作为日期的输入工具,以交互方式代替单元格录入;在动态图表制作中,由于日历控件可以链接到特定的单元格,从而返回用户所选择的日期,因此当涉及与日期相关的数据源,且日期作为交互选项时,可以使用日历控件作为动态图表的选择器。
日历控件(见图1)。
图1
2 利用日历控件输入日期
在制作报表时,如果报表包含日期列,可考虑使用日历控件进行日期输入。例如,报表A列是日期列,则可通过以下步骤实现日历控件的日期输入。
Step01 插入日历控件。
按以下路径选择“开发工具-控件-插入-ActiveX控件-其他控件-日历控件12.0命令插入一个日历控件,不作任何设置。
Step02 编写VBA代码。
双击日历控件,进入VBA编辑窗口,并编写如下代码(具体见图2)。
Private Sub Calendar1_Click()
ActiveCell=Calendar1.Value
Me.Calendar1.Visible=False
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column=1Then
Me.Calendar1.Visible=True
Else
Me.Calendar1.Visible=False
End If
End Sub