Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

mise en forme sur sélection (autre colonne)

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion vistla
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
V

vistla

XLDnaute Junior
Bonjour cher forum!

je crois que celle-ci sera une facile pour certain mais je n'y arrive pas, encore une fois.

j'ai un tableau contenant 50+ colonnes. j'aimerais que lorsque je choisis une cellule (par exemple la celle AB15, que la cellule B15 devienne en gras (et éventuellement avec un fond de couleur différent)

j'avais trouvé ce code :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static Gras As String

If Gras <> "" Then Range(Gras).Font.Bold = False
Gras = Target.Address
ActiveCell.Font.Bold = True

End Sub

celui-ci mets en gras la cellule sélectionné et enlève le gras lorsque je quitte la cellule.

j'ai essayé de changer "Target.Address en y ajoutant un Offset, mais je n'y arrive pas. J'ai une erreur..

De toute façon, Le offset ne fonctionnerait pas si je me déplace verticalement dans mon tableau.

Auriez-vous un code me permettant cela?

merci 🙂

Éric
 
Trier par date Trier par votes
Re : mise en forme sur sélection (autre colonne)

Bonsoir,
Au plus simple
Code: 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static Gras As String
If Target.Count > 1 Or Target.Column < 27 Then Exit Sub
If Gras <> "" Then
    With Range(Gras)
        .Font.Bold = False
        .Interior.ColorIndex = xlNone
    End With
End If
Gras = Target.Offset(0, -26).Address
With Range(Gras)
    .Font.Bold = True
    .Interior.ColorIndex = 6
End With
End Sub
A+
kjin
A+
kjin
 
Vote positif 0 Vote négatif
Re : mise en forme sur sélection (autre colonne)

Merci, c'est un bon début, mais si je me déplace verticalement, le "target.address" bouge également.. il faudrait que ce soit la colonne B peut importe si je me déplace de gauche à droite.
 
Vote positif 0 Vote négatif
Re : mise en forme sur sélection (autre colonne)

Re,
vistla à dit:
mais si je me déplace verticalement, le "target.address" bouge également.. il faudrait que ce soit la colonne B peut importe si je me déplace de gauche à droite
Cliquez pour agrandir...
Tu veux dire horizontalement sans doute 🙄
Code: 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static Gras As String
If Target.Count > 1 Then Exit Sub
If Gras <> "" Then
    With Range(Gras)
        .Font.Bold = False
        .Interior.ColorIndex = xlNone
    End With
End If
Gras = Cells(Target.Row, 2).Address
With Range(Gras)
    .Font.Bold = True
    .Interior.ColorIndex = 6
End With
End Sub
A+
kjin
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Résolu(e)
Microsoft 365 Si contient telle liste de mots, colorer en bleu, sinon autre liste en vert, autre en violet..., etc.
2
Réponses
17
Affichages
781
anthoYS
C
  • Question Question
XL 2016 récupérer la mise en forme d'une cellule vers une autre cellule
Réponses
1
Affichages
645
TooFatBoy
  • Résolu(e)
XL 2021 Mise en forme conditionnelle : Couleur texte en fonction date d'une autre cellule
Réponses
6
Affichages
465
didier09
D
  • Question Question
Microsoft 365 mise en forme conditionnelle : choisir la couleur d'une autre cellule
Réponses
11
Affichages
872
deuxnid
D
E
  • Question Question
Microsoft 365 Mise en forme conditionnelle d'une ligne avec critère.
Réponses
9
Affichages
665
TooFatBoy
C
  • Question Question
Microsoft 365 Mise en forme conditionnelle sur clic
2
Réponses
22
Affichages
1 K
TooFatBoy
D
  • Résolu(e)
Microsoft 365 VBA Déplacement de la cellule active dans une ligne sélectionnée
Réponses
11
Affichages
536
danielco
D
S
  • Résolu(e)
Microsoft 365 Mailing mise en forme HTML : revenir à la ligne automatique si trop de texte saisie
2
Réponses
17
Affichages
1 K
spike29
S
C
  • Question Question
XL 2021 [RESOLU]Aide pour une mise en forme conditionnelle
Réponses
8
Affichages
800
crocrocro
C
M
  • Question Question
XL 2021 macro VBA
Réponses
4
Affichages
586
ManuEven
M
X
  • Question Question
XL 2021 Transformation de données sur une ligne en plusieurs lignes
Réponses
9
Affichages
525
xavieralvaro
X
R
  • Question Question
XL 2019 Mise en forme conditionnelle
Réponses
4
Affichages
624
Nain porte quoi
D
  • Résolu(e)
XL 2016 problème code sur mise en forme conditionnelle
Réponses
14
Affichages
569
Dimitri13
D
M
  • Question Question
XL pour MAC Mise en forme conditionnel
Réponses
3
Affichages
660
manuBX
M
N
  • Question Question
Google Sheets Calcul de prix en fonction d'un choix multiple
Réponses
0
Affichages
595
noel33
N
H
  • Question Question
XL 2016 Mettre des titres avec une mise en forme spécifique
Réponses
1
Affichages
627
vgendron
U
  • Question Question
Autres incorporer une macro dans une autre macro
Réponses
5
Affichages
797
Phil69970
P
  • Résolu(e)
XL 2013 Mise en forme suite à utilisation de UserForm
Réponses
4
Affichages
812
PR.
P
H
  • Question Question
Microsoft 365 Mise en forme conditionnelle sur autre tableau
Réponses
2
Affichages
530
hbb
H
Y
  • Question Question
XL 2019 Mise en forme conditionnelle
Réponses
2
Affichages
607
YOU06
Y
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…