Discussion :

[Pittouti]

Bonjour à tous,

je viens de créer ce code, qui charge un ruban :

Code :

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

1
2
3
4
5
6
7
Function loadribbon()
    Dim GestionFichier As New FileSystemObject
    Dim C As TextStream
 
    Set C = GestionFichier.OpenTextFile(CurrentProject.Path & "\YB.xml", ForReading)
    Application.LoadCustomUI "Gestion des Achats", C.ReadAll
End Function

j'ai créé la macro Autoexec aussi.

mais, Quand j'exécute ce dernier : j'ai ce message d'erreur.



Merci de me dire c'est quoi l'erreure ? et comment je fais si je veux charger plusieur rubans ??

merci d'avance

[Jean-Philippe André]

Salut,
le chargement des rubans se fait bien effectivement en début de processus, car ils sont déchargés automatiquement à la fermeture de ta base.

Essaie d'exécuter ta macro sans avoir chargé ton ruban, cela devrait être OK

[Pittouti]

Bonsoir,

j'ai essayé et c'est le même message !

[Pittouti]

en fait si j'ai plusieurs ruban à charger, je fais comment ?

[Jean-Philippe André]

Tu les nommes tous différemment

[Pittouti]

c'est le cas !!

ils ont tous des noms différents