EXCEL如何用选项按钮和组合框设置一个动态图形

您可以使用选项按钮和组合框来控制动态图形的显示效果。下面是一个简单的步骤：

1. 在Excel中插入一个选项按钮和一个组合框。可以在“开发人员”选项卡中找到这些控件，如果您的Excel中没有“开发人员”选项卡，可以通过“文件”菜单中的“选项”打开Excel选项对话框，在左侧窗格中选中“自定义功能区”复选框，然后在右侧窗格中选中“开发人员”复选框。

2. 给选项按钮和组合框命名，以便在VBA编程中引用它们。可以在选项按钮和组合框的属性窗口中找到名称属性。

3. 使用VBA编程来控制动态图形的显示效果。以下是一个示例代码：

Private Sub OptionButton1_Click()
    If OptionButton1.Value = True Then
        '显示图形1
        ActiveSheet.Shapes("Rectangle 1").Visible = True
        ActiveSheet.Shapes("Oval 1").Visible = False
    End If
End Sub

Private Sub OptionButton2_Click()
    If OptionButton2.Value = True Then
        '显示图形2
        ActiveSheet.Shapes("Rectangle 1").Visible = False
        ActiveSheet.Shapes("Oval 1").Visible = True
    End If
End Sub

Private Sub ComboBox1_Change()
    Select Case ComboBox1.Value
        Case "大号"
            '调整图形大小为大号
            ActiveSheet.Shapes("Rectangle 1").Width = 200
            ActiveSheet.Shapes("Rectangle 1").Height = 200
            ActiveSheet.Shapes("Oval 1").Width = 200
            ActiveSheet.Shapes("Oval 1").Height = 200
        Case "中号"
            '调整图形大小为中号
            ActiveSheet.Shapes("Rectangle 1").Width = 150
            ActiveSheet.Shapes("Rectangle 1").Height = 150
            ActiveSheet.Shapes("Oval 1").Width = 150
            ActiveSheet.Shapes("Oval 1").Height = 150
        Case "小号"
            '调整图形大小为小号
            ActiveSheet.Shapes("Rectangle 1").Width = 100
            ActiveSheet.Shapes("Rectangle 1").Height = 100
            ActiveSheet.Shapes("Oval 1").Width = 100
            ActiveSheet.Shapes("Oval 1").Height = 100
    End Select
End Sub

在上面的代码中，OptionButton1和OptionButton2分别代表两个选项按钮，ComboBox1代表组合框。根据用户选择的不同，显示不同的图形或者调整图形大小。

请注意，在使用VBA编程时需要启用开发人员选项卡。可以通过单击“文件”菜单，然后单击“选项”打开Excel选项对话框，在左侧窗格中单击“自定义功能区”复选框，然后在右侧窗格中选中“开发人员”复选框。