C
chris_tls
Guest
Bonjour,
Après avoir cherché sur le forum + Google nous faisons appel a votre savoir.
Nous essayons d'accèder a un autre classeur via un lien hypertxte dans une cellule. Lorsqu'on clique dessus il fonctionne, le lien est :
CC%20-%20Contrôle%20des%20comptes/Balance%20par%20cycles.xls#'B'!A1
On arrive sur la feuille 'B' en A1.
Nous avons une barre perso dans un des sous menu nous avons le code suivant :
Set MyButton = MonMenu.Controls.Add(msoControlButton, 1, , , True)
With MyButton
.Caption = "Cycle - B"
.FaceId = 3892
.Style = msoButtonIconAndCaption
.OnAction = "Vers_CCB_fich"
.BeginGroup = True
End With
Fonction Vers_CCB_fich :
Sub Vers_CCB_fich()
Sheets("Menu").Range("AE5").Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
End Sub
Depuis la barre perso nous n'arrivons pas sur la feuille 'B' et c'est notre probleme.
Nous avons essayé une autre méthode : followHyperlink sans succès.
Pour résumer :
- En utilisant le lien hypertxte depuis la feuille, cellule AE5 cela fonctionne
- En utilsant le lien hypertexte depuis le menu perso cela ne fonctionne pas.
Merci pour votre aide.
Après avoir cherché sur le forum + Google nous faisons appel a votre savoir.
Nous essayons d'accèder a un autre classeur via un lien hypertxte dans une cellule. Lorsqu'on clique dessus il fonctionne, le lien est :
CC%20-%20Contrôle%20des%20comptes/Balance%20par%20cycles.xls#'B'!A1
On arrive sur la feuille 'B' en A1.
Nous avons une barre perso dans un des sous menu nous avons le code suivant :
Set MyButton = MonMenu.Controls.Add(msoControlButton, 1, , , True)
With MyButton
.Caption = "Cycle - B"
.FaceId = 3892
.Style = msoButtonIconAndCaption
.OnAction = "Vers_CCB_fich"
.BeginGroup = True
End With
Fonction Vers_CCB_fich :
Sub Vers_CCB_fich()
Sheets("Menu").Range("AE5").Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
End Sub
Depuis la barre perso nous n'arrivons pas sur la feuille 'B' et c'est notre probleme.
Nous avons essayé une autre méthode : followHyperlink sans succès.
Pour résumer :
- En utilisant le lien hypertxte depuis la feuille, cellule AE5 cela fonctionne
- En utilsant le lien hypertexte depuis le menu perso cela ne fonctionne pas.
Merci pour votre aide.