OVH Cloud OVH Cloud

Coipe Code VBA dans plusieurs fichiers Excel

5 réponses
Avatar
Régis MATHIEU
Bonjour à tous,
Voici mon pb :
J'ai créé une macro d'une vingtaine de lignes.
Je voudrais copier ce code dans 1000 fichier différents de et le faire par
programme en VB Excel !

Merci à tous ceux qui peuvent m'aider !
salutations.

5 réponses

Avatar
anonymousA
bonjour,

le + simple c'est d'exporter le module contenant ta macro à copier dans les
1000 fichiers. Puis ensuite ouvir chacun des fichiers où tu veux copier la
macro puis importer dans ceux-ci le module que tu avais intialement exporté.
Pour la programation d'exportation et d'importation, il existe des exemples
nombreux sur le site de Frédéric Sigonneau à la rubrique VBE.

A+


Bonjour à tous,
Voici mon pb :
J'ai créé une macro d'une vingtaine de lignes.
Je voudrais copier ce code dans 1000 fichier différents de et le faire par
programme en VB Excel !

Merci à tous ceux qui peuvent m'aider !
salutations.


Avatar
Régis MATHIEU
Merci beaucoup ! je vais tester cà !

A +

"anonymousA" wrote:

bonjour,

le + simple c'est d'exporter le module contenant ta macro à copier dans les
1000 fichiers. Puis ensuite ouvir chacun des fichiers où tu veux copier la
macro puis importer dans ceux-ci le module que tu avais intialement exporté.
Pour la programation d'exportation et d'importation, il existe des exemples
nombreux sur le site de Frédéric Sigonneau à la rubrique VBE.

A+


Bonjour à tous,
Voici mon pb :
J'ai créé une macro d'une vingtaine de lignes.
Je voudrais copier ce code dans 1000 fichier différents de et le faire par
programme en VB Excel !

Merci à tous ceux qui peuvent m'aider !
salutations.




Avatar
michdenis
Bonjour Régis,

Une procédure qui copie le code dans chacun des fichiers xls du répertoire que tu définiras dans la procédure.
La procédure ajoute un module standard et c'est dans celui-ci que sera copié la procédure.

'-------------------------------
Sub AjouterCode()

Dim VComp As Object, vc As Object
Dim Fichier As String, Code As String
Dim Repertoire, Wk As Workbook

Repertoire = "c:Excel" 'à définir
Fichier = Dir(Repertoire & "*.xls")

'Voici comment définir la variable de code. C'est elle
'qui contient chacune des lignes de ton code qui sera
'ajouter à chacun des fichiers.
Code = "Sub Test()" & vbCrLf
Code = Code & "Msgbox ""Bonjour""" & vbCrLf
Code = Code & "End Sub"

Application.ScreenUpdating = False
Do While Fichier <> ""
Set Wk = Workbooks.Open(Repertoire & Fichier)
With Wk
Set VComp = .VBProject.VBComponents.Add(1)
VComp.CodeModule.AddFromString Code
.Close True
End With
Fichier = Dir()
Loop
Set VComp = Nothing: Set Wk = Nothing: Set vc = Nothing
End Sub
'-------------------------------


Salutations!



"Régis MATHIEU" a écrit dans le message de news:

Bonjour à tous,
Voici mon pb :
J'ai créé une macro d'une vingtaine de lignes.
Je voudrais copier ce code dans 1000 fichier différents de et le faire par
programme en VB Excel !

Merci à tous ceux qui peuvent m'aider !
salutations.
Avatar
moi
bonsoir tous,

une question surement bête de ma part, dans EXEL :
ne peut-on pas créer une sorte de 'bibliotheque' de macros (vba) dans un
fichier 'xl?'
'bibliotheque' utilisable dans d'autres fichiers ...

peut-être ai-je mal compris la question ...
si c'est : affecter du code à un fichier xls connu par c:....*.xls
'j achète' ;>)

au plaisir

"Régis MATHIEU" a écrit dans le
message de news:
Bonjour à tous,
Voici mon pb :
J'ai créé une macro d'une vingtaine de lignes.
Je voudrais copier ce code dans 1000 fichier différents de et le faire par
programme en VB Excel !

Merci à tous ceux qui peuvent m'aider !
salutations.


Avatar
michdenis
Bonjour Toi,


| ne peut-on pas créer une sorte de 'bibliotheque' de macros (vba) dans un fichier 'xl?'

Tu peux mettre cette collection de tes procédures et fonctions dans ton classeur "Perso.xls"

Tu peux les insérer dans un module de macro complémentaire (fichier xla).

Sauf que dans les 2 cas, cela demande de faire suivre (installer le fichier - Perso.xls ou le fichie .xla) sur chacun des
ordinateurs où tu en auras besoin pour accompagner les fichiers qui y font référence.

D'ajouter une procédure dans un nouveau module a l'avantage de laisser le fichier autonome.



Salutations!







"moi" a écrit dans le message de news: 43060402$0$882$
bonsoir tous,

une question surement bête de ma part, dans EXEL :
ne peut-on pas créer une sorte de 'bibliotheque' de macros (vba) dans un
fichier 'xl?'
'bibliotheque' utilisable dans d'autres fichiers ...

peut-être ai-je mal compris la question ...
si c'est : affecter du code à un fichier xls connu par c:....*.xls
'j achète' ;>)

au plaisir

"Régis MATHIEU" a écrit dans le
message de news:
Bonjour à tous,
Voici mon pb :
J'ai créé une macro d'une vingtaine de lignes.
Je voudrais copier ce code dans 1000 fichier différents de et le faire par
programme en VB Excel !

Merci à tous ceux qui peuvent m'aider !
salutations.