Cuando exportas la lista de materiales, equipos y presupuesto del programa S10 a formato Excel, puede haber un problema con la cantidad de celdas vacías que se generan en el archivo exportado. Estas celdas vacías pueden dificultar la copia de datos a una plantilla específica, como un cronograma valorizado de obra. Sin embargo; a través del del macro descrito en el video, nos podemos deshacer de dichas filas y columnas de una manera mas rápida y copiar sin problemas las lista de insumos, materiales y el presupuesto a las plantillas de nuestro interés, que pueden ser el diagrama de gantt o el cronograma valorizado de obra.
Para utilizar esta macro:
- Presiona Alt + F11 para abrir el Editor de Visual Basic.
- Inserta un nuevo módulo haciendo clic derecho en el panel de la izquierda y seleccionando “Insertar” > “Módulo”.
- Copia y pega el código en el nuevo módulo.
- Cierra el Editor de Visual Basic.
- En Excel, presiona Alt + F8 para abrir la ventana de “Macros”.
- Selecciona “EliminarFilasColumnasEnBlanco” y haz clic en “Ejecutar”.
Esta macro eliminará las filas y columnas que no contengan ningún valor en la hoja de cálculo activa. Asegúrate de guardar tu archivo de Excel antes de ejecutar esta macro, ya que los cambios son permanentes.
Linea de texto que debes pegar en el Editor de Visual Basic en Excel.
Copía el siguiente línea de texto en la parte donde se indica en el video:
Sub EliminarFilasColumnasEnBlanco()
Dim rng As Range
Dim fila As Long
Dim columna As Long
' Eliminar filas en blanco
For fila = ActiveSheet.UsedRange.Rows.Count To 1 Step -1
If WorksheetFunction.CountA(ActiveSheet.Rows(fila)) = 0 Then
ActiveSheet.Rows(fila).Delete
End If
Next fila
' Eliminar columnas en blanco
For columna = ActiveSheet.UsedRange.Columns.Count To 1 Step -1
If WorksheetFunction.CountA(ActiveSheet.Columns(columna)) = 0 Then
ActiveSheet.Columns(columna).Delete
End If
Next columna
End Sub
Puedes ver el video tutorial aquí
Queridos visitantes,
¡Gracias a todos por visitarnos y ser parte esta comunidad y por su continuo apoyo!
Su presencia y entusiasmo son la fuerza impulsora detrás de nuestra comunidad, creando un ambiente donde todos podamos nutrirnos de buena información y mejorar constantemente.
