VBA to record the position of the cursor

[bbran19]

I plan to develop a macor to modify the formula in the cell to the left of the cursor.

I am after a code that will select and copy the formula of the cell to the left of the cursor.

I am using

Range("A1").Offset(0,-1).Select

but I was hoping the replace A1 with the current cursor position.

Any help appreciated.

Thanks Bob

 

[Bosquedeguate]

Public Sub ChangeSelectedCell()
  Dim addr
  Dim cellvalue
  Dim formula
  
  'Save current selected cell address, value and formula
  With Selection
    addr = .Address 'store the current cursor position
    cellvalue = .Value 'get the value of current active/selected cell
    formula = .formula 'get the formula for the selected cell
    If .Column > 1 Then .Offset(0, -1).Select 'move the cursor left one cell
  End With
End Sub

I think your problem is that you have a range address in your Range("A1") ... statement.

Use "Selection." for the current active/selected cell.

Of course if you are column A you cannot move the cursor left.

I hope this helps.

 

[bbran19]

Public Sub ChangeSelectedCell()
  Dim addr
  Dim cellvalue
  Dim formula
 
  'Save current selected cell address, value and formula
  With Selection
    addr = .Address 'store the current cursor position
    cellvalue = .Value 'get the value of current active/selected cell
    formula = .formula 'get the formula for the selected cell
    If .Column > 1 Then .Offset(0, -1).Select 'move the cursor left one cell
  End With
End Sub

I think your problem is that you have a range address in your Range("A1") ... statement.

Use "Selection." for the current active/selected cell.

Of course if you are column A you cannot move the cursor left.

I hope this helps.

Thank you. I will try that now.

 

[bbran19]

That hit the spot perfectly.

Thank you

 

[johnnyL]

You asked for the cursor position, I think you meant to say 'Selected cell'. The cursor means where the mouse is currently pointing at.

 

[Bosquedeguate]

Thank you. I will try that now.

Glad to help

 

[Bosquedeguate]

That hit the spot perfectly.

Thank you

Glad to help

 

[bbran19]

You asked for the cursor position, I think you meant to say 'Selected cell'. The cursor means where the mouse is currently pointing at.

Of course you are perfectly correct, johnny. Please forgive my incompetence.