Copiar el caption de un checkbox a una celda activa

Hola.
Mira mi problema es el siguiente, tengo un formulario con 10 checkbox, y un commandButton llamado "Guardar", al momento de presionar el commandButton deseo que el caption de los checkbox que estén activos se copien en una hoja nueva en la celda activa.
Si no es posible copiar el caption pues que sea posible copiar el nombre del checkbox o algo que me los diferencie...
Agradezco la colaboración
Respuesta
1
If Me.CheckBox1 = True Then
ActiveCell.Value = UserForm1.CheckBox1.Caption
ElseIf Me.CheckBox2 = True Then
ActiveCell.Offset(1, 0).Value = UserForm1.CheckBox2.Caption
End If

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas