Une plage de cellule dans une plage de cellules

Bonsoir,

En comparant sa position (colonne ligne) et sont nombre de
colonne/ligne :

Voilà une proposition :

'En supposant que la zone de comapraison est C3:H8
With Selection
If .Row >= 3 And .Column >= 3 And .Rows.Count + .Row - 1 <= 8 And
.Columns.Count + .Column - 1 <= 8 Then MsgBox "ok"
End With

Bonsoir,
Comment savoir si une plage de cellules (ou selection) fait partie
intégrante d' une autre plage de cellules ?
Merci et bonne soirée.
Cordialement,
RV

Voir Intersect.

Extrait de l'aide :
(Il faut définir isect As Range, et nommer les ranges rg1 et rg2)
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

P.


"RV" <Inv@lide> a écrit dans le message de news: OiD%23YS9EHHA.4052@TK2MSFTNGP02.phx.gbl...

Bonsoir,
Comment savoir si une plage de cellules (ou selection) fait partie intégrante d' une autre plage de cellules ?
Merci et bonne soirée.
Cordialement,
RV

Bonsoir,

'---------
If Not Intersect(Selection, [plage]) Is Nothing Then MsgBox "Selection dans
la plage"
'----------
--
Salutations
JJ

"RV" <Inv@lide> a écrit dans le message de news:
OiD%23YS9EHHA.4052@TK2MSFTNGP02.phx.gbl...

Bonsoir,
Comment savoir si une plage de cellules (ou selection) fait partie
intégrante d' une autre plage de cellules ?
Merci et bonne soirée.
Cordialement,
RV

Re-bonsoir,
Merci à tous pour vos réponses...
Cordialement,
RV

"Jacky" <nospams@not> a écrit dans le message de news:
%23w9H0h9EHHA.3768@TK2MSFTNGP02.phx.gbl...

Bonsoir,

'---------
If Not Intersect(Selection, [plage]) Is Nothing Then MsgBox "Selection
dans la plage"
'----------
--
Salutations
JJ

"RV" <Inv@lide> a écrit dans le message de news:
OiD%23YS9EHHA.4052@TK2MSFTNGP02.phx.gbl...

Bonsoir,
Comment savoir si une plage de cellules (ou selection) fait partie
intégrante d' une autre plage de cellules ?
Merci et bonne soirée.
Cordialement,
RV