如何在excel中的日历控件加文字

用VBA做一个代码，可以在知选中E2单元格时弹出一个日历控件，选择日期后日历控件就自动隐藏，同时E2单元格显示刚才选中的日期值。
先在工作表中道添加一个日历控件，然后点下面工作表标签名回字，按鼠标右键，从弹出的快捷菜单中选“查看代码”，然后把下答面代码粘贴进去，回到excel窗口就能使用了。
Private Sub Calendar1_Click()
Range("e2") = Calendar1.Value '让E2单元格显示日历控件的值
Calendar1.Visible = False
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$E$2" Then
Calendar1.Visible = True
Else
Calendar1.Visible = False
End If
End Sub

选择日历控件将日期插入到指定的列： 在EXCEL窗口中执行“视图”→“工具栏”→“控件工具箱”→最后一个“其他控件”→“日历控件11.0” →确定→鼠标变为细十字后，在EXCEL窗口中选定的单元格的右下角，使用鼠标左键拖出如日历图→双击图片→进入代码7a64e59b9ee7ad94339编辑模式→选择Worksheet和SelectionChange模式下输入代码（可复制粘贴）：
Private Sub Calendar1_Click()
ActiveCell = Calendar1.Value
Me.Calendar1.Visible = False
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 8 Then
Me.Calendar1.Visible = True
calendar1.top=target.top
Else
Me.Calendar1.Visible = False
End If
End Sub

最重要的是第6行（If Target.Column = 8 Then）中的8表示的是第几列，按你实际需要的列数修改即可。返回EXCEL操作窗口，即可实现效果了！

有帮助望采纳

1、首先在电脑上用2007版excel软件打开目标文百件，度选中目标合并单元格。

2、然知后在单元格中输入文字内容。道

3、然后将光标移动至文字前面，如图所示。

4、然后点击键回盘上的空格键两下。

5、完成以上设置后，即可解决提答问者的要求。

Excel2007单元格插入日历模版的方法：

1、打开Excel2007，单击office按钮，zhidao选择新建。

2、选择日历选项卡，然后选择一款样式。

3、可以预览样回式，选择喜欢的那一个。

4、确定之后，等待系统完成下载，不大答，不需要太多时间。

5、下载完成，看看模版。