Identificar la celda de hoja de cálculo seleccionada

[erbuson]

Suponiendo que estas trabajando en VBA de Excel, prueba con esto:

Código vb:

Public Sub MiMacro()
  Dim Celda As Range
  For Each Celda In Application.Selection
    Celda = "123"
  Next
End Sub
 

Saludos