Como Guardar el Valor target en una variable Public

Una consulta no se si se entiende mi pregunta:

Lo siguiente tengo Private Sub Worksheet_Change(ByVal Target As Range)

Lo que quiero es guardar la dirección de Target en una variable publica para utilizar en un modulo no se si me deje entender, por ejemplo:

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("A:A")) Is Nothing Then

direcion = Target.Address

End If

End Sub

MODULO

Sub ejemplo ()

Msgbox "Estabas en la celda " & direccion

End Sub

Respuesta
1

Sí se puede, pero te dejo un par de cambios en tus códigos.

Primero: en el módulo, declaras la variable como pública (y en este caso la declaré tipo Range)

Segundo: la asignación de los rangos, los haces mediante la instrucción Set en la hoja que quieras

Comprobación:

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas