Orlando Collarte

No creo que debiera haber problemas las macros funcionan igualmente, primero, para tu seguridad pruébalas en un Pc que tenga instalado el software y así estas con toda la seguridad del mundo

Lop rimero que no entiendo si están con formato numérico porque aparecen con el 0 antes. Sin son numéricos antes de pasarlos a string validalo en ese momentos que el N° no se mayor a 99 o que sea < 100 La instrucción en macros para: string a Numerico...

Solo aclarame una duda. Necesitas copiar algunos datos o toda la linea o sea todos los datos de la consulta

La idea seria probar con validación de celda o formato condicional y si no puedes puedes probar esta fórmula, no es lo mejor pero tal vez te sirve =SI(100-B1-C1-D1>0;100-B1-C1-D1;"Error en Calculo")

Prueba esta fórmula =SI.ERROR(E8;"") Reemplaza el E8 por tu fórmula Y Juégatela Probando

No se como tienes tu Formulario, pero la idea es que tenga 2 botones uno para Borrar con la macro y el otro para salir del formulario Private Sub CommandButton1_Click() Dim primera, ultima As String Dim Ciudad As String Cells.Find(What:=ComboBox1,...

Deberías hacer lo siguiente : Prueba esta fórmula =VALOR(EXTRAE($H$13;+VALOR(LARGO(H13))-2;3)) Lo que hace es saber el largo del valor y posicionarse en el tercer carácter de derecha a izquierda y que muestra a partir de ahí 3 caracteres o números....

Deberías hacer lo siguiente : Prueba esta fórmula =VALOR(EXTRAE($H$13;+VALOR(LARGO(H13))-2;3)) Lo que hace es saber el largo del valor y posicionarse en el tercer carácter de derecha a izquierda y que muestra a partir de ahí 3 caracteres o números....

Ok Dejame ver y te mando respuesta

Pincha 2 veces el textbox y te va a salir el la función: Private Sub TextBox1_Change() If Not IsDate(TextBox1) Then Dim mensaje As String mensaje = MsgBox("Valor ingresado NO es Fecha" & Chr(13) & "Puede ingresar nuevamente ?", vbCritical,...