Exploiter deux fichier Excel grace à VBARésolu

Question

Je suis désolé de sollicité encore une fois votre aide, je suis vraiment pas doué. Je suis sous VBA/Excel et j'ai donc deux fichier EXCEL d'ouvert. Le problème est le suivant, comment puis-je copier la ligne i du de la feuille 1 du classeur B sur la ligne J de la feuille 1 du classeur A a partir d'un bouton situé sur la feuille 2 du classeur A. Voila il faut suivre,  mais je pense que c'est plutôt clair.

Merci d'avance

Molenn · Accepted Answer

Et bien, tu mets le nom du fichier en variable.

Au lieu de :
Workbooks("Classeur1.xls") ...
Tu peux faire : 


dim MonClasseur as workbook
set MonClasseur = "Classeur1".xls

MonClasseur.Worksheets ...

ca fonctionne aussi avec les feuilles donc.

Par contre, à toi d'alimenter la variable en fonction des choix de l'utilisateur, rien de bien compliqué.

Molenn

Molenn · Answer

Ce qu'il faut, c'est différencier tes classeurs et faire explicitement référence au classeur et à la feuille qui t'intéresse dans ton code.


Pour copier le contenu d'une cellule A1 de la feuille Feuil1 du Classeur1 vers la cellule C2 de la Feuil2 du Classeur2, la logique est la suivante (à condition que les 2 classeurs soient ouverts) :


Workbooks("Classeur2.xls").Worksheets("Feuil2").Cells(2,3).value = Workbooks("Classeur1.xls").Worksheets("Feuil1").Cells(1,1).value


Après, si tu as besoin de le faire souvent, tu peux déclarer des variables pour te simplifier le code.
Personnellement, ce que je ferai : 

'Définition des variables
Dim FeuilleSource as worksheet
Dim FeuilleCible as worksheet

'Initialisation des variables
Set FeuilleSource = Workbooks("Classeur1.xls").Worksheets("Feuil1")
Set FeuilleCible = Workbooks("Classeur2.xls").Worksheets("Feuil2")

'Copie des données
FeuilleCible.cells(2,3).value = FeuilleSource.cells(1,1).value



Molenn

DjVen · Answer

Merci mais le problème c'est que le classeur d'où l'on prend les données n'est pas toujours le même et donc le nom chance en fonction de se que veut l'utilisateur...

DjVen · Answer

Et pareillement, le fichier de départ n'est pas toujours dans le même répertoire...

DjVen · Answer

Nickel, désolé pour l'attente mais ça ma bien dépanné. Merci beaucoup

Exploiter deux fichier Excel grace à VBA

5 réponses

Votre réponse

Discussions similaires