Discussion :

[yalmallo]

Bonjour,

Aujourd'hui j'ai une question concernant un code que je réalise.

La question est :

j'ai un code qui fait la suite :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
for i = 0 to 50 
 
do quelque chose 
 
next

Ce que je veux faire c'est pour chaque i ouvrir un nouveau excel.application, lancer le code qui se trouve entre for et next dans le nouveau Excel application ( donc on peut copier directement le code dans le nouveau excel ou bien le re-écrir, c'est pas si grâve).

Une idée pour cette question?


Je vous remercie par avance.

[jackborogar]

Bonjour,

Voici une macro pour ajouter après ton for i ...
Attention ton for i va jusqu'a 50 et si je comprends bien tu veux donc ouvrir 51 nouveaux classeurs Excel?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Sub OuvrirExcel()
 
'Tu va créer 3 nouveaux Excel
For i = 0 To 2
 
Dim ExcelObj As Excel.Application
Dim xlBook As Excel.Workbook
 
'On créer l'objet Excel
Set ExcelObj = CreateObject("Excel.Application")
'On défini le nombre d'onglets (ici 4)
ExcelObj.SheetsInNewWorkbook = 4
'On ajoute un classeur
Set xlBook = ExcelObj.Workbooks.Add
'On donne un nom au classeur
xlBook.SaveAs ("Mon Classeur" & i & ".xls")
'On rend le classeur visible
ExcelObj.Visible = True
 
'Puis Après ton 
'DO quelque chose
 
Next i
 
 
End Sub

Cdt,

[yalmallo]

Merci mais, J'ai déjà ce code.
mmmmh, désolé, peut être que je devais être plus claire avec ma question.

Le but c'est de lancer plusieurs macros à la fois " En Parallèle".


Donc, ce que tu as écrit ouvre seulement un nouveau ExcelAppli mais il n'y ajoute pas un code, ni lancer le code. et je pense, à mon avis, si on utilise la .RUN, Excel va lancer les fichier l'un aprés l'autre et non pas en même temps.

J'ai essayé d'utiliser object.Run, mais ça lance d'abord un fichier et puis il attend que ce dernier termine pour lancer le deuxième.

J'espère que c'est un peu plus claire maintenant.

[jackborogar]

Ce que je veux faire c'est pour chaque i ouvrir un nouveau excel.application, lancer le code qui se trouve entre for et next dans le nouveau Excel application

Mon code permet d'ouvrir un nouveau excel.application pour chaque "i" ensuite il suffit de lancer tes macros après mon code!
Qu'appelles tu par lancer plusieurs macros en Parallèle?

De plus:

Donc, ce que tu as écrit ouvre seulement un nouveau ExcelAppli mais il n'y ajoute pas un code, ni lancer le code.

Je ne comprends pas trop où tu veux en venir... Effectivement j'ai pas ajouter de code puisque je ne connais pas le code que tu souhaites lancer par contre tu as juste à appeller ta fonction ou simplement coller ton code après.
Il sera donc appelé pour chaque nouveau "i".

Cdt,

[yalmallo]

Mon code permet d'ouvrir un nouveau excel.application pour chaque "i" ensuite il suffit de lancer tes macros après mon code!
Qu'appelles tu par lancer plusieurs macros en Parallèle?

OK. Je te remercie encore une fois.

Lancer plusieurs macros en parallèle veut dire : lancer, par exemple, macro1 en même temps que macro2, te non pas : lancer Macro1, attendre que macro1 termine, et puis lancer macro2.

De plus:

Je ne comprends pas trop où tu veux en venir... Effectivement j'ai pas ajouter de code puisque je ne connais pas le code que tu souhaites lancer par contre tu as juste à appeller ta fonction ou simplement coller ton code après.
Il sera donc appelé pour chaque nouveau "i".

Cdt,

Oui, effectivement, je ne te demande pas de faire mon travaille, LOL, désolé.
En fait, j'avais déjà essayé le code que tu as mis avec un code simple, le problème c'est que Excel lance ( pour i = 1) la macro1 qui se trouve dans Excel.Application1, et ensuite il attend que Macro1 se termine et puis (pour i = 2) il lance la Macro2 qui se trouve dans le Excel.Application2, et ainsi la suite.

Moi je veux : pour i = 1 lancer Macro1 Dans Excel1, puis ne pas attendre que Macro1 termine, mais lancer Macro2 toute de suite. (ce que j'appel en parallèle).

Je ne sais pas si tu as bien compris mon point de vue?!

[jackborogar]

Re,

Désolé la faim est devenu importante. Alors tu vas être déçu mais il est strictement impossible de lancer deux macros simultanément/en parallèle/ en même temps. Les macros s'exécutent les une après les autres.
Donc à moins de trouver un système, ou une autre logique dans ton code, je pense pas que je puisse t'aider d'avantage.
Donc si tu as encore des questions ou des suggestions pour essayer d'avancer avec toi, pas de soucis.
Par contre tu m'avoueras qu'entre ton premier message (et même le titre du topic) et maintenant c'est le jour et la nuit

Bien Cordialement,

[Jean-Philippe André]

salut,

en passant par des tâches planifiées, tu peux tout lancer en meme temps, dans une nouvelle instance d'Excel à chaque fois
http://jpcheck.developpez.com/tutori...ge-parametres/

[jackborogar]

Bonjour jpCheck,

Si je ne me trompe une tâche planifiée permet bien de lancer des "tâches diverses" à un moment précis et non exécuter deux macros au même moment non? Puisque même si on met macro1 à 12h00 et macro2 à 12h00 également, VBA va lancer déjà lancer macro1 et une fois celui ci fini lancer macro2 qui attendait que macro1 se termine.

Qu'en penses-tu?

Cordialement,