Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Selection.Resize : comment "diminuer" la selection d'une plage Haut Bas Drt Gauche ?

Selection.Resize : comment "diminuer" la selection d'une plage Haut Bas Drt Gauche ?

2 réponses
Avatar
Alfred WALLACE
Bonjour,
je viens de r=E9aliser par VBA un TCD en E25

je me place en E25 : Range("E25").Select

Puis je selectionne la r=E9gion : Selection.CurrentRegion.Select

donc, je voudrais appliquer une mise en forme conditionnelle afin que
toutes les valeurs
sup=E9rieurs =E0 3 soient en rouge... ok. pas de pb pour =E7=E0.

***Mon probl=E8me***
dans la selection, il y a les totaux de ligne et de colonnes.

comment je peux "r=E9duire" la selection de 2 lignes en haut, et de 1
ligne =E0 droite, =E0 gauche
et en bas du TCD ?

J'ai essayer avec : Selection.Resize("quelque chose").Select mais je
n'y arrive pas....

un petit tuyaux ?

Merci beaucoup ?

Jos=E9
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
JB
Bonjour,

Range("A2").CurrentRegion.Select
Selection.Offset(2, 1).Resize(Selection.Rows.Count - 2,
Selection.Columns.Count - 2).Select

JB



Bonjour,
je viens de réaliser par VBA un TCD en E25

je me place en E25 : Range("E25").Select

Puis je selectionne la région : Selection.CurrentRegion.Select

donc, je voudrais appliquer une mise en forme conditionnelle afin que
toutes les valeurs
supérieurs à 3 soient en rouge... ok. pas de pb pour çà.

***Mon problème***
dans la selection, il y a les totaux de ligne et de colonnes.

comment je peux "réduire" la selection de 2 lignes en haut, et de 1
ligne à droite, à gauche
et en bas du TCD ?

J'ai essayer avec : Selection.Resize("quelque chose").Select mais je
n'y arrive pas....

un petit tuyaux ?

Merci beaucoup ?

José


Avatar
Alfred WALLACE
JB wrote:
Bonjour,

Range("A2").CurrentRegion.Select
Selection.Offset(2, 1).Resize(Selection.Rows.Count - 2,
Selection.Columns.Count - 2).Select

JB
Merci c'est tout à fait çà !!



josé