Jump to content

viejo

Members
  • Posts

    538
  • Joined

  • Last visited

  • Days Won

    1

viejo last won the day on September 30 2019

viejo had the most liked content!

About viejo

  • Birthday 01/01/1999

Recent Profile Visitors

1,708 profile views

viejo's Achievements

  1. Mil Gracias ambos funcionan correctamente hasta donde alcance a probar.
  2. Buen dia expertos recurro a ustedes con esta consulta que espero no les quite mucho de su valioso tiempo y en espera me puedan ayudar, y es que requiero que un textbox acepte solo caracteres que yo quiera como en este caso requiero el textbox solo acepte letras mayusculas y minusculas, y los caracteres exceptuados son el guion bajo, el espacio y los dos puntos ":" y tengo el siguiente codigo pero no logro adecuarlo Private Sub Textbox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) ' osea Esto es para que el Textbox1 solo acepte números ' If KeyAscii < 48 Or KeyAscii > 57 Then ' KeyAscii = 0 ' End If ' del 32 al 126 son caracteres imprimibles ' Esto es para que el Textbox1 solo acepte letras ' las letras son del 65 al 90 en mayusculas ' las letras son del 97 al 122 en minusculas ' osea el 32 es el espacio, el guion bajo es el 95 If Not (KeyAscii >= 65 And KeyAscii <= 90 Or KeyAscii >= 97 And KeyAscii <= 122 Or KeyAscii = 32 Or KeyAscii = 95) Then KeyAscii = 0 End If End Sub pero no se porque no me funciona, si alguien me puede ayudar se lo agradeceria muchisimo
  3. con eso esta mas que perfecto maestro mil gracias, algún día espero tener la capacidad que tienen para resolver estos problemas "excelianos! vaya que me ha funcionado!
  4. con respecto a lo anterior quise decir que la edición de la imagen sea directamente en el formulario y no en la imagen que fue insertada en la hoja...solo quise aclarar eso
  5. muy buena aportación me quede sumamente sorprendido, solo falta el botón o el control de invertir colores, osea que lo negro se vuelva blanco y viceversa, también me han surgido las preguntas: 1.- para el hecho que el formulario "cargue" la imagen ¿es necesario que la imagen este inserta en alguna hoja?, osea mi idea era "jalarla" desde el comando de LoadPicture(archivo)? 2.- dado lo anterior, cuando el formulario carga la imagen, esto sucede porque la obtiene en sus dimensiones y resoluciones que originalmente esta tiene, la pregunta es, ¿como estandarizo eso en un formulario para que dentro del formulario tenga las dimensiones y resoluciones que yo desee y obviamente cargando la imagen desde LoadPicture(archivo)? espero explicado aun así de antemano mil gracias y quedo atento a tus comentarios.
  6. tal vez poniendo el codigo o tambien subiendo el archivo a dropbox, pueda ser una opcion
  7. Buen día expertos quiero hacerles una consulta y si alguien me puede ayudar por favor. tengo una imagen en formulario a la cual le quiero hacer específicamente la optimización de imágenes que son: inversión de color, poner en espejo, contraste, nitidez, brillo, escala de grises ¿como puedo hacer eso en un formulario para una imagen en especifico?
  8. Buen Día, excelentes compañeros, tengo una consulta al respecto y es que en un formulario existe la manera de "jalar" los optimización de imágenes como son aquellos que por ejemplo ponen en escala de grises una imagen, o la ponen esa imagen en espejo, o le dan nitidez o contraste y todo eso que se pueda lograr dentro de un formulario? y es que la verdad es que no se si se pueda llamar esos controles en un formulario. De antemano agradezco la atención y colaboración y quedo en espera me puedan ayudar al respecto, al menos con la orientación. edicion de imagenes en formularios
  9. Buen día y con el gusto de saludarle nuevamente expertos recurro a ustedes para solicitar su valiosa colaboración en el mejor de los sentidos ya que tengo un textbox al que le quiero poner un formato de hora HH:MM para que al momento de escribir obligue al usuario final a poner ese formato de tiempo exactamente, he intentado hacerlo pero en mi programación veo muchos errores, por ejemplo cuando le doy con las teclas direccionales para seleccionar y me posiciono en el espacio 3 y le doy una letra este la acepta; bueno de antemano el textbox no debe aceptar letras, unicamente números y en el espacio 3 el signo de dos puntos (:) pero como lo digo al hacer eso lamentablemente ya no respeta y quiero que se exactamente HH:MM y ningún otro carácter mas que los que ya comente, espero haberme explicado, anexo archivo muestra y quedo atento a sus indicaciones y comentarios constructivos. de antemano mil gracias. Libro1.xlsm
  10. ojala se me logre entender lo que quiero realizar. saludos
  11. buen día, aquí estoy de nuevo dejo el archivo muestra, la idea general de todo esto es poder hacer un "cierre de sesión por inactividad" la parte del reloj ya esta pero no se como poder hacer la parte del censado del tiempo para que esté checando todo el tiempo y cuando pasen 5 min (o el tiempo que sea considerado) si ha estado en inactividad el formulario o el libro se cierre. dejo el link en dropbox ya que no me permite el foro por el tamaño de archivo. saludos https://www.dropbox.com/s/ga59o21lab8ear0/Libro2.rar?dl=0 https://www.dropbox.com/s/ga59o21lab8ear0/Libro2.rar?dl=0
  12. Hola buen día estimados colaboradores recurro a ustedes y primeramente un saludo coordial a todos, la consulta que quiero hacerles es la siguiente: y es que no se exactamente por donde empezar ya que al tener un formulario requiero se cierre por inactivdad despues de cierto tiempo, osea necesito realizar un cierre de sesion pero para efectos practicos que sea con un formulario y que se cierre,,,,no se si se pueda hacer con el evento mousemove o con algun otro evento "disparador" del cierre del formulario por inactivdad...lo explico a groso modo ya que no tengo un archivo en concreto y primeramente quiero que me capten la idea antes. lo que he estado haciendo es abrir el formulario y ponerle una rutina para que el tiempo se muestre, esa rutina es la siguiente Private Sub UserForm_Activate() Application.Visible = False Call iniciarReloj End Sub '--------------------------------------------------------------------------------------------------------------------------------------- Dim inicio As Boolean Dim inicioo As Boolean '--------------------------------------------------------------------------------------------------------------------------------------- Sub iniciarReloj() inicio = True Call menuReloj End Sub '--------------------------------------------------------------------------------------------------------------------------------------- Sub menuReloj() If inicio = True Then 'Range("A1").Value = Time If frm_accesoo.Visible = True Then frm_accesoo.lbl_acceso_hora.Caption = Format(Time, "hh:mm:ss AM/PM") frm_accesoo.lbl_acceso_fecha.Caption = Format(Date, "dd/mmmm/yyyy") End If Application.OnTime Now() + TimeValue("00:00:01"), "menuReloj" End If End Sub '--------------------------------------------------------------------------------------------------------------------------------------- Sub pararReloj() inicio = False End Sub es entonces que el tiempo se muestra en el formulario y esta cambiando a cada segundo. la situación es que no se como implementar esa parte a poder hacer el registro de inactividad. espero haberme poder dado a entender y quedo atento a sus comentarios.
×
×
  • Create New...

Important Information

Privacy Policy