Problème de macro

Question

bonjour,

j'ai créé un dossier avec des fichiers excels, dans chaques fichiers(janvier,fevrier,mars,ect...) j' ai créé des macro avec bouton de commande lié au macro qui fonctionne super mais lorsque que j'ouvre par exemple janvier et que j'appui sur un bouton de commande macro . elle fonctionne mais m'ouvre un autre fichier excel du classeur ex: mai . c'est embetant. dans chaque il y a les même macro (nbre 22macro et 22 bouton de commande). comment faire pour utiliser les macros sans l'ouverture d'autres fichiers du même classeur?

Le Pingou · Answer

Bonjour,
Pas trop compréhensible comme explication, pouvez-vous mettre le fichier sur https://www.cjoint.com/  et poster le lien

fabriceleveuf · Answer

je mets en ligne une photo et la VBA macro du problème car le classeur est trop lourd, j'espère qu'avec cela, sa vous éclairera un peu plus sur le problème. merci!

photo :	https://www.cjoint.com/?DBioneRCHp3 

macro: 	https://www.cjoint.com/?DBiotN4GUTe

Le Pingou · Answer

Bonjour,
Merci pour l'information.
Concerne les macros, vous dites : 
j'appuie sur un bouton de commande macro . elle fonctionne mais m'ouvre un autre fichier excel du classeur ex: mai
Cependant dans votre [module1.bas] à aucune place on trouve une instruction  pour ouvrir un classeur.  Pas de correspondance à votre texte... !

L'image ne permet en rien de comprendre quoique ce soit.

Quelle est la taille du classeur Excel..... ?

Et de même si compresser en ZIP ou RAR ?

fabriceleveuf · Answer

mon dossier est compressé.merci

	https://www.cjoint.com/?DBipUcW3EHh

Le Pingou · Answer

Bonjour,
C'est très sympa, mais le ZIPX n'est pas dur ZIP ou RAR, résultat je ne peux rien ouvrir. Désolé.

foo · Answer

bonjour

ca fout le bordelle partout a refaire les bonton dans la feuille et surtout pas dans le bandeau

A+

Maurice

fabriceleveuf · Answer

et oui je suis pas doué je renvoie, merci

https://www.cjoint.com/?DBisodSuFZ5

foo · Answer

Bonjour

deja faire le menage dans ton code

ex:
Sub MALADIE()
    With Selection
        .HorizontalAlignment = xlCenter
        .Font.ColorIndex = 2
        .Font.Bold = True
        .Interior.ColorIndex = 2
    End With
    ActiveCell.Value = "730"
End Sub

Sub CONGESPECIAUX()
    With Selection
        .HorizontalAlignment = xlCenter
        .Font.ColorIndex = 1
        .Font.Bold = True
        .Interior.ColorIndex = 3
    End With
    ActiveCell.Value = "765"
End Sub

et enleve tes bouton dans le bandeau

A+
Maurice

Le Pingou · Answer

Bonjour,
Merci pour le fichier.
Cependant je n'arrive pas à accéder au code de vos boutons et en plus si je clic sur n'importe quel bouton il y a un message d'erreur `Copie de JANVIER 2014.xls' introuvable..... et ceci est identique pour chacun des boutons.
Désolé je ne peux pas en faire plus.

Problème de macro

9 réponses

Discussions similaires

Newsletters