码迷,mamicode.com
首页 > 其他好文 > 详细

Excel 日历控件的使用

时间:2015-10-29 23:33:11      阅读:247      评论:0      收藏:0      [点我收藏+]

标签:

http://www.excelpx.com/thread-255298-1-1.html

Private Sub Calendar1_Click()
With Calendar1
ActiveCell = .Value ‘赋值给激活单元格
.Visible = False ‘隐藏日历控件
End With
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Calendar1
If Target.Column = 3 Then ‘如果选择C列
.Top = Target.Offset(0, 1).Top ‘设置位置
.Left = Target.Offset(0, 1).Left
.Visible = True ‘显示日历控件
Else
.Visible = False ‘隐藏日历控件
End If
End With
End Sub

 

Excel 日历控件的使用

标签:

原文地址:http://www.cnblogs.com/dotion/p/4922041.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!