Excel 2013 - 引用不同工作表上的多个复选框

Question

我的主管要求我做一些我从未做过的事情，但我也无法在网上找到解决方案。

电子表格中设置了五个单独的复选框（假设为复选框 1、复选框 2...），每个复选框代表一个相应的值，1-5。（例如，如果此服务 (1) 不可接受，则选中复选框 1。如果此服务 (2) 可接受，则选中复选框 2。如果此服务 (3) 成功，则选中复选框 3，依此类推）

在单独的电子表格中的一个单元格中，我应该以数字形式表示选中了哪个框。例如，如果该人勾选了 Sheet1 上的 3 框（复选框 3），我必须在 Sheet2 上显示数字“3”。如果他们选中了 Sheet1 上的复选框 4，我必须在 Sheet2 上显示数字“4”。

为了便于理解，这里有一张图片：

我想我只是不知道如何在另一张表上用数值表示五个复选框中的一个。我真的很纠结，有什么可以帮到我的吗？

Answer 1

按照本指南操作选项框在 Sheet1 上：

http://www.excel-easy.com/vba/examples/option-buttons.html

假设你放了4个盒子，那么在工作表1：

Private Sub OptionButton1_Click()
    Dim wkb As Workbook
    Set wkb = ThisWorkbook
    wkb.Sheets(2).Cells(1, 1) = 2
End Sub

Private Sub OptionButton2_Click()
    Dim wkb As Workbook
    Set wkb = ThisWorkbook
    wkb.Sheets(2).Cells(1, 1) = 2
End Sub

Private Sub OptionButton3_Click()
    Dim wkb As Workbook
    Set wkb = ThisWorkbook
    wkb.Sheets(2).Cells(1, 1) = 3
End Sub

Private Sub OptionButton4_Click()
    Dim wkb As Workbook
    Set wkb = ThisWorkbook
    wkb.Sheets(2).Cells(1, 1) = 4
End Sub