Macro to remove blank column

netchie · #1 02-25-2013, 12:01 PM

Hi,

Do you have a simple macro VBA that wil automatically removed a column or third column?

Thanks,
netchie

macropod · #2 02-25-2013, 05:47 PM

Why do you need a macro, when you can click any where in a column, then use Table Tools>Layout>Delete>Delete Columns? This seems far more flexible than a macro that's restricted to the 3rd column.

netchie · #3 03-04-2013, 01:25 PM

Hi macropod,

Thanks for your reply

Yeah I know right? But I'm just wondering how it can be made through macro.

macropod · #4 03-04-2013, 01:45 PM

The following macro will delete whatever column(s) the insertion point is in or cells from which are selected (ie it's not restricted to deleting one column at a time.

Code:

Sub Demo()
With Selection
  If .Information(wdWithInTable) Then
    .Columns.Delete
  End If
End With
End Sub

netchie · #5 03-14-2013, 02:22 PM

Hi macropod,

It worked! Wooo Hoo! Thnaks so much!

Netchie

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
how to remove blank box on top-left corner of table in PPT 2010?	dylansmith	PowerPoint	3	10-18-2012 03:59 AM
Need VBA For Macro On How To Remove Specific Words	netchie	Word VBA	6	08-28-2012 03:37 PM
Macro to remove MacroButtons	ilkks	Word VBA	3	05-22-2011 11:03 PM
How to remove blank rows from a specified range?	Learner7	Excel	1	04-19-2011 02:45 AM
Need help on Macro 03- Find text - if text is blank then remove line	simpleonline1234	Word VBA	1	02-25-2011 02:28 AM