VBA- Test if Column is selected

[jkeyes]

I know this is simple, I'm just having a "moment"...

In VBA, using an IF statement, I want to see if a column (B) is selected... help?

Thanks!

 

[Scott Huish]

Need a little clarification.

What do you want to return:
If just one cell was selected in column B?
If more than column B was selected, say columns A:C?

 

[jkeyes]

I want to know if one, entire column is selected: Column B... thanks!

 

[HalfAce]

Hello jkeyes,
Something like this should work.

If Selection.Column = 2 And Selection.Count = Rows.Count Then
  MsgBox "Yes, the entire column B is selected."
Else
  MsgBox "Nope, you have something other than the entire column B selected."
End If

Hope it helps.

 

[pgc01]

Hi jkeyes

Is selection includes column B but may also include other ranges try:

If Not Intersect(Selection, Columns("B")) Is Nothing Then _
    If Intersect(Selection, Columns("B")).Address = Columns("B").Address Then _
        MsgBox "The entire Column B is selected"

Or,

If Not Intersect(Selection, Columns("B")) Is Nothing Then _
    If Intersect(Selection, Columns("B")).Rows.Count = Rows.Count Then _
        MsgBox "Column B selected"

Hope this helps
PGC