EXCEL单元格中如何做到，点进去可以进入日历选择日期，最好发个样本给我，tiger5285@sina.cn

发布网友发布时间：2022-06-07 07:36

共3个回答

热心网友时间：2023-10-16 18:33

首先插入 ACTIVE 控件其他控件日历
然后按 ALT F11 将下面代码复制进去，
Private Sub Calendar1_Click()
ActiveCell.Value = Calendar1.Value
Calendar1.Visible = False

End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Column = 1 Then
Calendar1.Visible = True
Calendar1.Left = ActiveCell.Left + ActiveCell.Width
Calendar1.Top = ActiveCell.Top + ActiveCell.Height

Else
Calendar1.Visible = False
End If

End Sub

热心网友时间：2023-10-16 18:34

已发送。。。

热心网友时间：2023-10-16 18:34

插入日历控件

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com