Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado

Reporte de Condiciones/actos subestándar

| 2 Comments

Este formulario se llena cada vez que cualquier trabajador reporta un hallazgo de una condición subestándar en su área de trabajo (alguna característica del área de trabajo que está fuera de los estándares de seguridad y salud  o es un peligro para los trabajadores) o  algún acto subestándar que perciba en su entorno de trabajo (algún acto realizado que no cumpla con los procedimientos , que se realice sin el permiso o condiciones de seguridad respectivas). Este reporte es utilizado para corregir estas condiciones y/o actos y también para el análisis de riesgos de acuerdo a la criticidad del mismo (A: criticidad alta, B: criticidad media, C: criticidad baja), usando solo los de criticidad A (se colorearán de rojo)

13

Reporte

Flor Córdova N

2 Comments

  1. Muy bueno, lo aplicare en mi empresa

  2. Considero que el ejemplo es útil para mantener una documentación de seguridad actualizada, básica en toda empresa dedicada al rubro de producción;si embargo se debería agregar una columna en la que se mencione las acciones correctivas y el responsable de solución. Agregando el siguiente código:

    Private Sub CommandButton1_Click()
    Sheets(“Formulario”).Select
    ult = Cells(Rows.Count, 2).End(xlUp).Row
    Cod = Codigo.Text
    Fec = Fecha.Text
    Nom = Nombre.Text
    Des = TextBox5.Text
    Acc = TextBox6.Text
    Res = TextBox7.Text
    Cells(ult + 1, 1) = Cod
    Cells(ult + 1, 3) = Fec
    Cells(ult + 1, 4) = Nom
    Cells(ult + 1, 5) = Des
    Cells(ult + 1, 7) = Res
    Cells(ult + 1, 8) = Acc

Deja un comentario

Required fields are marked *.


Excel Avanzado located at , Lima, Perú . Reviewed by usuarios rated: 4.7 / 5