Jump to content

hiddenmafia

Members
  • Content Count

    30
  • Joined

  • Last visited

  • Country

    Colombia

About hiddenmafia

  • Rank
    Member

Converted

  • Campos
    ;

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. querido @Jose BN funciono perfecto. Que sencillo era. Muchas gracias por compartir tu conocimiento.
  2. Buenas tardes estimados programadores, Acudo nuevamente a su conocimiento, de antemano, agradecer siempre a la persona que se tome el tiempo de ayudarme. Como lo indico, lo que requiero es lo siguiente Tengo un TextBox15 en el cual una vez el usuario hace clic arroja un tiempo en formato "hh:mm:ss", este tiempo sale después de restar 2 fechas del mismo formulario. Ahora bien, la ayudita que quiero es que dependiendo del rango de tiempo le ponga un color u otro, de la siguiente manera si es >= 00:05:00 ponga el color del forecolor del textbox15 rojo si es > 00:02:00 y 00:05:00 ponga el forecolor en amarillo si es < de 00:02:00 ponga el forecolor en verde Agradezco de sobre manera a quien pueda ayudarme. JAAA
  3. Buenas tardes estimados programadores, Acudo nuevamente a su conocimiento, de antemano, agradecer siempre a la persona que se tome el tiempo de ayudarme. Como lo indico, lo que requiero es lo siguiente Tengo un TextBox15 en el cual una vez se le hace clic arroja un tiempo en formato "hh:mm:ss" en el mismo textbox, este tiempo sale después de restar 2 fechas del mismo formulario. Ahora bien, la ayudita que quiero es que dependiendo del rango de tiempo le ponga un color u otro, de la siguiente manera si es >= 00:05:00 ponga el color del forecolor del textbox15 rojo si es > 00:02:00 y 00:05:00 ponga el forecolor en amarillo si es < de 00:02:00 ponga el forecolor en verde Agradezco de sobre manera a quien pueda ayudarme. JAAA
  4. Buenas tardes,@Antoni para el mismo caso pero que los valores sean de "hh:mm:ss" es decir, si es >= 00:05:00 ponga el color del forecolor del textbox15 rojo si es > 00:02:00 y 00:05:00 ponga el forecolor en amarillo si es < de 00:02:00 ponga el forecolor en verde Como se haría? Gracias amigo por tu ayuda
  5. Buenas tardes estimados colegas, Podrá sonar algo sencillo, pero realmente esta complicado el tema. Mi situación es la siguiente. Tengo una macro la cual esta montada en un OneDrive y Sincroniza en Microsoft Teams, esto con el fin de que se puede visualizar la data del archivo en linea. Ahora, mi Excel es un archivo de registro de solicitudes. Analice las siguientes particularidades: 1. Cuando utilizaba el procedimiento sencillo de ActiveWorkbook.Close SaveChanges:=True el archivo se guardaba en "Mis Documentos" aún cuando el archivo se abre directamente del sitio del onedrive sincronizado en el pc directamente en el explorar de archivos. 2. Cuando utilice el procedimiento de decirle específicamente donde guardarlo (Dirección del sitio "onedrive") tuve conflictos cuando desde mi userform le daba 2 veces guardar sin antes haberlo cerrado. Analizando creo que tuvo errores de sincronizan a la nube por conflicto de control de cambios, por lo que deseche también esta opción. 3. Ahora, resultó ser la única opción para conseguir lo que necesitaba (Salvar cambios y sincronizar a la nube) realizar exactamente lo mismo en el punto 2. pero cerrando el excel, obligando al usuario tener que volver abrir el excel. Quisiera su ayuda con su conocimiento, si existe alguna forma de: 1. Cerrar y Abrir el mismo excel, con el fin de que el usuario no tenga que volver abrir el excel. o 2. Alguna forma de guardar cambios en la nube y sincronizar sin que me genere conflictos de control de cambios. De ante mano agradezco mucho su ayuda.
  6. Buenos días estimados colegas, Requiero su valiosa ayuda con el siguiente código. Private Sub ComboBox11_Change() CommandButton1.Enabled = False ComboBox10.Clear Set ES_circuito = BD.Columns("Z").Find(ComboBox11, , , xlWhole) If Not ES_circuito Is Nothing Then x_Busco = ES_circuito.Row Do Until BD.Range("Z" & x_Busco) <> ES_circuito If ComboBox11.Value = "" Then Exit Do ComboBox10.AddItem BD.Range("A" & x_Busco) ComboBox10.List(ComboBox10.ListCount - 1, 1) = BD.Range("D" & x_Busco) ComboBox10.List(ComboBox10.ListCount - 1, 2) = BD.Range("C" & x_Busco) ComboBox10.List(ComboBox10.ListCount - 1, 3) = BD.Range("B" & x_Busco) ComboBox10.List(ComboBox10.ListCount - 1, 4) = BD.Range("G" & x_Busco) x_Busco = x_Busco + 1 Loop End If End Sub Lo que hace es que busca el dato del ComboBox11 en la hoja BD (antes declarada como WorkSheet("BD")) en la columna "Z", me funciona muy bien hasta que no lo encuentra, es decir, digamos que la coincidencia esta en las filas 1, 2, 3 y 5. al combobox10 se añadirá el item de la fila 1,2 y 3, pero el 5 no lo en listará. Si alguien pudiera ayudarme me seria de gran utilidad. Dejo el link del archivo Solicitud de moviles
  7. Buenas tardes estimados programadores, Acudo nuevamente a su conocimiento, de antemano, agradecer siempre a la persona que se tome el tiempo de ayudarme. Como lo indico, lo que requiero es lo siguiente Tengo un TextBox15 en el cual una vez se le hace clic arroja un numero decimal en formato "0.##0" en el mismo textbox, este numero decimal sale despues de restar 2 fechas del mismo formulario. Ahora bien, la ayudita que quiero es que dependiendo del rango decimal le ponga un color u otro, de la siguiente manera si es >= 0.333 ponga el color del forecolor del textbox15 rojo si es > 0.166 y <0.333 ponga el forecolor en amarillo si es < de 0.166 ponga el forecolor en verde Agradezco de sobre manera a quien pueda ayudarme. Link del formulario: Solicitud Moviles MT JAAA
  8. @bigpetroman Buenas tardes, de antemano muchas gracias! Pense en la misma solución hace unos minutos atrás, (Lo resolvimos juntos? jajaj no se...) Pero muchas gracias.
  9. Buenos días, Con orgullo les presento mi gran avance en el formulario que he estuve desarrollando. me siento muy complacido con todo lo que he aprendido y puesto en producción. Sin embargo, he llegado a un punto donde me encuentro con una dificultad y es la siguiente: Para explicar un poco el funcionamiento de mi base. En el cuadro "1" se realiza el ingreso de la solicitud, y queda almacenado en la base de datos con un "#de solicitud" que me sirve de consecutivo para realizar la busqueda posterior En el cuadro "2" se realiza la actualización de los demás campos sobre el # de solicitud antes registrado. Hasta acá todo esta perfecto, ahora mi dificultad esta en el cuadro "3". En el Cuadro "3" se realiza una búsqueda por estado de solicitud y por Sub/Cto/Equipo del "#de solicitud". Lo que me esta sucediendo ahora es el siguiente problema: - No logro hacer que una vez seleccione el "Sub/Cto/Equipo" me traiga el # de la solicitud de dicha selección y lo ponga en el TextBox "N_Solicitud" el cual ya esta programado para que busque ese numero y rellene todos los TextBox y ComboBox del formulario. Link Archivo: Solicitud Móviles MT Espero haberme hecho entender muy bien, Espero que alguno de los genios que están aquí logre ayudarme, De antemano muchas gracias por la ayuda que puedan prestarme.
  10. Buenos días, Con orgullo les presento mi gran avance en el formulario que he estuve desarrollando. me siento muy complacido con todo lo que he aprendido y puesto en producción. Sin embargo, he llegado a un punto donde me encuentro con una dificultad y es la siguiente: Para explicar un poco el funcionamiento de mi base. En el cuadro "1" se realiza el ingreso de la solicitud, y queda almacenado en la base de datos con un "#de solicitud" que me sirve de consecutivo para realizar la busqueda posterior En el cuadro "2" se realiza la actualización de los demás campos sobre el # de solicitud antes registrado. Hasta acá todo esta perfecto, ahora mi dificultad esta en el cuadro "3". En el Cuadro "3" se realiza una búsqueda por estado de solicitud y por Sub/Cto/Equipo del "#de solicitud". Lo que me esta sucediendo ahora es el siguiente problema: - No logro hacer que una vez seleccione el "Sub/Cto/Equipo" me traiga el # de la solicitud de dicha selección y lo ponga en el TextBox "N_Solicitud" el cual ya esta programado para que busque ese numero y rellene todos los TextBox y ComboBox del formulario. Link Archivo: Solicitud Móviles MT Espero haberme hecho entender muy bien, Espero que alguno de los genios que están aquí logre ayudarme, De antemano muchas gracias por la ayuda que puedan prestarme.
  11. Buenas tardes compañeros, Gracias a todos por sus explicaciones, he estado trabajando fuertemente en aprender sobre este mundo del VBA. He adelantado y aprendido bastante, ahora tengo una dificultad, con la cual me gustaría que me ayudarán: He logrado realizar las busquedas necesarias entre textbox y/o Combobox y registrarlas en una hoja de excel. Ahora, lo que necesito es tener la posibilidad de buscar ese "registro" añadido anteriormente, traerlo a mi userform y editarlo y sobreescrirlo en la misma fila donde quedo anotado desde el principio. Espero me alla hecho entender. Aca les dejo el archivo: Solicitud de Moviles MT
  12. Hola JDSJDS, Gracias por tu aporte, pero lamentablemente no es la solución que busco, debido a que cuando digo "Relación entre esto y lo otro" hace similitud a un "buscarv", es decir, tengo un valor en un combobox1, con ese valor, me tiene que buscarv dentro de 2 columnas y una vez encuentre la relación, traiga ese valor al combobox2. De todas formas, muchas gracias por tu aporte. es valioso este codigo en algunos casos de traer datos de manera directa y sencilla.
  13. @Gerson Pineda Buenas tardes, Gracias por tu comentario, realmente ando aprendiendo mucho sobre el mundo VBA. De hecho tengo ya unas cosas hechas, respecto a "mi lista de solicitudes", pero hay otras con las que he buscando y buscando y no encuentro algo que pueda ayudarme. En ejemplo, no logro hacer que de un ComboBox, llene otro ComboBox, encontré algo buscando en muchos lados, pero el userform me arroja un error "Desbordamiento" debido a que donde busca los datos, es una lista de 115.652 registros, y esto me deja en coma (....) jaja Realmente llevo 3 días buscando todas las formas posibles y no encuentro alguna, que me ayude. Por eso decidí realizar este post. Solo quiero que puedan instruirme para hacerlo yo, realmente soy una persona apasionada por la programación pero me desespero cuando las cosas no funcionan como las planteo. De todas formas, si alguien quisiera dedicar un tiempo para ayudarme, claramente haré el máximo esfuerzo por aprender y retribuirlo ayudando a quien lo necesite.
  14. @Antoni, @Gerson Pineda Conozco el conocimiento que los tienen respecto al tema, y se que me puede ayudar, invoco su ayuda por favor! En realidad es un tema bastante importante para mi en este momento. Gracias ! y que pena Etiquetarlos
×
×
  • Create New...

Important Information

Privacy Policy


CTA Templates.png