一:使用控件
1.在菜单栏或工具栏任意位置单击右键,调出“控件工具箱”对话框(必须要有VBA环境才能使用“控件工具箱”)。
2.在“控件工具箱”中选中“数值调节按钮”(图标:),在WPS表格的空白区拖动绘制一个调节按钮。
3.对“调节按钮”单击右键,从菜单中选择“属性”,将Linkedcell属性的设置为“E1”,如图所示。旨在关联单元格与控件,当用户单击“调节按钮”时,“E1”单元格的数值会随之变化。
4.关闭“属性”对话框,单击“控件工具箱”中的“退出设计模式”按扭(图标:)。
二:定义名称
为了获取实际生产进度的达标率,现在需要通过定义一个名称来实现。
1.选择菜单中的插入\名称\定义,进入定义名称对话框,在“引用位置”处输入:
=SUM(OFFSET($C$3,0,0,$E$2,1))/$B$9
2.在上方的名称框中处输入“达标率”,并单击右边工具栏上的“添加”按钮,即完成名称定义工作。
方法/步骤请跟随如下 *** 作;
在EXCEL窗口中执行“视图”→“工具栏”→“控件工具箱”;d出如下图对话框;
按上图的 *** 作,找到“日历控件11.0”,之后在EXCEL窗口中使用鼠标左键一拖,拖出如下图的控件;
上图,我们要实现的结果是:在C列中,无论点击哪个单元格,就d出日历控件,选择一个日期之后,日期自动插入到单元格;除C列之外,点击其他列的单元格,不会d出日历选择控件;
要想实现这样的效果,得使用VBA来实现;
选择日历控件,鼠标左键双击,进入代码编辑模式;如下图!
上图中,第一个过程代码就是日历控件所需要的代码,另外,还得需要另外一个代码,在图中按红线圈住部分选择,找到对应的过程,输入如下的VBA代码即可!
完成之后,直接运行VBA代码,返回EXCEL *** 作窗口,即可实现效果了!
如上图,C3单元格已插入了日期,当你选择C列其他单元格时,就d出日历控件,以供选择,选择完成,即可插入日期了!
为方便 *** 作,提供源代码:
Private Sub Calendar1_Click()
ActiveCell = Calendar1.Value
Me.Calendar1.Visible = False
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
Me.Calendar1.Visible = True
Else
Me.Calendar1.Visible = False
End If
End Sub
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)