Intersect Socorrooo, o Mercedes

Hola.

Del método Intersect, dice la ayuda:
-
Método Intersect

Devuelve un objeto Range que representa la intersección rectangular de dos o más rangos.
expresión.Intersect(Arg1, Arg2, ...)

expresión Opcional. Expresión que devuelve un objeto Application.

Arg1, Arg2, ... Range requerido. Los rangos que tienen intersección. Deben especificarse al menos
dos objetos Range.
Ejemplo
En este ejemplo se selecciona la intersección de dos rangos con nombre, rg1 y rg2, en Sheet1. Si no
hay intersección entre los rangos, el ejemplo mostrará un mensaje.
Worksheets("Sheet1").Activate
Set isect = Application.Intersect(Range("rg1"), Range("rg2"))
If isect Is Nothing Then
MsgBox "Ranges do not intersect"
Else
isect.Select
End If
-
Tengo dos rangos ( soy casi rico)
cPla ( Fila 1)
çSalPla ( columna 5)

Si en la ayuda
expresión.Intersect(Arg1, Arg2, ...), la expresión es Opcional.
porqué
Intersect(CPla, çSalPla)= "Hola Manuel"
... me genera error

si de
msgbox cPla.row
y
msgbox çSalPla.column
se ve claramente que estan asignados los rangos y me dan la fila y columna adecuadas

¿Donde está el gazapo?

Saludos y ... Excel entes vibraciones
Des As Tres No imprimas, ganemos un árbol... o tres hojinas
.