top of page

Imagina una hoja de Excel que utiliza 200 columnas pero resulta que la mitad de las columnas están en blanco y alternadas con la otra mitad que si tienen datos...

 

  • ¿Cuanto tiempo puede llevarte quitar las columnas en blanco?.... 15 min, quizás?,

  • Puede que si lo haces manualmente te equivoques y  borres alguna con datos...

  • Que ocurre cuando no es un archivo sino 50 los que presentan esta problemática?

  • etc...

 

LA SOLUCION es hacer un programa (SUB) tan simple como este. (te aseguro que es muy facil conseguir este nivel) 

Un problema....

 Set borrarc = Worksheets("TEMP").Columns(200)
    For Each col In Worksheets("TEMP").Range("A2:AF2")
        If col = "" Then
            Set colu = Worksheets("TEMP").Columns(col.Column)
            Set borrarc = Union(borrarc, colu)
        End If
     Next
     Worksheets("TEMP").Range(borrarc.Address).Delete

CONCLUSIONES:

  • Programar ahorra mucho trabajo.

  • Es muy fácil de mantener.

  • Puede automatizarse todas las tareas y programarse su ejecución .

  • Son exportables .

  • Hay mucha ayuda al respecto.

bottom of page