Macro en excel utilizando textbox para generar código alfanumérico

hola, perdona la molestia, pero estoy en cero.

tengo un formulario donde utilizo el textbox 1 como fuente para un código que lo creaba manualmente, pero se me volvió muy complicado códigos duplicados.

lo que necesito, es que la macro utilice del textbox2 que es el apellido las primeras dos letras, del textbox 4 que es para la fecha de nacimiento el ddmmaa, para que estos datos se coloquen en orden en el textbox1 ("LETRAS"DDMMAA), cuando los campos de los otros dos textbox que te mencione se llenen, de manera automática se genere el código sin necesidad de un botón para realizar el proceso de creación.

agradeceré tu respuesta

Atentamente.

Adolfo

1 respuesta

Respuesta
1

Prueba a introducir estas lineas en tu código del userform. Debería funcionar

Private Sub TextBox4_Change()
If TextBox2.Value <> "" And TextBox4.Value <> "" Then
     TextBox1.Value = UCase(Mid(TextBox2, 1, 2)) & Application.WorksheetFunction.Substitute(TextBox4.Value,"/","")
End If
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Crear Formulario Excel (ayuda a un principiante)

Gurús del excel, estoy trabajando en un formulario de ingreso de datos y mi intención es aprender todo sobre la herramientas de formularios. El objetivo del formulario es entregar un código al usuario que lo ejecute y almacenar en otra hoja los datos...
1 respuesta

Impedir textbox vacíos en userform

Mi problema es que tengo un userform que copia los datos de los textbox a celdas de una hoja de excel, y que al apretar un botón, ejecuta una macro usando esos datos, pero si dosn textbox en concreto no está lleno antes de apretar el botón, el...
1 respuesta

¿Cómo buscar por dos criterios y cargar datos en un userform de excel?

Me tomo el atrevimiento de pedir su ayuda ya que realmente estoy atascado con esto. He creado un formulario en excel, este tiene una serie de textbox's para capturar datos y ser enviados celdas especificas en una hoja de mi libro de excel al pulsar...
1 respuesta

Impedir registros repetidos considerando 2 columnas

En una Hoja Excel, a modo de base de datos, utilizo un UserForm para ingresar estos datos. Nos centraremos en las columnas"A" y "B" que es donde me surgen los problemas. En la Columna "A" van números de registro y en la "B", la fecha en la que se...
1 respuesta

Actualizar caption de label con valor de celda

Tengo un userform que copia los valores introducidos en los textbox a celdas de una hoja. El problema es que la introducir un dato en el textbox3, la hoja devuelve un valor (nombre de producto) en otra celda de esa hoja. Necesito que antes de...
1 respuesta

Macro para bajar renglones

Me podrías ayudar con una macro que realize la siguiente función: Tengo un useform que pone datos en la celdas, y le hice un botón de aceptar, lo que quiero que haga ese botón es que me pocisione en la siguiente celda, por ejemplo: Escribo datos en...
2 respuestas

Si se deja un Textbox en blanco

Tengo este código en un formulario de excel: Private Sub TextBox1_Change() largo_entrada = Len(Me.TextBox1) Select Case largo_entrada Case 2 Me.TextBox1.Value = Me.TextBox1.Value & "/" Case 5 Me.TextBox1.Value = Me.TextBox1.Value & "/2008"...
2 respuestas

Buscar con textbox

Mi respeto ante todo, por favor una ayudadita, tengo un "libro1.xls","Hoja1" en el cual tengo un userform1 con 2 textbox, en el textbox1 quiero ingresar un código, ejm "1001" y que en el textbox2 me salga el resultado ejm "conservas en lata", los...
1 respuesta

Código para insertar Base-Iva-Cuota IVA en vba

No soy capaz de insertar, la formula que utilizo es esta 'Calcular el Importe de la cuota de IVA If Base = "" Then Base = 0 'La primera vez que se cargan los valores, inicializar a cero las variables necesarias para que las fórmulas funcionen...
1 respuesta

Ayuda con Fucion if, else,end if me da error

Me sirvió de mucho, pero ahora tengo otro problema, mira tengo dos userforms que simulan cambiar una contraseña, el primero que me pida la contraseña guardada en una celda, este es el código del botón de aceptar del primero: Private Sub...
2 respuestas