Excel 选中复选框时显示字符串的宏

Excel 选中复选框时显示字符串的宏,excel,vba,checkbox,Excel,Vba,Checkbox,我在表格1上有一个复选框(总共有7张左右)。如果选中复选框(true),我希望在单元格M9中显示“已批准”。如果复选框未选中(false),我希望它在文本框中显示“拒绝” 我需要为此创建宏吗 如果我希望它在sheet2的单元格M5中显示相同的文本,我将如何将其全部放在一起?您可以将复选框的状态链接到单元格(右键单击、格式控制、控制选项卡上的单元格链接),这意味着您可以在任何其他工作表或单元格中引用该单元格。您可以将复选框的状态链接到单元格(右键单击“控制”选项卡上的“格式控制”、“单元格链接”)

我在表格1上有一个复选框(总共有7张左右)。如果选中复选框(true),我希望在单元格M9中显示“已批准”。如果复选框未选中(false),我希望它在文本框中显示“拒绝”

我需要为此创建宏吗


如果我希望它在sheet2的单元格M5中显示相同的文本,我将如何将其全部放在一起?

您可以将复选框的状态链接到单元格(右键单击、格式控制、控制选项卡上的单元格链接),这意味着您可以在任何其他工作表或单元格中引用该单元格。

您可以将复选框的状态链接到单元格(右键单击“控制”选项卡上的“格式控制”、“单元格链接”),这意味着您可以在任何其他工作表或单元格中引用该单元格。

专用子复选框1\u click()
如果CheckBox1.Value=True,则
范围(“M9”).Value=“已批准”
否则
范围(“M9”).Value=“拒绝”
图纸(“图纸2”).范围(“M5”).Value=“拒绝”
如果

结束子复选框1\u单击()
如果CheckBox1.Value=True,则
范围(“M9”).Value=“已批准”
否则
范围(“M9”).Value=“拒绝”
图纸(“图纸2”).范围(“M5”).Value=“拒绝”
如果

End Sub

谢谢,但我不知道我需要什么类型的代码。有什么建议吗?没有代码,只有公式:=如果(a9,“a9为真”,“拒绝”),你在哪里有问题?你的意思是不是,=如果checkbox1.value=真,“拒绝”这样行吗?不,我不是说checkbox1.value。而且,不,它行不通。您需要将复选框链接到单元格,如前所述。您说希望根据sheet1上的复选框将文本放入单元格中。为什么现在希望使用代码?请更新您的问题以显示您的新要求。最简单的方法很好。如何链接复选框到一个单元格?谢谢,但我不知道我需要什么类型的代码。有什么建议吗?没有代码,只有公式:=如果(a9,“a9为真”,“拒绝”),你哪里有问题?你的意思是不是,=如果checkbox1.value=真,“拒绝”这样行吗?不,我不是说checkbox1.value。而且,不,它行不通。您需要将复选框链接到单元格,如前所述。您说希望根据sheet1上的复选框将文本放入单元格中。为什么现在希望使用代码?请更新您的问题以显示您的新要求。最简单的方法很好。如何链接复选框到一个单元格?你不认为是一个用户表单吗?上面的代码需要添加到sheet1上的复选框中,当然跳过代码并简单地链接一个单元格更容易?这很好。链接一个单元格将消除代码,这将是一个加号,但我不知道如何做。你不认为是一个用户表单吗?上面的代码需要添加添加到sheet1上的复选框中,跳过代码并简单地链接一个单元格当然更容易?这非常有效。链接一个单元格将消除代码,这将是一个加号,但我不知道如何做到这一点。