Saltar al contenido

Importar datos de txt según fecha establecida


Recommended Posts

Estimados Maestros me encuentro realizando un proyecto de trazabilidad en el cual he podido extraer los datos de una determinada fecha a los textbox pero desde la hoja de excel que en realidad no es muy complicado, el problema es que necesito importar los datos desde un archivo de texto al formulario que adjunto en el presente los datos deben estar separados por delimitador punto y coma ya que contienen algunas columnas creadas con macros desde excel, no he resuelto aún realizar la búsqueda en función de la fecha y peor aún organizarlos en los textbox, de ser posible y si alguien me puede ayudar adjunto ambos archivos para su colaboración.

Agradezco de antemano todos los aportes brindados y su valioso tiempo empleado en este caso.

Ejemplo de trazabilidad.xlsm

TRAZABILIDAD.txt

Enlace a comentario
Compartir con otras webs

Estimados amigos he realizado una modificación al archivo y he logrado extraer los datos en función de la fecha pero se importa toda la línea en un mismo textbox,  los datos deberían ir a cada uno de los textbox del formulario y no solo a uno, si alguien tiene alguna aportación o información bibliográfica que me pueda servir agradecería mucho su ayuda.

Saludos Cordiales.

Ejemplo de trazabilidad.xlsm

TRAZABILIDAD.txt

Enlace a comentario
Compartir con otras webs

Lo que me da si pongo la fecha 29/09/2018 es:

29/09/2018;10;AC01;291;22/09/2018;9;AC02;200;22/09/2018;9;AC02;285;23/09/2018;9

Ahora dime como lo quieres dividir.???

Hay funciones de Texto que nos ayudan a separar esto en un Array, es la función SPLIT... investiga y me dices que requieres.

Saludos.

Enlace a comentario
Compartir con otras webs

Hace 2 horas, Leopoldo Blancas dijo:

Lo que me da si pongo la fecha 29/09/2018 es:

29/09/2018;10;AC01;291;22/09/2018;9;AC02;200;22/09/2018;9;AC02;285;23/09/2018;9

Ahora dime como lo quieres dividir.???

Hay funciones de Texto que nos ayudan a separar esto en un Array, es la función SPLIT... investiga y me dices que requieres.

Saludos.

Gracias por responder estimado Leopoldo, y si, hasta ahora lo único que he logrado es que en un textbox me salga toda la linea del archivo TXT en función de la fecha, lo que quiero es que se ubiquen los registros existentes en el orden que muestro en el ejemplo que adjunto en este correo, este ejemplo extrae al formulario datos existentes en la hoja de excel, que es valido si, pero  yo necesito traer datos desde el archivo TXT al formulario, ya que el programa no almacenará datos solo los importará, ya que estos datos serán creados a través de otro programa diferente.

Agradezco mucho tu interés en este tema y adjunto archivo de muestra.

TRAZABILIDAD AZUCAR MORENA.xlsm

Enlace a comentario
Compartir con otras webs

Hace 1 hora, Antoni dijo:

Prueba a ver que tal.

Ejemplo de trazabilidad.xlsm

Esta casi perfecto @Antoni solo que no logro entender como este código logra traer los datos de la linea

 If InStr(1, linea, cod) > 0 Then
            datos = Split(linea, ";")
            For x = 1 To 3
               For y = 1 To 4
                  Controls("D" & x & y) = ""
                  Controls("D" & x & y) = datos(d)
                  d = d + 1
               Next
            Next
            existe = True
            Exit Do
        End If

 

Solo faltaría que el orden sea el correcto ya que según observo ya esta filtrando correctamente pero en el primer textbox d11 inicialmente se coloca la fecha filtrada, debería comenzar a extraerse los datos desde la segunda columna que irían siempre al textbox15 la tercera columna si existe el dato debería ir al textbox que has denominado d11, la cuarta columna al d12 y asi sucesivamente.

Enlace a comentario
Compartir con otras webs

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

  • 93 ¿Te parecen útiles los tips de las funciones? (ver tema completo)

    1. 1. ¿Te parecen útiles los tips de las funciones?


      • No
      • Ni me he fijado en ellos

  • Ayúdanos a mejorar la comunidad

    • Donaciones recibidas este mes: 0.00 EUR
      Objetivo: 130.00 EUR
  • Archivos

  • Estadísticas de descargas

    • Archivos
      177
    • Comentarios
      90
    • Revisiones
      27

  • Crear macros Excel

  • Mensajes

    • No va a ser necesario distinguir el tipo de proceso entre 1 y 2. Revisa el adjunto a ver si es eso lo que quieres. Function MediaAttention(mImp As Range, _ q25 As Range, q50 As Range, _ Optional q75 As Range, _ Optional q100 As Range) As Double '-- Opción 1 If q75 Is Nothing And q100 Is Nothing Then MediaAttention = q25 / q50 Exit Function End If '-- Opción 2 MediaAttention = ((0.25 * (q25 - q50)) / mImp) + _ ((0.5 * (q50 - q75)) / mImp) + _ ((0.75 * (q75 - q100)) / mImp) + _ (q100 / mImp) End Function   Media Attention Formula 1.2.xlsb
    • Gracias tomarse el tiempo de leer por responder Maestro @Antoni Adjunto el archivo con la idea a la que deseo llegar, sigo atento. Mil gracias por el tiempo y la ayuda brindada   Media Attention Formula 1.2.xlsb
    • He analizado la UDF y entiendo perfectamente lo que hace, lo que no entiendo es lo que pretendes hacer. Mejor sube un ejemplo resuelto de  como debería funcionar la UDF con los nuevos parámetros solicitados. 
    • Gracias, ya lo conseguí solucionar
    • Hola a todos Primero que nada deseo agradecer el tiempo en leer este post, Muchas Gracias. Me acerco a ustedes para pedir su ayuda para lo siguiente: Tengo una UDF, la cual tiene dos escenarios: 1.- Si Tiempo Promedio y Duración del Video son diferentes de 0, hacer el calculo 2.- Si lo anterior es igual a 0, se realiza el otro calculo por cuartiles. El detalle es que son muchas celdas a seleccionar, lo cual creo puede ser engorroso, entonces, pensando en simplificar la función, me pregunte si fuera posible: a.- Colocar 1 al principio de la función y después solo seleccionar 2 celdas correspondientes (Rango continuo o discontinuo) b.- Colocar 2 al principio de la función y después seleccionar las 5 celdas correspondientes (Rango continuo o discontinuo) Espero me puedan ayudar y/o orientar al respecto, quedo atento para cualquier duda, de antemano les agradezco cualquier ayuda brindada. Mil Gracias!! Media Attention Formula 1.1.xlsb  
  • Visualizado recientemente

    • No hay usuarios registrado para ver esta página.
×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.