Column Number for currentregion

[justam]

Hello

I have a current region sitting anywhere in the sheet.

What code returns the column number of the current region for the activecell/selection?

I am after the column number of the region, not the column number of the sheet.

Thanks for any help offered.

[VBA Noob]

Hi,

To get the first column of the selection, use

Dim ColNum As Integer 
ColNum = Selection.Cells(1,1).Column

To get the number of columns selected, use

 
Dim ColCount As Integer 
ColCount = Selection.Columns.Count

Hope it helps

VBA Noob

[justam]

Thanks for the quick reply Noob.

Not sure if that is what I am looking for.

Say I have a currentregion E6:H28. The activecell/selection is G15.

I want to return the columnnumber of the currentregion (3) for G15.

[VBA Noob]

Think this works

 
Sub Macro4()
    Dim ColNum As Integer
    ColNum = Selection.Cells(1, 1).Column
    
    Selection.End(xlToLeft).Select
    MsgBox Abs(ActiveCell.Column - ColNum)
End Sub

VBA Noob

[justam]

Noob

Right. I had already come up with something similar but I thought there must be a property and syntax which would give it to me in a single line.

Thanks for your help.

[VBA Noob]

No Problem

VBA Noob