VBA to prevent deletion of a single COLUMN only ?

[spyrule]

Hello,

I know of the code:

[COLOR=#000000][FONT=verdana]Target.Address = Target.EntireColumn.Address[/FONT][/COLOR]

to help prevent the deletion of columns.

However, how do I change this to ONLY prevent the deletion of the A column and A Column ROWS only?

I'm assuming I need to add an IF statement to detect what the target.address is, except, I'm unsure how to detect only for a specific column, or if a cell is in the A column.

Any help is appreciated!

 

[baitmaster]

you could look to see if your target and columns(x) have the same address. Or you could look at the intersect of the two ranges, i.e. the point at which they overlap

e.g.1 if target.address = columns(1).address then ' target is column A

e.g.2 if not intersect(target, columns(1)) is nothing then ' there is an overlap between the 2 ranges