Delete Column

vijaychennai · Mar 9, 2015

Hello all,

I Need to delete Column .

If "C1" Is blank then " I Need delete Entire "C" Column.

It's is possible in VBA Code.

Regards,
Vijay

VoG · Mar 9, 2015

Try

Code:

Sub test()
If Range("C1").Value = "" Then Columns("C").Delete
End Sub

vijaychennai · Mar 9, 2015

Hi VOG,

Thanks.

I am trying to add another colum it's not working.

Code:

Sub delete_Column()
If Range("C1").Value = "" Then Columns("C").Delete




If Range("D1").Value = "" Then Columns("D").Delete


End Sub

VoG · Mar 9, 2015

Try working backwards

Code:

Sub delete_Column()
If Range("D1").Value = "" Then Columns("D").Delete
If Range("C1").Value = "" Then Columns("C").Delete
End Sub