> Tous les forums > Forum Bureautique
 Ouvrir tous les fichiers excel sur un serveur
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Germouse
  Posté le 31/05/2010 @ 18:46 
Aller en bas de la page 
Nouvel astucien

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!

Publicité
Bérylion
 Posté le 31/05/2010 à 22:42 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

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 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bérylion a écrit :

si la connexion requiert le mot de passe...

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

Page : [1] 
Page 1 sur 1

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

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
19,59 €Rasoir à barbe sans fil Philips QP2530/30 OneBlade à 19,59 €
32 € -39%

Amazon fait une promotion sur le rasoir électrique sans fil Philips QP2520/30 OneBlade qui passe à 19,59 €. Ce rasoir vous permettra à la fois de tailler votre barbe (sabots de 1 3 et 5 mm) et de définir proprement les contours. Le rasoir est étanche et fonctionne avec et sans mousse. Vous pouvez facilement le nettoyer. Il est accompagné d'une lame de rechange, de 3 sabots et de son chargeur.


Voir l'offre
83,19 €Disque dur externe USB 3.0 Seagate 4 To à 83,19 €
100 € -17%

Amazon propose actuellement le disque dur Seagate Expansion Desktop Drive 4 To à 83,19 € livré gratuitement alors qu'on le trouve ailleurs à partir de 100 €.


Voir l'offre
79,99 €SSD Kingston KC2500 1 To (M.2, NVMe 3500 Mo/s) à 79,99 €
120 € -33%

Cdiscount solde le SSD Kingston KC2500 1 To (M.2, NVMe 3500 Mo/s) qui passe à 79,99 € au lieu de 120 €. Avec l’interface M.2 PCIe 3.0 NVMe à 4 lignes, ce modèle prend le pas sur ces prédécesseurs. En effet, il propose une vitesse de lecture et d’écriture séquentielle allant jusqu’à 3500/2900 Mo/s. Sa vitesse de lecture et d’écriture aléatoire 4K atteint les 375000/300000 IOPS.


Voir l'offre
33,38 €Clavier sans fil bluetooth Logitech K380 à 33,38 €
49 € -32%

Cdiscount fait une promotion sur le clavier sans fil bluetooth Logitech K380 à 33,38 € au lieu de 49 €. Avec le clavier K380 multidispositif, vous pouvez facilement vous connecter à tous vos dispositifs informatiques et saisir dessus: Windows, Mac, Chrome OS, Android, iOS (iPhone et iPad) et Apple TV.


Voir l'offre

Sujets relatifs
Ouverture de fichiers excel sur serveur très lente
COMMENT REPARER TOUS MES FICHIERS EXCEL ET WORD
Fichiers Excel impossibles à ouvrir
logiciel pour ouvrir tous les fichiers et images
Impossible d'ouvrir mes anciens fichiers Excel
Ouvrir des fichiers pdf avec excel ?
Ouvrir fichiers excel par interface
Impossible d'ouvrir des fichiers Word, Excel...
Fichier EXCEL ne peut s'ouvrir
impossible d'ouvrir microsoft excel et word
Plus de sujets relatifs à Ouvrir tous les fichiers excel sur un serveur
 > Tous les forums > Forum Bureautique