macro copie feuille

[sylvain_turbo]

Bonjour,
Mon problème est simple.Je débute avec Visual Basic en stage.
J'aurai besoin d'une macro qui permet de remplacer la feuille "essai" par les données situées dans un document différent. Néanmoins, a chaque essai, le nom du document et de l'onglet qui contient les valeurs varient. Et là, je sais pas du tout comment faire.
Merci beaucoup pour vos futures réponses.

 

[Staple1600]

Re : macro copie feuille

Bonsoir et bienvenue


Aurais-tu deux fichiers exemples (avec des données non confidentielles) à poster ?

(en les zippant au préalable)

 

[sylvain_turbo]

Re : macro copie feuille

Désolé, je n'ai rien tout est au boulot et ca doit y rester (ils sont fou avec leur confidentialité).
En gros, j'ai 3 fichiers. :

1 fichier de test (nommé AAA par exemple) dont le 3e onglet est un tableau de 50lignes et environ 400 colonnes remplies de chiffres a part les 3 premieres lignes

1 deuxieme fichier d'essai (BBB)

et 1 fichier que j'ai créé qui trace des dizaines courbes en fonctions de la feuille 2 (qui doit etre la meme feuille que AAA) et 3 (" BBB) de ce meme fichier.

Le problème est que pour prendre les valeurs de ces 2 onglets, il faut que j'ouvre chacun des fichiers, que je fasse copier et coller.

Voila

J'arrive pas trop a etre clair, je pense...

PS : On fait comment pour envoyer une piece jointe ?

 

[sylvain_turbo]

Re : macro copie feuille

j'ai trouvé comment télécharger, ^^.

 

[sylvain_turbo]

Re : macro copie feuille

alors, personne ne peut venir m'aider.
Déja j'aimerai juste savoir si cela est possible ???
MErci

 

[Staple1600]

Re : macro copie feuille

Re


Tes fichiers doivent garder leur nom d'origine?

Pourquoi ont-ils des noms du style

essai1.hhkshsfhskhsk.xls?

 

[sylvain_turbo]

Re : macro copie feuille

mes fichiers ont un nom qui varie a chaque fois (protocole FORTRAN qui extrait les données des bancs d'essai)

Ainsi, on peut pas se baser sur le nom des fichiers, ni des onglets qui ont un nom qui changent a chaque version également (merci fortran !!!)

Voili voilou

 

[Staple1600]

Re : macro copie feuille

Re


Tes fichiers générés le sont dans un répertoire spécifique?

Ex: essai170408

Dans ce cas, tu pourrais les renommer avec un nom plus explicte

Non ?

 

[sylvain_turbo]

Re : macro copie feuille

non, ce sont des fichiers générer sur l'intranet immodifiable.
Par contre une solution simple estde renommer les 2 fichiers dans un repertoire local. C'est ce que j'ai fait.

Mais on peut pas creer un programme qui permet de le faire plus simplement, c'est à dire genre un explorateur afin de choisir les deux fichiers ?

 

[Staple1600]

Re : macro copie feuille

Re


Regardes le code VBA dans la pièce jointe

(adapte le chemin du répertoire)


Une fois tes fichiers renommés

Ouvre les et fais tes manips (en laissant tourner l'enregistreur de macros)

Edition: voila ce que produit l'enregistreur de macro (code légérement remanié)

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 17/04/2008 par
'
ChDir "C:\temp"
Workbooks.Open Filename:="C:\temp\essai1.xls"
Range("A1").CurrentRegion.Copy Workbooks("interpretation.xls").Sheets("Essai 1").Range("A1")
Workbooks("essai1.xls").Close
Workbooks.Open Filename:="C:\temp\essai2.xls"
Range("A1").CurrentRegion.Copy Workbooks("interpretation.xls").Sheets("Essai 2").Range("A1")
Workbooks("essai2.xls").Close
Sheets("Bienvenu").Select
End Sub

 

[sylvain_turbo]

Re : macro copie feuille

merci mister caa va maider beaucoup