Amigos, buena stardes.
Tengo esta macro para llamarla desde el evento KeyPress de unos TextBox
[code]Sub Sel_TextBox()
On Error Resume Next
nombretextbox = BuscaClientes.txtTelf1.Text(BuscaClientes.txtTelf1.Text)
nombretextbox = BuscaClientes.txtTelf2.Text(BuscaClientes.txtTelf2.Text)
valor = nombretextbox
If Not (KeyAscii >= 48 And KeyAscii <= 57) Then
KeyAscii = 0 '<-- Esta linea borra la tecla presionada equivocadamente
MsgBox "Ingrese SOLO números en el campo", vbOKOnly + vbInformation, Title:="CARACTER NULO"
End If
'Para Guion
Select Case Len(valor)
Case 4
valor.Text = valor & "-"
End Select
If Len(valor) = 12 Then KeyAscii = 0: MsgBox "MAX permitido en Telfono 1 y 2, 12 dígitos": Exit Sub
End Sub[/code]
Llamandola desde
[CODE]Private Sub txtTelf1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Call Sel_TextBox
End Sub[/CODE]
pero al llamarla "Call Sel_TextBox llenando los cuadros, me dice que El número de argumento es incorrecto o la asignacion de propiedad no es valida y me apunta donde dice:
nombretextbox = BuscaClientes.txtTelf1.Text(BuscaClientes.txtTelf1.Text)
nombretextbox = BuscaClientes.txtTelf2.Text(BuscaClientes.txtTelf2.Text)
Podria algun experto en la materia ayudarme y hacerme la corrección?
Creo (digo yo) que con las macros no hace falta el libro aunque con solo el ejemplo
Sabemos (yo lo se) que NADIE esta obligado a responder. Que nadie esta obligado a ayudar. Que nadie esta cobrando por ayudar; etc etc y un grand ETC.
No me pasa solo con esta pregunta, si no que otras mas se quedan en la pantalla sin que nadie responda aunque sea , NO PUEDO, NO SE, AQUI NO se da ese tipo de ayuda.
Si buscan mis solicitudes, veran que hay otras mas que se quedan en solo lectura y creo que ni lectura, si en el olvido.
Otras de mis solicitudes anteriores que aun sin cualquier respuesta
Editar macro para busqueda
Editar macro para llenar ListBox
Borrar, eliminar Area de Impresion de un rango
Gracias pacomegia por tu ayuda en Alineacion de celda a la derecha y celdas en negrita
Gracias pacomegia en De 2 lineas de codigo hacer una sola
Gracias bridge y Gracias Paco en Macro me cierra el libro origen y me deja con la copia
Gracias Martin y cron en Desglose de formula
Gracias cron por tu ayuda en tema Exportar el contenido del TextBox de color rojo a celda
Gracias Creí_que_sabía_Excel en Codigo para copiar Factura a otra hoj
Y otras tantas pero muchas ni sequier un adios
Disculpen pero mi molestia no puede ser con alguno de ustedes, pero si es conmigo mismo al no poder recibir la ayuda que siempre he esperado de aqui y tener que recorrir a otra WEB, cosa que no lo he echo aun pero
Si alguien se dispone a darme la ayuda que espero, bien venida sea
Me pregunto si ¿ESTOY VETADO en esta pagina? o por lo contrario, ¿soy feo? rayos tanta indiferencia
Varios temas y ninguno recibe una sola respuesta aunque sea dando los buenos dias
Hola, Joao
Por mi parte sabes que no estás vedado. ¿Feo? Si eres como el del avatar, un poco
En realidad, esta consulta es compleja. Requiere dedicarle un tiempo y últimamente estoy liado para eso...
Espero que alguien te pueda contestar.
Un saludo