Excel et hypertexte

bonsoir à toutes et à tous

Voici mon souci : je souhaiterai en fonction d'un nom d'un agent ex agent A (en H3), si je clic sur l'icone planning, le planning de l'agent concerné s'affiche et ainsi de suite avec les autres agents.

Comment peut on faire? J'ai cherché mais je n'y arrive pas. Si une personne pouvait m'apportait une solution, je l'en remercie d'avance.

Cdt

Jym

5acceuil.xlsx (118.90 Ko)
4agent-a.xlsx (9.01 Ko)
1agent-b.xlsx (9.00 Ko)
1agent-c.xlsx (9.01 Ko)

Bonjour,

Voici le code à mettre dans un module et lier l'image à ce code

Sub AfficherPlanning()
  Dim sNom As String, sNomFic As String
  sNom = ThisWorkbook.Sheets("Feuil2").Range("H3").Value
  sNomFic = Replace(LCase(sNom), " ", "-") & ".xlsx"
  Workbooks.Open ThisWorkbook.Path & "\" & sNomFic
End Sub

A+

Bonjour

Merci pour ton aide. Etant novice dans vba, et après avoir rechercher le moyen de lier l'image au code, je n'y arrive pas. Aurais tu une solution?

@+

Jym

Re,

Non sérieux

Le code dans un module

image

Clic droit sur le bouton -> Affecter une macro -> Clic sur le nom de la sub et OK

image

A+

Désolé

Rechercher des sujets similaires à "hypertexte"