Userform Elegir Texto con CheckBox
Saludos. Buenas tardes. Por favor si me pueden ayudar con la siguiente consulta. Necesito el codigo de un Userform como se muestra en la figura que de acuerdo al valor del checkbox elegido carque los textos según ese valor y luego al darle cargar ingrese tanto el valor del checkbox (letra) y el texto a una hoja excel. Favor ver el ejemplo de la figura que he anexado.
1 Respuesta
Respuesta de Tor Cheer
1
Una forma sencilla de hacerlo es con el siguiente código en el botón "Cargar", actualizando el nombre de los controles. Faltan ciertas validaciones tales como:
Que hacer cuando se selecciones 2 checkbox, al borrar el primer registro, el siguiente se sobre-escribe o se escribe en la siguiente linea, entre otras posibles validaciones.
If CheckBox1.Value = True Then
Range("A2").Value = CheckBox1.Caption
Range("B2").Value = TextBox1.Text
ElseIf CheckBox2.Value = True Then
Range("A2").Value = CheckBox2.Caption
Range("B2").Value = TextBox1.Text
ElseIf CheckBox3.Value = True Then
Range("A2").Value = CheckBox3.Caption
Range("B2").Value = TextBox1.Text
ElseIf CheckBox4.Value = True Then
Range("A2").Value = CheckBox4.Caption
Range("B2").Value = TextBox1.Text
ElseIf CheckBox5.Value = True Then
Range("A2").Value = CheckBox5.Caption
Range("B2").Value = TextBox1.Text
End If
