如何在EXCEL单元格中制作可以选择的下拉日历并自动填充

Posted 2023-05-06

参考技术A 用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 单元格中下拉菜单？ [关闭]

【中文标题】如何使用键盘在 Excel 单元格中下拉菜单？ [关闭]

【英文标题】：How to use keyboard to drop-down a menu in an excel cell? [closed]

【发布时间】：2012-11-03 17:45:50

【问题描述】：

我在 Excel 单元格中创建了一个下拉菜单。每次我想在该单元格中输入一个值时，在使用键盘将焦点导航到该单元格后，我无法使用键盘删除下拉菜单。我必须使用鼠标单击向下的箭头，然后从菜单中进行选择。

我想知道是否有键盘快捷键可以实现相同的功能？ （我很确定那里会有一些捷径......）

【参考方案1】：

键盘快捷键是

Alt+向下箭头

然后向左箭头选择顶部，然后再次向上/向下从内部选择。输入选择。

【讨论】：

非常感谢 Jüri Ruut。我一直在浪费大量时间移动鼠标。

这在 Mac 上是错误的...一些单元格将显示数据验证列表，对于某些单元格它将显示同一列上其他单元格的值...