Forums Últimos mensajes - Powered by IBM
 

Macro para eliminar columnas

17/10/2005 - 16:33 por cuejorge2003 | Informe spam
Buen día,

Tengo columnas de la C a la I de las cuales quiero eliminar las que en
la primer celda no haya datos.

Me pueden, por favor, ayudar ?

Un saludo.
Jorge
 

Leer las respuestas

#1 Mauro Jesús
17/10/2005 - 12:04 | Informe spam
Sub OcultaColumnasVacias
For i = 3 To 9 '3= columna C, 9=columna I
If ActiveSheet.Cells(1,i) = "" Then
ActiveSheet.Cells(1,i).Select
Selection.EntireColumn.Delete
End If
Next i
End Sub


Saludos!

escribió en el mensaje
news:
Buen día,

Tengo columnas de la C a la I de las cuales quiero eliminar las que en
la primer celda no haya datos.

Me pueden, por favor, ayudar ?

Un saludo.
Jorge

Preguntas similares