VBA设置按钮，在某个单元格随机生成数据之后锁定该单元格，再次点解锁并重新生成数据

操作步骤：

（1）插入按钮

——右击——命令按钮对象——编辑：“锁定”——点击按钮外的任一单元格

——选择按钮——Ctrl+C——Ctrl+V

至此拷贝了一个，按照上面操作步骤，将“锁定”改为“解锁”吃款后渐语值毛担第。

（2）编辑代码

1）点击“锁定再”按钮，出现：

Private Sub CommandButton1_Click()  

End Sub

在中间编辑图2的上部的内容。

2）点击“锁定”按钮，出现： 

 Private Sub CommandButton1_Click()

 

 End Sub 

 在中间编辑图2的下部的内容。

（3）将两个按钮重叠。
（4）退出设计模式。

Private Sub CommandButton360问答1_Click() 

'锁定    

    ***.visible = Fal利分当调副持找京表深se

    ***.visible = True

    ***.protect Password:="123", DrawingObjects:=True, _

        Contents:=True, Scenarios:=内介类条全蒸业True 

End Sub 

Private Sub CommandButton2_Click()

 '解锁    

     ***.visible = False

     ***.visible = True

    ***.unprotect (123)

    '在此生帮杂该严质蒸成随机数据 

End Sub