Automatiser des mises à jour de fichiers extérieurs
Résolu
Kusco
Messages postés
466
Date d'inscription
Statut
Membre
Dernière intervention
-
Kusco Messages postés 466 Date d'inscription Statut Membre Dernière intervention -
Kusco Messages postés 466 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Automatiser des mises à jour de fichiers extérieurs
- Mise a jour chrome - Accueil - Applications & Logiciels
- Mise a jour windows 10 - Accueil - Mise à jour
- Mise a jour chromecast - Accueil - Guide TV et vidéo
- Renommer des fichiers en masse - Guide
- Vous n'avez pas installer certaines mises à jour de sécurité importantes sur votre appareil - Guide
2 réponses
Regarde ceci :
Sub ImporterDonnees()
Dim Fichier, WbkCopy As Workbook, WbkColle As Workbook
Dim Resultat As Variant
'On attribue à la variable WbkColle le fichier actuel (celui que tu viens d'envoyer)
Set WbkColle = ThisWorkbook
'Sélection du fichier
Fichier = Application.GetOpenFilename("Fichiers Excels, *.xls*")
'En cas de clic sur "ANNULER"
If Fichier <> False Then
'On ouvre le fichier en question (l'ancien fichier)
Set WbkCopy = Workbooks.Open(Fichier)
'ICI TU COPIES-COLLES du genre :
WbkCopy.Sheets("BDD").Range("A3:H45").Copy WbkColle.Sheets("BDD").Range("A3")
'On ferme l'ancien fichier
WbkCopy.Close
End If
'Spécial bonus : boite de dialogue enregistrer sous :
Fichier = Application.GetSaveAsFilename
ActiveWorkbook.SaveAs Filename:=fichier
Set WbkCopy = Nothing
Set WbkColle = Nothing
End Sub
Bonjour,
Il te suffit d'automatiser les copier-coller sur chaque fichier de chaque employé...
Pour cela, il te suffit d'avoir accès à ces fichiers, d'en faire la liste des chemins d'accès...
Il te suffit d'automatiser les copier-coller sur chaque fichier de chaque employé...
Pour cela, il te suffit d'avoir accès à ces fichiers, d'en faire la liste des chemins d'accès...
Bonjour pijaku,
Merci d'être encore là pour me venir en aide !
C'est à dire concrètement ?
Car je vais envoyer le nouveau fichier sur le réseau donc chacun le récupérera.
Après par exemple il faudrait que je crée un bouton mise à jour qui va me demander le chemin de l'ancien fichier. Et que cela effectue les copier-coller sur chaque page. C'est bien cela ?
Merci d'être encore là pour me venir en aide !
C'est à dire concrètement ?
Car je vais envoyer le nouveau fichier sur le réseau donc chacun le récupérera.
Après par exemple il faudrait que je crée un bouton mise à jour qui va me demander le chemin de l'ancien fichier. Et que cela effectue les copier-coller sur chaque page. C'est bien cela ?
C'est à toi à être + clair là...
Chaque employé à un fichier, situé à un emplacement précis, selon l'employé.
Par exemple :
- Charles Dupont à son fichier bdd.xlsx dans le répertoire :
F:\Widows\Utilisateurs\charles.dupont\Travail\Fichiers Excel\bdd.xlsx
- Joceline Cabaret à son fichier bdd.xlsx dans le répertoire :
F:\Widows\Utilisateurs\joceline.cabaret\Mes documents\Travail\Macros\Perso\Excel\bdd.xlsx
etc...
Et toi, tu as ton document à toi, que tu mets à jour et dont, par exemple, lors de la mise à jour du 12/12/2013, tu souhaites envoyer à tous tes collaborateurs le contenu de la cellule Feuil3 B35, dans chaque fichier, à la cellule Feuil52 G67.
C'est bien ça?
Chaque employé à un fichier, situé à un emplacement précis, selon l'employé.
Par exemple :
- Charles Dupont à son fichier bdd.xlsx dans le répertoire :
F:\Widows\Utilisateurs\charles.dupont\Travail\Fichiers Excel\bdd.xlsx
- Joceline Cabaret à son fichier bdd.xlsx dans le répertoire :
F:\Widows\Utilisateurs\joceline.cabaret\Mes documents\Travail\Macros\Perso\Excel\bdd.xlsx
etc...
Et toi, tu as ton document à toi, que tu mets à jour et dont, par exemple, lors de la mise à jour du 12/12/2013, tu souhaites envoyer à tous tes collaborateurs le contenu de la cellule Feuil3 B35, dans chaque fichier, à la cellule Feuil52 G67.
C'est bien ça?
Oui alors l'idée de Charles Dupont et de Joceline Cabaret, c'est exactement ça. Le nom du fichier peut ne pas être le même également.
Par contre je pensais plutôt à une inversion de ta deuxième partie.
Les gens vont recevoir le nouveau fichier par mail, ils l'enregistrent où il veulent.
Dans ce nouveaux fichier ce sera plutôt du code VBA qui change, des macros, userform en plus etc...
Donc je pense qu'il vaut mieux aller chercher les données de leur BDD pour les copier dans la nouvelle. Qu'en pense-tu ?
Et surtout suis-je plus clair ? :S
Par contre je pensais plutôt à une inversion de ta deuxième partie.
Les gens vont recevoir le nouveau fichier par mail, ils l'enregistrent où il veulent.
Dans ce nouveaux fichier ce sera plutôt du code VBA qui change, des macros, userform en plus etc...
Donc je pense qu'il vaut mieux aller chercher les données de leur BDD pour les copier dans la nouvelle. Qu'en pense-tu ?
Et surtout suis-je plus clair ? :S
En clair, tu leur envoie un fichier par mail, eux l'enregistre, puis l'ouvre.
Tu souhaites, lors de la première ouverture de ce fichier que celui-ci importe automatiquement la feuille nommée "bdd" de leur ancien fichier.
C'est possible, à condition de connaitre :
- le chemin d'accès à leur fichier (mais comme ils l'enregistrent ou ils veulent, il va falloir qu'ils nous l'indique)
- l'endroit, la ou les feuilles à importer
- l'endroit, la ou les feuilles ou tu veux coller ces données...
Tu souhaites, lors de la première ouverture de ce fichier que celui-ci importe automatiquement la feuille nommée "bdd" de leur ancien fichier.
C'est possible, à condition de connaitre :
- le chemin d'accès à leur fichier (mais comme ils l'enregistrent ou ils veulent, il va falloir qu'ils nous l'indique)
- l'endroit, la ou les feuilles à importer
- l'endroit, la ou les feuilles ou tu veux coller ces données...
Oui voilà c'est exactement ça !
Okay donc en gros je peux faire un système où ils ont juste à indiquer le chemin d'accès du fichier et je peux faire en sorte que le reste se fasse automatiquement non ?
Et est-ce qu'il est possible de faire ça grâce à un système du genre "Parcourir" plutôt qu'avec un Textbox ?
Merci beaucoup pijaku !
Okay donc en gros je peux faire un système où ils ont juste à indiquer le chemin d'accès du fichier et je peux faire en sorte que le reste se fasse automatiquement non ?
Et est-ce qu'il est possible de faire ça grâce à un système du genre "Parcourir" plutôt qu'avec un Textbox ?
Merci beaucoup pijaku !
Le bonus est top aussi, je n'y avais pas pensé, mais c'est une excellente idée franchement !
Merci merci merci pijaku !
C'est parfait et parfaitement fonctionnel, je n'aurais qu'à adapter à mon fichier.
A+
Je ne la retrouve nul part ailleurs.
Merci !
J'ai recopié ce code sur un autre sujet ou elle servait...
De rien!
Merci encore et bonne journée !