Jump to content

ELIZABETHFACCI

Members
  • Content Count

    31
  • Joined

  • Last visited

About ELIZABETHFACCI

  • Rank
    Member
  • Birthday 06/21/1990
  1. Hola, buenas tardes: Solicito su ayuda, pues llevo tiempo generando una macro la cual ya se ejecuta de forma correcta en la hoja seleccionada, pero requiero ejecutarla en algunas hojas del libro activo en forma automática (sin estar ejecutando la macro de hoja por hoja), he incluido un ciclo FOR pero me lo hace de forma incorrecta :S ojalá puedan ayudarme!! Les anexo parte del archivo con el cual estoy trabajando, del cual la primera pestaña es el formato del reporte, la segunda pestaña es reporte ejemplo (resumen) de la 3a pestaña. De antemano agradezco la atención. Saludos!!! reporte.xls
  2. Gracias por el comentario. Sé que sería mejor hacerlo por fórmulas, pero es preciso hacerlo por macro .
  3. Hola, buenos días: Recurro a ustedes pues llevo ya tiempo programando esta macro que basa su funcionamiento en unos reportes de los cuales debo hacer un resumen, la cual casi queda lista, aun tiene algunos detalles, de los cuales espero me puedan auxuliar! me empiezo a sentir frustrada les comento: mi macro hace un acumulado de tiempo extra de las personas, ademas de otros factores los cuales podran ver en el resumen final, del cual el acumulado del tiempo extra no me lo hace de forma correcta lo he puesto de mil formas y no me sale! se reinia a las 24 hrs! y otra cosita, como hago que los arreglos se adapten al numero de personas evaluadas??? x favor ayuda!! Les anexo mi código, el reporte y el resumen de como queda y como deberia quedar. Desde ya, mil gracias! En verdad necesito de su ayuda! Y como podran ver en mi código, soy novata, iniciando con esto de vba, prometo aprender para optimizar código. incidencias.xls
  4. Doy el tema por SOLUCIONADO, y Macro Antonio, mis respetos y mil gracias! Ya lo adapté a mis necesidades! Excelente día!
  5. Excelente!! Este funciona sobre cualquier hoja con el mismo formato de la muestra cierto? (para adaptarla) ya que debo aplicarlo sobre otras con diferentes número de registros
  6. Gracias por la ayuda pero en el conteo se sigue reiniciando es decir, si el acumulado es de más de 24 horas, resta 24 horas y solo me muestra las restantes... disculpa si soy algo latosa en este tema :/
  7. Lo he cambiado: cad = Format(cad, "[h]:mm")[CODE] Pero me manda error: Type mismatch en la segunda parte del código que posteé arriba , alguna idea del porque? Pongo un panorama más amplio de mi código: [CODE]'Declaraciones Dim h_trab(20) As Date Dim cad As String 'extraigo datos de celda cad = Sheets(strnombrehoja$).Cells(fila, 13) cad = Format(cad, "[h]:mm") 'asigno el valor de "cad" a la primera posición de h_trab() h_trab(i) = CDate(cad) ------->aqui me manda el error 'type mismatch' 'cuando sea la misma persona al recorrer los registros, sumo su tiempo acumulado h_trab(m) = CDate(h_trab(m)) + CDate(cad) 'imprimo en una celda el tiempo acumulado h2.Range("D" & k).Value = CDate(h_trab(j))[/CODE] Ayuda!!
  8. Hola, muy buenas tardes: Les platico y ojalá puedan ayudarme!! Pues bien, estoy trabajando con una macro que necesito que me sume las horas trabajadas, los códigos los tengo así: Celda de la que tomo el valor: cad = Sheets(strnombrehoja$).Cells(fila, 13) cad = Format(cad, "hh:mm")[/CODE] Lo asigno a la posición 1 (i=1) del arreglo (el arreglo es necesario pues son varios empleados) el cual es del tipo Date: [CODE] h_trab(i) = CDate(cad)[/CODE] Y para acumular sus horas (cuando recorre los registros) cuando el id sea un empleado ya guardado en el arreglo: [CODE]h_trab(m) = CDate(h_trab(m)) + CDate(cad)[/CODE] Pero no me está haciendo bien la suma, supongo que al llegar a 24hrs se reinicia :S algún consejo?? Desde ya, mucha gracias!!
  9. Me manda un tipo de error: "Suscript out of range"
  10. Hola, buenos días a todos: Les externo mi duda: como hago para que mi macro que utiliza arreglos, defina tamaño en base a según vayan llenándose éstos? (pues se van llenando con datos de registros en base a ciertas condiciones). Pues me manda un error si no le pongo tamaño desde un inicio que los tenía declarados de esta forma: Dim id() As Integer
  11. Hola buenas tardes: Después de tanto batallar con una macro algo pesadita (y que me ha costado tiempecillo) , espero me puedan ayudar a finalizarla xfis!! Pues bien, la macro me funciona para la hoja activa, pero necesito que la misma macro se ejecute para cada hoja del libro activo, y al ponerle el ciclo para que asi sea, me manda un error (Run-time '13' type mismatch) Les anexo el archivo y macro con la que estoy trabajando, ayuda!! FO-RH23-22.xls incidencias.xls
  12. Perfecto! Funciona de maravilla , mil gracias!. Doy el tema por SOLUCIONADO.
×
×
  • Create New...

Important Information

Privacy Policy


CTA Templates.png