Show Textbox Caption

**Nuno Neves** · 12-13-2009, 10:49 AM

i have a sheet with 10 CheckBoxes, if one or all are choosen, i want to see the text that are in front of the checkboxes, appear in another sheet, but only the text belong to the check boxes that were choosen.

I dont know how to do that, can you help me ?

**davesexcel** · 12-13-2009, 11:07 AM

What kind of check boxes?, how did you make them? This is actually relevant to the correct answer.

**Nuno Neves** · 12-13-2009, 11:13 AM

the Checkboxes, are selection boxes, i grab from the form and draw in the sheet

i am a beginning, i hope i can make me understand.....

**davesexcel** · 12-13-2009, 12:02 PM

How about this,
Copy this code, right click on the Checkbox and select Assign Macro,select New or edit depending if you have a macro assigned to it already.
paste this code between the sub ...() and end sub

Code:

    Dim myCBX As CheckBox
    Set myCBX = ActiveSheet.CheckBoxes(Application.Caller)

    If myCBX = xlOn Then
        Worksheets("Sheet2").Range("A1") = myCBX.Caption
    Else
        Worksheets("Sheet2").Range("A1") = ""
    End If

**Nuno Neves** · 12-14-2009, 05:42 AM

ok, it didnt work, maybe its because i am a noob....

i will send the file :

the goal is all the checkboxes that appear in the sheet named APF Form (total are 104), when checked, the text that is in front appear on the sheet named relatorio, in the cells at yellow, of course is many checkboxes are selected, it could appear as a scroll in the yellow cells (that are merged).

i hope this can help.