Lien Hypertexte

Résolu/Fermé
litchoutsou Messages postés 86 Date d'inscription samedi 10 juin 2017 Statut Membre Dernière intervention 19 février 2024 - Modifié le 29 nov. 2021 à 09:38
litchoutsou Messages postés 86 Date d'inscription samedi 10 juin 2017 Statut Membre Dernière intervention 19 février 2024 - 29 nov. 2021 à 14:02
Bonjour à tous et un super bon week-end
Je suis sur Excel 2019
J'ai une formule en VBA qui colorie la cellule d'arrivée du lien Hypertexte en Jaune,
Les lignes 6,8,10 sont coloriés en vert, mais lorsque le clic sur le lien la couleur sur la page de la cellule sélectionné disparaît y aurait-il une solution?
JE JOINS LE FICHIER
https://www.cjoint.com/c/KKBpvJZwJFR
MERCI

5 réponses

The_boss_68 Messages postés 928 Date d'inscription dimanche 15 novembre 2015 Statut Membre Dernière intervention 10 juin 2024 177
28 nov. 2021 à 16:58
Bonjour,

Voir Pj avec une MFC + petit code vba pour actualiser

https://www.cjoint.com/c/KKCp3CRSjcj

Slts
1
litchoutsou Messages postés 86 Date d'inscription samedi 10 juin 2017 Statut Membre Dernière intervention 19 février 2024 1
29 nov. 2021 à 14:02
merci beaucoup
0
The_boss_68 Messages postés 928 Date d'inscription dimanche 15 novembre 2015 Statut Membre Dernière intervention 10 juin 2024 177
27 nov. 2021 à 17:21
Bonjour,

Voir Pj avec une MFC

https://www.cjoint.com/c/KKBquMqSXqj

Slts
0
litchoutsou Messages postés 86 Date d'inscription samedi 10 juin 2017 Statut Membre Dernière intervention 19 février 2024 1
27 nov. 2021 à 18:01
BONSOIR et merci de m'avoir répondu si vite c'est super et ça fonctionne bien
auriez vous une solution pour que la ligne 5 sur la première feuille Sortie ne ce colorie pas en jaune, svp regardez voir en Vba
0
The_boss_68 Messages postés 928 Date d'inscription dimanche 15 novembre 2015 Statut Membre Dernière intervention 10 juin 2024 177
27 nov. 2021 à 21:08
Bonsoir,

Par le biais du raccourci clavier Alt + F11..... Double clic sur ThisWorkbook qui se trouve en haut à gauche et supprime le code vba qui ce trouve dedans

En espérant t'avoir aidé

Slts
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
litchoutsou Messages postés 86 Date d'inscription samedi 10 juin 2017 Statut Membre Dernière intervention 19 février 2024 1
28 nov. 2021 à 09:21
BON DIMANCHE et merci encore pour ton aide
pour mettre en jaune la cellule sélectionner j'ai mis cette formule dans chaque feuille

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row <> 5 Then Exit Sub
Cells.Interior.ColorIndex = 0
Target.Interior.ColorIndex = 6
End Sub

je n'arrive pas à trouvé la formule à mettre dans ThisWorkbook pour mettre en jaune la cellule sélectionne par le lien, et sans mettre en jaune la ligne 5 de la feuille Sortie
je joint a nouveau le fichier
https://www.cjoint.com/c/KKCivm5FXGR
et encore Merci
0