Ouvrir tous les fichiers excel sur un serveur

Germouse

Posté le 31/05/2010 @ 18:46

Bonjour,

Connaissez vous un code VBA dans un fichier excel qui me permettrait d'ouvrir et fermer tous les fichiers Excel contenus dans un dossier situé sur un serveur distant( avec login et mot de passe)?

Merci d'avance!

Bérylion

Posté le 31/05/2010 à 22:42

Message original par Germouse

Bonjour,

Connaissez vous un code VBA dans un fichier excel qui me permettrait d'ouvrir et fermer tous les fichiers Excel contenus dans un dossier situé sur un serveur distant( avec login et mot de passe)?

Merci d'avance!

Salut

euh... chui pas sur...?!

si les fichiers requierent un mot de passe alors :

Sub test()
Set fso = CreateObject("scripting.filesystemobject")
Set rep = fso.GetFolder("\\X\rep1\rep2")
For Each f In rep.Files
        If fso.GetExtensionName(f) = "xlsx" Then Workbooks.Open f, , , , "test"
Next
End Sub

à conditions que tous les fichiers aient le même mot de passe (ici = "test")

si la connexion requiert le mot de passe, faut que je potasse un poil, et je reviens après mon mégot (bin oui, le forum est non fumeur !!)

Modifié par Bérylion le 31/05/2010 23:06

Bérylion

Posté le 31/05/2010 à 23:06

Bérylion a écrit :

si la connexion requiert le mot de passe...

... et bin je sais pas (encore) faire

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !

Les bons plans du moment PC Astuces

Tous les Bons Plans

16 €

Clé USB 3.0 Sandisk Ultra 128 Go à 16 €
~~20 €~~ -20%

Amazon propose la clé USB Sandisk Ultra d'une capacité de 128 Go à 16 €. On la trouve ailleurs à partir de 20 €. Cette clé USB 3.0 est compatible USB 2.0 et offre de bons débits d'environ 100 Mo/s en lecture et en écriture. Le connecteur est rétractable pour éviter qu'il prenne la poussière.

Voir l'offre

202,99 €

Nettoyeur haute pression Karcher K5 Power Control (145 bar, 2100W) à 202,99 € (via ODR)
~~279 €~~ -27%

Cdiscount fait une promotion sur le nettoyeur haute pression Karcher K5 Power Control à 242,99 € alors qu'on le trouve ailleurs à partir de 279 €. Or Karcher rembourse actuellement 40 € pour l'achat de ce nettoyeur qui vous reviendra à 202,99 € après remboursement.

Le Nettoyeur haute pression K5 Full Power est livré avec un pistolet ergonomique, un flexible 10 m, un nez de robinet pour raccorder un tuyau d’arrosage, une lance Vario Power et une rotabuse.

Avec sa poignée télescopique rétractable, l'appareil peut être déplacé et rangé facilement. Le K5 Power Control est idéal pour une utilisation intensive et pour nettoyer vélos, outils de jardin, meubles de jardin, etc. Pression max 145 bar, débit max 500 L/h, puissance 2100 Watts, surface conseillée ≈ 40m²/h, moteur universel, pompe Ncor.

Voir l'offre

32,90 €

Clé USB 3.1 Sandisk Ultra Luxe 256 Go à 32,90 €

Cdiscount propose la clé USB Sandisk Ultra Luxe d'une capacité de 256 Go à 32,90 €. Cette clé USB 3.1 toute en métal est compatible USB 2.0 et offre de bons débits d'environ 150 Mo/s en lecture et en écriture. Elle inclut le logiciel SanDisk SecureAccess pour un cryptage et une protection par mot de passe de vos données sensibles.

Voir l'offre

14,50 €

Sandales Crocs Crocband III Slide à 14,50 €
~~29,99 €~~ -52%

Amazon fait une promotion sur les sandales Crocs Crocband III Slide à bout ouvert qui passent à 14,50 € au lieu de 29,99 €. Nombreuses tailles disponibles.

Voir l'offre