Discussion :

[CatDos]

Bonjour,
Comment écrire dans VBA pour Excel la condition suivante ?
Si les cellules sélectionnées (d'une même colonne) ne sont pas contiguës, alors la procédure s'arrête et une msgbox informe: "Les cellules sélectionnées ne sont pas contiguës".
Merci beaucoup pour votre réponse

[MarcClap]

Bonjour,

Selection.Areas.Count te donne le nombre d'aires de ta sélection. Donc ton code pourrait être basé sur ça ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If Selection.Areas.Count > 1 then ....

[CatDos]

C'est parfait ! C'est exactement ce que je voulais.
Merci beaucoup !