Extraer caracteres de textbox en userform vba

vito29 · el 15 de marzo

Estimados,

solicitode su ayuda, tengo un userform que tiene 3 texbox y lo que necesito es extrar ciertos caracteres de los dos primeros texbox y que el tercero me muestre esos caracteres es para crear un usuario con el nombre y apellidos, bueno lo hice funcionar en una celda y funciona a la perfeccion con la ayuda de un amigo de aca del foro pero no se como aplicar lo en vba.

dejo el codigo de excel con el que funciona

=IF(A2="";"";LEFT(A2)&MID(B2;SEARCH(" ";B2)+1;1)&LEFT(B2;SEARCH(" ";B2)-1))

esto es asi: A2 = luis

B2 = Soto caceres

C3 = lcsoto (este es el resultado)

Ahora lo que necesito es hacerlo en texbox pero no se como implementarlo

texbox1 = luis

texbox2 = soto caceres

texbox3 = lcsoto (resultado)

tengo un boton que al pulsarlo carge el resultado en texbox3

si me pueden ayudar gracias

Antoni · el 15 de marzo

Private Sub Botón_Click(): On Error Resume Next

   Apellidos = Split(TextBox2, " ")

   TextBox3 = Left(TextBox1, 1)

   TextBox3 = TextBox3 & Left(Apellidos(1), 1)

   TextBox3 = TextBox3 & Apellidos(0)

End Sub

[/CODE]

vito29 · el 15 de marzo

[uSER=46507]@Macro Antonio[/uSER],

Gracias me sirvio de maravillas, me puedes ayudar con lo ultimo porfavor tengo un formulario de recuperacion de clave y tengo la idea de como queiro que funcione pero como no soy entendido en la materia podrian ayudarme la fun cion es la siguiente:

textboxusuario = ( se ingresa el nombre de usuario)

y lo busca en el registro de excel y si no lo encuentra active una ventana de información, de lo contrario se sigue ejecutando el segundo.

textboxcorreo = e-mail

texboxcorreo1 = repetir email

si los los dos textbox son iguales que envie un correo con la clave del usuario

de lo contrario que avise que email no coincide. y se detenga.

espero haberme explicado bn.

gracias por la respuesta anterior