import d'onglet (macro)

[david]

Bonjour le forum,
J'utilise le code suivant pour importer le contenu d'un onglet dans un autre document excel:

        If Not Application.Dialogs(xlDialogOpen).Show Then Exit Sub
        nom = ActiveSheet.Name
        ActiveWorkbook.Sheets(nom).Cells.Copy Destination:= _
                          ThisWorkbook.Sheets('Feuil2').Cells 'feuille qui receptionne les informations
        ActiveWorkbook.Close SaveChanges:=False

Le probleme est que je ne sais pas comment faire pour ouvrir le fichier excel sur le bon onglet, lui dire qu'il faut qu'il copie le contenu de l'onglet feuil3 par exemple, meme si le fichier excel s'ouvre sur la feuil1

Pour le moment, le programme copie le contenu de l'onglet qui s'ouvre en premier .

Merci d'avance pour votre aide

David

 

[david]

Personne ne sait?

J'espere que cela est possible. Donnez moi une bonne nouvelle svp lol 🙂

 

[ERIC S]

Bonjour

sélection de feuille :

sheets('feuil3').activate
cells.select
selection.copy

voir si
Sheets('feuil3').Cells.Copy fonctionne

A+

 

[david]

Bonjour ERIC S,
J'ai pensé à la meme formulation que toi mais par contre je ne sais pas comment l'appliquer au code.

Pourrais tu m'aider?

If Not Application.Dialogs(xlDialogOpen).Show Then Exit Sub
        nom = ActiveSheet.Name
        ActiveWorkbook.Sheets(nom).Cells.Copy Destination:= _
                          ThisWorkbook.Sheets('Feuil2').Cells 'feuille qui receptionne les informations
        ActiveWorkbook.Close SaveChanges:=False

Merci d'avance

david

 

[ERIC S]

re

que cherches-tu à faire ?

tu es sur ton fichier excel, tu ouvres un autre fichier par l'intermédiare d'un eboite de dialogue et tu copies la feuille 3 ?

A+

 

[david]

re

Pour le moment, la procedure de la macro est la suivante:
1°) la boite de dialogue s'ouvre
2°) je vais rechercher le document voulu (classeur2)
3°) le classeur2 s'ouvre (sur le dernier onglet ouvert ou plutot enregistrer)
4°) Copie des cellules vers le classeur1
5°) Fermeture du classeur2

Le probleme est que si une personne ouvre le classeur2 et l'enregistre au moment ou il se trouve sur la feuil2 au lieu de la feuil3 lorsque je vais lancer ma macro il va me copier le contenu de la feuil2 alors que je veux la feuil3.

Je sais pas si c'est vraiment clair. lol

Ps: je ne souhaite pas mettre un code dans le workbook du classeur2.

Voila

 

[ERIC S]

re

a tester (fait à partir de récups diverses dans mes fichiers)

A+ [file name=ouvrefichieretcopie.zip size=9584]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/ouvrefichieretcopie.zip[/file]

 

[david]

Merci ERIC S
Ca fonctionne presque parfaitement , en effet lors de la copie, il me modifie le format des cellules, et j'arrive pas a faire un copier a l'aide du collage spéciale (je ne sais pas pourquoi)

il me modifie les dates (format SAP 🙁 )
01.2004 --> transformée en 1,2004

Voila si tu as une explication.

david

 

[ERIC S]

Bonjour

le fichier que tu ouvres est un fichier Excel ?
les cellules où sont tes dates (01.2006) sont déclarées en quel format ?

A+

 

[david]

rebonjour,

Elles sont en format texte et lors de l'importation elles transforment en format standard

david

 

[ERIC S]

re


avant de lancer ta macro, mets ta colonne en format texte

sur le fichier qui contient la macro et qui reçoit les données bien-sûr

A+

Message édité par: ERIC S, à: 16/05/2006 10:13