Column Number via VBA

[omairhe]

Hey all,

I am trying to get the column number in Private Sub Workbook_SheetChange event code. So that if I change a cell's value the code shall output me the column number of where the change has occurred.


For instance I change a value of cell G5

In worksheet name = HSheet and cell B2 output value 7

Is possible ?

 

[jim may]

In Cell B2 enter =COLUMN(Sheet1!G7)

<tbody>
</tbody>

but in VBA that would be:

Range("B2"). Value = Range("G7").column

 

[Kenneth Hobson]

Application.EnableEvents = False
Worksheets("HSheet").[B2] = Target.Column
Application.EnableEvents = True