Macro pour toutes les feuilles

[Jack Lethycien]

Salut,
je voudrais avoir un macro qui peut me permettre d’exécuter mon macro sur toutes les feuilles.

Est-ce possible

 

[gilbert_RGI]

Re : Macro pour toutes les feuilles

Bonjour

mettre la macro dans un module standard et appeler cette macro de là où vous voulez

 

[Dull]

Re : Macro pour toutes les feuilles

Salut Jack Lethycien, Gilbert🙂, le Forum

Peut-être comme cela
dans un Module Standard

Sub EssAi()
Dim i as Byte
     For i = 1 To Sheets.Count
            ' Mon_Macro Mettre ici le véritable nom de ta Macro
     Next i
End Sub

Bonne Journée

 

[Jack Lethycien]

Re : Macro pour toutes les feuilles

Hi Dull and Gilbert,

Merci beaucoup vraiment, j'ai excuté le macro et c'est bon. Je suis un beginner en VBA,

 

[Jack Lethycien]

Re : Macro pour toutes les feuilles

Hi Dull,
Un problem avec les codes que vous m'avez envoyer je constate que si ne touche pas les autres feuilles, j'ai commis une imprudence à criant victoire

Merci de me reformuler

 

[gilbert_RGI]

Re : Macro pour toutes les feuilles

Ben si ça exécute bien de toutes les feuilles
et le programme de Dull se lance bien pour chaque feuille du classeur actif

si vous mettiez un petit fichier avec un exemple ne fonctionnant pas ce serait bien plus simple 😎

 

[Jack Lethycien]

Re : Macro pour toutes les feuilles

Salut Gilbert,
Regarde la pièce jointe Forum .xlsm
Je constanté que le macro s'excute seulement sur une feuille mais plusieurs fois.

J'ai ajouter le macro que je trouver pour le réaliser, merci pour votre attention.

Il aussi des questions sur le macro,
Je fais que le macro ne s’exécute pas sur toutes les feuilles, par feuille Graph1 et Donné, supposer que j'ai 5 feuilles nommées que je veux que mon macro ne fonctionne pas sur eux.
J'ai essayé le if cond1 and cond2 then, je voit que c bon pour deux mais pour me long fichier j'aurai à beaucoup écrire.
Merci

 

[gilbert_RGI]

Re : Macro pour toutes les feuilles

voir avec ceci

Sub test()
sh = Array("sheet1", "sheet3", "sheet5")
For i = 0 To 2
With Sheets(sh(i))
MsgBox "votre macro s'execute pour la feuille :" & sh(i)
End With
Next
End Sub

 

[gilbert_RGI]

Re : Macro pour toutes les feuilles

voilà un exemple

 

[Jack Lethycien]

Re : Macro pour toutes les feuilles

Merci gilbert_RGI,

Votre aide est importante pour moi, ma question est que si il y a un nombre élévé de sheet à exécuter et à ne pas executer avec des noms il faut l'écrire toute manuellement?;
Et s'il faut ajouter un autre

 

[gilbert_RGI]

Re : Macro pour toutes les feuilles

lequel est le plus important en nombre?

celui à exécuter ou celui on fera rien

il y a des solutions ex: tester une cellule dans chaque feuille pour savoir si elle doit ou non être parcourue par la macro

ex: si [a1].value = true then ........

 

[Jack Lethycien]

Re : Macro pour toutes les feuilles

Merci Beaucoup , Stp, je besoin que vous puissiez consulte un peu ma demande sur ouvrir un fichier à partir d'un autre pour inserer des valeurs à des endroits spécifiques.,

Best Regards

 

[gilbert_RGI]

Re : Macro pour toutes les feuilles

c'est à dire ?

ouvrir un fichier à partir d'un autre fichier ?

si c'est ça regardez ce que j'ai fait ici

 

[Jack Lethycien]

Re : Macro pour toutes les feuilles

Oui
Ouvrir et insérer de données par rapport à une date et les éléments définies que j’obtiens de notre système chaque jour.
Par: la date 01/01/2014 et une colonne client, le mettre dans le mon fichier rapport avec comme condition client et date

Thanks pour ton temps pour mon problème

 

[Jack Lethycien]

Re : Macro pour toutes les feuilles

Je viens de lire ce que vous avez fait, c'est très bien mais dans mon cas je cherche à ce que le fichier ayant un nom donnée (val01012014) je prend chaque jour avec modification de la date, je veux l'ouvrier automatiquement pas choisir