Executer macro d'un fichier dans un autre

Marsh Posté le 18-08-2009 à 14:12:47

Bonjour à tous,
J'ai eu beau chercher sur le forum mais je n'ai pas trouver de réponse à mon problème (mais si elle existait déjà je vous prirai de m'excuser...en meme temps je suis un débutant de VB)

Voilà mon problème: un dossier contient 2 fichiers excel l'un fichierA mis à jour chaquie jour mais dont le nom ne change pas, l'autre fichierB qui contient quelques macros et leurs indications d'utilisations.
Je voudrai simplement crée une petite macro-bouton qui permettrait d'exécuter les macros du fichierB dans le fichier A.

Un exemple sera plus frappant je pense;
voilà une macro du fichier B:

Code :

Sub Macro1()
Dim Lig As Long
Dim LigC As Long
LigC = 4
Sheets("Ponctualité" ).Select
For Lig = 1 To Range("A65536" ).End(xlUp).Row
If .... Then
LigC = LigC + 1
Rows(Lig).Copy Sheets("Proto_Ponctualité" ).Rows(LigC)
End If
Next Lig
End sub

Cette macro permet de trier les données de la feuille Ponctualité du fichier A suivant les critères du if et de les reporter dans une feuille Proto_Ponctualité . Cette macro s'execute parfaitemet du fichierA dans le fichierA mais pas du fichierB dans le fichierA.

Je recherche donc une macro supplémentaire et/ou une correction pour dire: "cette macro là tu l'applique sur la feuille Ponctualité du fichier A et tu écris les résultats dans la feuille Proto_Ponctualité du fichier B"

Je sais pas si j'ai été très clair mais si quelqu'un désire de plus amples explications je lui fournirai avec plaisir.Je suis malheureusemnt trop noob en VB pour y arriver seul.

Merci anticipativement

Marsh Posté le 18-08-2009 à 14:12:47

Marsh Posté le 18-08-2009 à 15:30:08

Au lieu de :

Sheets("Ponctualité" ).Select

tu mets :

Workbooks("fichierB.xls" ).Sheets("Ponctualité" ).Select

Marsh Posté le 18-08-2009 à 15:46:18

oki merci je vais tenter ca!!

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *