Estás usando un navegador desactualizado. Es posible que no muestre este u otros sitios web correctamente. Debe actualizar o usar un navegador alternativo.
Alguna Macro - Para cambiar Genero automaticamente segun el Nombre
Private Sub textBoxNombre_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 32 Then
If textBoxNombre.Value = "Pedro" Then
textBoxGenero.Value = "Masculino"
End If
End If
End Sub
Modo optimizado
Código:
Private Sub textBoxNombre_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 32 And textBoxNombre.Value = "Pedro" Then textBoxGenero.Value = "Masculino"
End Sub
Private Sub textBoxNombre_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 32 Then
If textBoxNombre.Value = "Pedro" Then...
Tenemos 135.000 usuarios registrados, y 240.000 preguntas y respuestas Excel.
Primero 👉 regístrate gratis aquí 👈 para ver contenidos y descargas sin restricciones!
Este sitio usa cookies para ayudar a personalizar el contenido, adaptar su experiencia y mantenerlo conectado si se registra.
Al continuar usando este sitio, usted está consintiendo nuestro uso de cookies.