Help ! liaisons Excel
Résolu
fsix02
Messages postés
3
Statut
Membre
-
fsix02 -
fsix02 -
Bonjour à tous,
Je galère depuis plusieurs jours pour trouver une solution à un problème de liaison sous excel.
Le problème est simple et la solution me parait compliquée.
Je souhaite à partir d'un menu déroulant sur un document excel, ouvrir d'autres documents externe.
En clair, voici mon souhait :
une cinquantaine de commerciaux doivent remplir mensuellement et individuellement un reporting d'activités, cela fait donc au total 50 + 1 documents.
Sur le premier document (document principal), pour des raisons de place, je ne veux pas créer 50 boutons, je souhaite faire un menu déroulant ou figureront les noms qui pointeront sur leur reporting.
Je ne connais rien en VBA ni en html.
Je remercie par avance tous ceux qui pourraient m'aider.
Cordialement
FSIX
Je galère depuis plusieurs jours pour trouver une solution à un problème de liaison sous excel.
Le problème est simple et la solution me parait compliquée.
Je souhaite à partir d'un menu déroulant sur un document excel, ouvrir d'autres documents externe.
En clair, voici mon souhait :
une cinquantaine de commerciaux doivent remplir mensuellement et individuellement un reporting d'activités, cela fait donc au total 50 + 1 documents.
Sur le premier document (document principal), pour des raisons de place, je ne veux pas créer 50 boutons, je souhaite faire un menu déroulant ou figureront les noms qui pointeront sur leur reporting.
Je ne connais rien en VBA ni en html.
Je remercie par avance tous ceux qui pourraient m'aider.
Cordialement
FSIX
Configuration: Windows XP Internet Explorer 7.0
1 réponse
-
bonjour
Tu peux faire cela en associant une macro à l'utilisation de ta liste déroulante.
Je suppose que tu mets ta liste déroulante des noms en A25, que tes classeurs portent le nom de ta liste et dans ta feuille concernée tu mets cette macro (mode d'emploi éventuel)
Private Sub Worksheet_Change(ByVal sel As Range) If Not Intersect(sel, [A25]) Is Nothing Then Dim chemin As String chemin = "C:\ton répertoire\n_id=.xls" chemin = Replace(chemin, "n_id=", sel.Value) ActiveWorkbook.FollowHyperlink Address:=chemin, NewWindow:=True End If End Sub
Tu remplaces A25 par ta cellule et C:\ton répertoire par le chemin complet du répertoire.
