怎么实现调用日历控件功能

cqxingchen

怎么实现E2:F1999这个区域内调用日历窗口控件功能，比如：点E2单元格弹出日历窗口，点击日历后，自动关闭，求助大神帮忙解决一下！万分感谢！

cqxingchen

经过修改，能E2:E1999能弹出日历窗口，但无法显示日历数值；F列全部都弹出了窗口，不能实现只需要F2:F1999弹出功能。

Lonzo丶

你都写到这种程度了，再随便改改不就好了
        If Target.Column = 5 Or Target.Column = 6 Then
            If Target.Row > 1 And Target.Row < 2000 Then
                CalendarForm.Show
            End If
        End If

cqxingchen

Lonzo丶 发表于 2019-12-18 13:33
你都写到这种程度了，再随便改改不就好了
        If Target.Column = 5 Or Target.Column = 6 Then
     ...

谢谢，区域已解决，但是弹出的日历没有数值。

a18b88

cqxingchen 发表于 2019-12-18 14:50
谢谢，区域已解决，但是弹出的日历没有数值。

可以出数字了，但是不能录入单元格。 日历控件.rar (47.73 KB, 下载次数: 121)

2019-12-18 15:31 上传

点击文件名下载附件

Lonzo丶

cqxingchen 发表于 2019-12-18 14:50
谢谢，区域已解决，但是弹出的日历没有数值。

没注意还有控件的问题，那个完全不懂。