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
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
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
A voir également:
- Lien Hypertexte
- Lien url - Guide
- Créer un lien pour partager des photos - Guide
- Lien copié - Forum Téléphones & tablettes Android
- Verifier un lien - Guide
- Lien hypertexte linkedin - Forum Réseaux sociaux
5 réponses
The_boss_68
Messages postés
945
Date d'inscription
dimanche 15 novembre 2015
Statut
Membre
Dernière intervention
25 février 2025
180
28 nov. 2021 à 16:58
28 nov. 2021 à 16:58
Bonjour,
Voir Pj avec une MFC + petit code vba pour actualiser
https://www.cjoint.com/c/KKCp3CRSjcj
Slts
Voir Pj avec une MFC + petit code vba pour actualiser
https://www.cjoint.com/c/KKCp3CRSjcj
Slts
The_boss_68
Messages postés
945
Date d'inscription
dimanche 15 novembre 2015
Statut
Membre
Dernière intervention
25 février 2025
180
27 nov. 2021 à 17:21
27 nov. 2021 à 17:21
Bonjour,
Voir Pj avec une MFC
https://www.cjoint.com/c/KKBquMqSXqj
Slts
Voir Pj avec une MFC
https://www.cjoint.com/c/KKBquMqSXqj
Slts
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
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
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
The_boss_68
Messages postés
945
Date d'inscription
dimanche 15 novembre 2015
Statut
Membre
Dernière intervention
25 février 2025
180
27 nov. 2021 à 21:08
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
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
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
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
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
29 nov. 2021 à 14:02