作者:电脑信息网日期:
返回目录:设置问题
看来你使用的是【控件工具箱】里的【数字调节钮】
设置时当然需要设置链接,比如你要将结果显示在A1,在【LinkedCell】后填写:A1
建议你使用【窗体】里的【微调项】,这里的设抄置更加直观!
当然也需要设置【单元格链接】,就是你要在哪个单元格去显示这些数据,比如你要显示在A1,在【单元格链接】里填写:A1
还有你说的【多种步长】的问题,百我们可以在【数字调节钮】的控制事件里用VBA去编写!
也可以“另辟蹊径”,使用公式来解决!以【微调项】度的方法为例:
右键【设置控件格式】【控制】里:
最小值:0
最大值:51
步长:1
单元格链接:Z1
确定
我们在A1单元格写公式:
=IF(Z1=0,0,(Z1+9)*100)
有2种方法
1.是单元格内容是=rand()
通过设置手动刷新来防止=rand的变化
使用工作表事件,点工作表标签,右键查看代码
然后复制一下代码,回到工作表即可。
(按F9即可刷新数据,e799bee5baa6e59b9ee7ad94365手动重算的公式不会自动计算)
Private Sub Worksheet_Change(ByVal Target As Range)
Application.Calculation = xlManual
If Target.Address = "$A$10" Then
Calculate
End If
End Sub
2.就是用vba随机函数Rnd控制随机数字,效果同=rand(),返回的是随机得到的结果而非可以变化的公式.复制以下代码到工作表代码
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Rng As Range, Rg As Range
Set Rng = Range("A1:C60")
Application.Calculation = xlAutomatic
Application.EnableEvents = False
If Target.Address = "$A$10" Then
For Each Rg In Rng
Rg = Rnd
Next
End If
Application.EnableEvents = True
End Sub
在Excel中设置刷新按钮的操作方法如下:
1.首先打开Excel表格,点击左上方的文件按钮。
2.在文件中点选项按钮。
3.在公示下 把手动重算选中即可。