Bonjour,
ça fait un bail que je ne suis pas venu sur VBA...

je cherche à lire un fichier texte sur le réseau
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Worksheet_Activate()
Dim intFic As Integer
Dim strLigne As String
intFic = FreeFile
Open "http://........./essai.txt" For Input As intFic
While Not EOF(intFic)
    Line Input #intFic, strLigne
    MsgBox (strLigne)
Wend
Close intFic
 
 
End Sub
il me colle une erreur sur le nom ou numéro de fichier