Pas d'ouverture de page : FollowHyperlink

**Tikalins** · 22/07/2015, 21h56

Bonjour,

Je travaille sur Mac. J'utilise Excel 2011. Je souhaite que mon code ouvre dans une page internet un examen de stock.
Mon code est le suivant :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Sub Exam()
 init
 Open Chem + "alerte.htm" For Output As #1
 Print #1, "<html><body><pre>" + vbCr;
 Print #1, "<h2>Warning Inventory as of " + Format(Date, "dd/mm/yyyy") + "</h2>" + vbCr;
 For LStock = 8 To 32000
  If IsEmpty(ShStock.Cells(LStock, KMat)) Then Exit For
  PrenDon
  If Stock <= (1.1 * Stal) Then
   If Stock <= Stal Then
    Mess = "Inventory warning reaches for " + Mat + " " + Ref
    Datc = CStr(ShStock.Cells(LStock, Kdcec).Value)
    If Datc <> "" Then Mess = Mess + vbCrLf + "Order the " + Datc
   Else
    Mess = "Inventory warning near reached for " + Mat + " " + Ref
   End If
   Print #1, Mess + vbCr;
  End If
 Next LStock
 Print #1, "</pre></body></html>" + vbCr
 Close #1
 WkProg.FollowHyperlink Address:=Chem + "alerte.htm", NewWindow:=True
End Sub

Seulement, quand je lance ma procédure j'ai d'abord ce message :
"Ouverture de :... Certains fichiers peuvent contenir des virus... Voulez-vous ouvrir ce fichier?"
Je clique sur OK.
Une page web s'ouvre mais avec le message suivant : "Cette page Web est introuvable". L'adresse de la page est : file:///.file/id=6571367.23639124
Cependant, sur le bureau, j'ai le fichier "alerte.htm" tel que je voudrais l'avoir dans la page internet.

Savez-vous ce qui se passe? Comment régler le problème?

Merci d'avance

**carden752** · 24/07/2015, 11h03

Bonjour,

Vérifie les valeurs de tes variables à l'exécuton mais je pense que chem est un chemin de fichier relatif et non pas absolu.

**Tikalins** · 26/07/2015, 17h51

Bonjour,

merci pour la réponse. J'ai vérifié ils sont corrects. Que signifient chemin de fichier relatif et absolu?

**carden752** · 27/07/2015, 09h50

Bonjour,

En chemin de fichier absolu, tu spécifies l'ensemble du chemin, exemple : c:/monrepertoire/test.xls
En chemin relatif, tu pars du répertoire courant puis spécifie le reste : ./test.xls par exemple.

Il faut que tu essaies déjà en indiquant bien un absolu, il faut aussi faire attention éventuellement avec les lettres de lecteurs réseau.

**Tikalins** · 29/07/2015, 18h30

Ca aussi j'ai essayé. Et c'est toujours pareil. Est-ce que ce n'est pas dû à une sécurité sur Mac?

**patricktoulon** · 30/07/2015, 04h21

bonjour
il est clair que quand tu a cecei:file:/// dans le message d'erreur au sujet de sa localite c'est que le fichier n'a pas été localisé

chemin complet

Pas d'ouverture de page : FollowHyperlink

Macros et VBA Excel

Discussions similaires

Partager

Partager