Foro

Ok. escorrecto si te fijas, el bucle analisala cilumna activa y si esta vacia la elimina, despues de eliminar la columna retrocede una columma para que despues pueda avanzar una y vlverla a analizar...

Las macros para aliminiar tanto filas como columnas vacias nunca pueden iniciar anla primera fila ni en la primera columna,

en tu caso la macro tendra que iniciar enla columna 2 (B) para que funcione..

Saludos.

Range("C1:C20".Select
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.EntireRow.Delete

Sub MyMacro()
Range("a1".Select

Pueba con esta

For i = 1 To 16

If ActiveCell.Value = "" Then
ActiveCell.End(xlDown).Select
If ActiveCell.Row = 65536 Then
a = ActiveCell.Row
ActiveCell.End(xlUp).Select
If a = 65536 Then
Selection.EntireColumn.Delete
ActiveCell.Offset(0, -1).Select
End If
End If
End If
ActiveCell.Offset(0, 1).Select
Next
End Sub

Sorry es Asi


Sub MyMacro()
Range("a1".Select

For i = 1 To 16

If ActiveCell.Value = "" Then
ActiveCell.End(xlDown).Select
If ActiveCell.Row = 65536 Then
a = ActiveCell.Row
ActiveCell.End(xlUp).Select
If a = 65536 Then
Selection.EntireColumn.Delete
ActiveCell.Offset(0, -1).Select
End If
End If
End If
ActiveCell.Offset(0, 1).Select
Next
End Sub