Actividad pública reciente
Ha empezado a seguir el tema Microsoft Excel
Ha valorado "Buena" la respuesta
Nombre de celda activa
Dim CeldaActiva As String Private Sub Worksheet_SelectionChange(ByVal Target As Range) CeldaActiva = Target.Address MsgBox CeldaActiva 'solo para comprobar End Sub