¿Cómo puedo acotar un ingreso de números?

Para dante amor

Como te explique, quiero que las notas se ingresen del 1 al 5 y que no se pueden ingresar mayor a eso, por ejemplo 6, pero si se pueden dejar vacías.

1 respuesta

Respuesta
1

H o l a:Te anexo el código para que solamente puedan ingresar vacío o del 1 al 5

Private Sub UserForm_Activate()
'Act.Por.Dante Amor
    Set h1 = Sheets(1)
    Set h2 = Sheets("PONDERACIONES")
    TextBox24.Enabled = False
    If TextBox1.Text = "" Then
        CommandButton1.Enabled = False
    Else
        CommandButton1.Enabled = True
    End If
    For i = 6 To 19
        Me.Controls("ComboBox" & i).Style = 2
        Me.Controls("ComboBox" & i).AddItem ""
        For n = 1 To 5
            Me.Controls("ComboBox" & i).AddItem n
        Next
    Next
End Sub
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas