在Excel中使用日期控件方法详解(补充日历控件12.0的用法)

两种日历控件的用法

在Excel中使用日期控件方法详解

1. 插入日期控件

①. 打开需要插入日期控件的工作薄,依次点击【视图】【工具栏】【控件工具箱】,调出控件工具栏。

②. 点击控件工具栏中的〖其他控件〗 ,选择(Microsoft Date and Time Picker Control,version 6.0)控件。

③. 在工作表内需要填写日期的单元格中画出日期控件图标,调整大小与单元格一致。

2. 编辑代码

① 点击控件工具栏中的〖查看代码〗 ,进入代码编辑页面,编辑如下代码:

Option Explicit

Private Sub DTPicker1_Change()

ActiveCell.Value = DTPicker1.Value

DTPicker1.Visible = False

End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

With Me.DTPicker1

If Target.Column = 1 And Target.Count = 1 Then

.Visible = True

.Width = Target.Width + 15

.Left = Target.Left

.Top = Target.Top

.Height = Target.Height

Else

.Visible = False

End If

End With

End Sub

【提示】:上列代码中,红色的1表示该控件作用于工作表中第一列,如需调整,直接修改为相应的列数即可;如果需要将该控件作用于某一行,则把代码中Target.Column改为Target.Row即可。

② 关闭代码编辑页面返回工作表,点击控件工具栏中的〖属性〗 ,进入属性编辑页面,调整CheckBox属性为True。

Word文档免费下载Word文档免费下载:在Excel中使用日期控件方法详解(补充日历控件12.0的用法) (共2页,当前第1页)

在Excel中使用日期控件方法详解(补充日历控件12.0的用法)相关文档

最新文档

返回顶部