Discussion :

[Igloobel]

Bonjour à tous

Mon problème n'est pas directement sur le code VBA qui fonctionne mais sur l'affectation de ma macro dans un menu.

J'explique

J'ai créer une macro de sauvegarde dont voici le code épurer

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
Sub Sauvegarde()
    Dim an, mois, jours As Integer
    Dim fichier As String
 
    an = Year(Date)
    mois = Month(Date)
    If mois < 10 Then mois = "0" & mois
    jours = Day(Date)
    If jours < 10 Then jours = "0" & jours
 
    fichier = Left(ActiveWorkbook.Name, Len(ActiveWorkbook.Name) - 4)
    fichier = "c:\" & fichier & "_" & an & "_" & mois & "_" & jours & ".xls"
 
    ActiveWorkbook.SaveAs Filename:= _
        fichier, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
 
    Application.Quit    
 
End Sub

Jusque là pas de problème et cla marche

2ème étape je cré manulement une barre d'outils avec un bouton Sauvegarde dedans et je lui affecte la macro sauvegarde. Et toujours pas de problème
J'execute la macro cela marche

Et lorsque je veux executer encore une fois le bouton auquel j'ai affecté la macro Sauvegarde il me demande d'ouvrir la macro du fichier Essai_31_07_2008.xls

Et là je sèche

Comment a-t-il pu changer l'affectation de la macro avec un autre fichier

Du coup je me suis dit je vais faire ce que je fais manulement en macro automatique, et là, seconde surprise j'ai pas de code!

Donc ma demande est la suivante : Comment puis-je avoir un bouton qui reste lié au fichier initial

Merci d'avance

Pour toute aide voici mon fichier

PS j'ai penser bien évidemment de faire un bouton dans une feuille mais l'utilisatrice qui cré des feuilles veut l'avoir sous les yeux pour penser a faire une sauvegarde ailleurs

[zazaraignée]

La façon de faire la plus courante c'est d'ajouter un menu ou une option de menu à l'ouverture du fichier xls et d'effacer ce menu à la fermeture du fichier xls.

Je n'ai pas le code sous la main, mais il doit y avoir quelque chose dans les tutoriels, la FAQ Excel ou la FAQ VBA.

Si tu ne trouves pas, tu dis. Je devrais avoir quelque chose dans mes vieilles notes de cours.

[wilfried_42]

Bonjour

Ca fait longtemps que j'ai laissé tomber ce system de bouton dans la barre de menu pour des fichiers non autonome comme le tient

Voila ce qui ce passe :
1 - tu ouvres un fichier X, ce fichier te crée une barre de menu "carine", dans cette barre, tu as un bouton pour faire une sauvegarde
2 - Ta macro de sauvegarde, ne fait pas une sauvegarde simple, mais sauvegarde sous un autre nom, donc change le nom de ton fichier
3 - Ton bouton n'etant pas cree par ce nouveau fichier, il reste lié au precedent et cherche sa macro dans le precedent fichier

Il doit y avoir une option pour Lier ou Attacher un menu au fichier, mais je ne sais plus comment ca marche, ayant laissé tombé ce type de programmation

[Igloobel]

Bonjour à tous
Merci de vos réponse

- Réponse à wilfried_42
Oui, je sais que c'est un peu galère mais bon je vais tenter de faire ce que Zazaraigné m'a dit

- Réponse à zazaraigné
Dans la FAQ je pense avoir trouvé mon bonheur
Dès que j'ai fini je reviendrais

Merci

[fring]

Bonjour tlm,

Si ça peut t'aider --> Création d'une barre de menus personnalisée

[mumu64]

Salut tt le monde et Igloobel,

As tu essayé d'enregistrer ta macro dans le classeur de macro personnelle ?
Comme ça tu peux affecter ta macro à un bouton des barres d'outils et là elle sera toujours disponible quel que soit le fichier ouvert.