Delete a specific column by using Macro

[muan19]

Hi,
Please help me to create a button in Excel on which assign a macro with a condition that when I enter column name in cell and press the button then it automatically delete that column.

Thanks in Advance.

Muan

 

[My Aswer Is This]

What cell will you be putting the column number into?

 

[isaackoh8393]

Hi,
Please help me to create a button in Excel on which assign a macro with a condition that when I enter column name in cell and press the button then it automatically delete that column.

Thanks in Advance.

Muan

Sub Delete()
Dim delval

del = Range("A1").Value

for i = 2 to 100
if cells(i,1).value = del then
cells(i,1).value.entirerow.delete
endif
next i

end sub

 

[muan19]

For Example:
I need a button in cell A1 and When I enter D in Cell A2 and press the button then column D should be deleted.

 

[muan19]

What cell will you be putting the column number into?

For Example:
I need a button in cell A1 and When I enter D in Cell A2 and press the button then column D should be deleted. If I enter C then column C should be deleted and so on.

 

[jorismoerings]

Create the button and asigning the macro is easy to do. The VBA should look like this:

Sub Macro1()
'

' Macro1


    i = Range("A2").Value
    Range(i & "1").EntireColumn.Delete
   
End Sub

Be aware: when entered column A the macro deletes column A including the button!

 

[muan19]

create the button and asigning the macro is easy to do. The vba should look like this:

Sub macro1()
'

' macro1


    i = range("a2").value
    range(i & "1").entirecolumn.delete
   
end sub

be aware: When entered column a the macro deletes column a including the button!

thank you a great help