1、插入两个选项控件（菜单栏，开发工具，插入，activex控件）2、复制如下代码到该sheet模块中。3、回到sheet界面即可实现该操作。Private Sub OptionButton1_Change()If OptionButton1.Value = True Then Worksheets(1).Shapes("图片 1").Visible = TrueIf OptionButton1.Value = False Then Worksheets(...