Question

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

Answer 1

选择日历控件将日期插入到指定的列：
在EXCEL窗口中执行“视图”→“工具栏”→“控件工具箱”→最后一个“其他控件”→“日历控件11.0”
→确定→鼠标变为细十字后，在EXCEL窗口中选定的单元格的右下角，使用鼠标左键拖出如日历图→双击图片→进入代码编辑模式→选择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操作窗口，即可实现效果了！
有帮助望采纳