Discussion :

[capulet_pilot]

Bonjour,

J'ai placer un emplacement de fichier mp3 en hypertext dans la cellule C28.
Dans une macro j'ai mis la ligne de code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("C28").Hyperlinks(1).Follow

Cela a fonctionner au debut mais maintenant pour une raison inconnue excel me dit: "erreur d'execution "9"".

Quelqun a t-il une idee de la cause et de la solution a mon probleme?

Merci d'avance pour vos reponses.
C

[helas]

Bonjour,
Erreur 9 : erreur lorsque l'indice n'existe pas
Tester dans la fenêtre d'execution

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
?Range("C28").Hyperlinks.Count
?Range("C28").Hyperlinks(1).Address

La première commande retourne le dernier indice pour Hyperlinks
Remplacer le 1 de la 2ème commande par l'indice trouvé
si le fichier est retourné, remplacer l'indice dans le code

[capulet_pilot]

Merci

Le "?" n'a pas fonctionner mais voila ce que j'ai essayer et sa marche!!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Private Sub CommandButton2_Click()
 
    Dim a As Double
 
    Worksheets("Donnees").Select
'    a = Worksheets("Donnees").Range("C28").Hyperlinks.Count
'    Worksheets("Donnees").Range("C29").Value = a
    Worksheets("Donnees").Range("C28").Hyperlinks(1).Follow
End Sub

En fait le macro ne restait pas selectionner sur le bon worksheet..
C