Importer une feuille Excel d'une adresse reseau.(sql)

Bonjour le monde

pardonnez moi si je n'utilise pas les bons termes (serveur, adresse reseau...)

Voila pour mon classeur excel au boulot, je doit aller chercher une feuille "etat du stock" (fichier excel") qui est sur le reseau.

l'adresse est du style "172.145.15.12/gestion du stock/etat du stock.xls"

est il possible, et comment faut il faire pour copier la feuille a cette adresse et la coller sur mon classeur.

en fait comment faire pour ouvrir ce classeur (je n'y connais rien mais il me semble qu'il est sur un serveur sql dans une base de données) ,pour le reste une fois qu'il est ouvert c'est comme un fichier normal je pense?

ps: avec demande de login et mot de passe pour la connexion au serveur

Cordialement

Bonjour tout le monde

Pas de reponse,

c'est trop compliqué ou je m'explique comme un manche? (je crois que c'est plutot ca! )

Enfin, je relance le sujet avec une nouveauté.

A force d'essayer, j'ai avancé un peu, je m'explique:

l'adresse du fichier est bien :

"172.145.15.12/gestion du stock/etat du stock.xls"

Je n'ai besoin ni login ni mot de passe pour l'atteindre, et ce code suffit a l'ouvrir

   Workbooks.Open Filename:= _
        "http://172.145.15.12/gestion du stock/etat du stock.xls"

mais ce que je voudrais c'est pouvoir l'importer dans mon fichier actif ou le copier dans mes document sans l'ouvrir.

pour une copie sans ouverture, j'ai trouvé cette macro:

Sub PMO_CopieSansMiseEnPage()
Dim Chemin$
Dim Feuille$
Dim Cible$
Dim bool As Boolean
Dim W1 As Workbook
Dim W2 As Workbook
Dim S2 As Worksheet
On Error GoTo Erreur
Chemin$ = [a1]
Feuille$ = [a2]
Cible$ = [a3]
For Each S2 In ActiveWorkbook.Sheets
If S2.Name = Cible$ Then
bool = True
Exit For
End If
Next S2
If Not bool Then
MsgBox "La feuille ''" & Cible$ & "'' n'existe pas."
Exit Sub
End If
Set W1 = ActiveWorkbook
Set W2 = GetObject(Chemin$)
Set S2 = W2.Sheets(Feuille$)
S2.Cells.Copy
W1.Activate
W1.Sheets(Cible$).Select
[a1].Select
ActiveSheet.Paste
[a1].Select
Erreur:
Set S2 = Nothing
Set W1 = Nothing
Set W2 = Nothing
End Sub

 la feuille sélectionnée au départ  contient  en A1
le chemin de l'autre classeur, en A2 le nom de la feuille de l'autre classeur
qu'il faudra copier, en A3 le nom de la feuille de réception

cette macro marche tres bien si le classeur a ouvrir a un chemin "normal" genre

C:\Users\maguetlolo\Documents\codesBarres.xls

mais le probleme c'est que si je remplace ce chemin par:

"

du stock/etat du stock.xls"

ca ne fonctionne pas.

Ma question:

Comment adapter cette derniere macro pour qu'elle copie le fichier "codesBarres" dans mon fichier (sans l'ouvrir bien sur) ou dans mes documents

voila, j'espere que cette fois ci j'ai ete assez clair et que quelqu'un auras une reponse pour moi.

Cordialement

PS: le fichier a copier n'as qu'une seule feuille qui s'apelle "codesBarres" comme son nom.