如何使单选按钮的条件动态化?例如。如果我有一个单选按钮"是"在A100中,与之相关的条件出现在A103中。而且,如果我插入行,我希望两者(按钮及其值)相应地移动。
Sub OptionButton21_Click()
Range("A103") = " Not Applicable "
End Sub
Sub DynamicRange()
'Best used when only your target data is on the worksheet
'Refresh UsedRange (get rid of "Ghost" cells)
Worksheets("Sheet1").UsedRange
'Select UsedRange
Worksheets("Sheet1").UsedRange.Select
End Sub
提前致谢
答案 0 :(得分:0)
使用指定范围
1 - 选择目标单元格(即A103
)并在"名称框中为其命名"在屏幕的左上角。假设您选择了名称" MyTargetName"
2-使控件随细胞移动。
Right-click the control --> Format control --> Properties --> Move but dont size with cells
3-在VBA代码中,按名称而不是地址引用目标单元格:
Sub OptionButton21_Click()
Range("MyTargetName") = " Not Applicable "
End Sub
每当插入新行时,这将使引用的目标与控件一起正确移位。