6m
Bonjour a tous et merci au forum qui m’a déjà beaucoup aidé.
Dans VISUAL BASIC Sur chaque feuille j’ai mis cette formule cela me permet en cliquant sur une cellule qui contient un lien hypertexte de m’ouvrir la feuille correspondante en la coloriant en jaune,mais j’ai plus de 120 feuilles et j’ai donc reproduit cette formule sur chaque feuille dans visual basic. N’y aurait-il pas la possibilité de mettre une formule qui serait valable pour toutes les 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
Bonjour a tous et merci au forum qui m’a déjà beaucoup aidé.
Dans VISUAL BASIC Sur chaque feuille j’ai mis cette formule cela me permet en cliquant sur une cellule qui contient un lien hypertexte de m’ouvrir la feuille correspondante en la coloriant en jaune,mais j’ai plus de 120 feuilles et j’ai donc reproduit cette formule sur chaque feuille dans visual basic. N’y aurait-il pas la possibilité de mettre une formule qui serait valable pour toutes les 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