Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Ajout de référence VBA et affichage

Ajout de référence VBA et affichage

19 réponses
Avatar
Ghislain
Salut à tous,
J'ai une toute petite macro qui à l'ouverture du classeur ajoute une
référence à la bibliothèque de powerpoint 2007 et affiche une boite à
outils :
Private Sub Workbook_Open()
Call
ThisWorkbook.VBProject.References.AddFromGuid("{91493440-5A91-11CF-8700-00A A0060263B}",
2, 9)
frmBelleVue.Show
End Sub
Figurez vous que la boite à outil n'apparait pas ! Pas de message
d'erreur, je suis même "nargué" par excel qui fait apparaître la boit e
à outil l'espace d'un centième de seconde.
Private Sub Workbook_Open()
frmBelleVue.Show
End Sub
J'ai impérativement besoin d'installer cette référence au démarra ge
ET d'afficher la boite à outils.
Je précise qu'inverser l'ordre des instructions ne change rien.
Merci par avance,
Ghislain
Signaler un problème avec ce contenu

9 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2
Avatar
michdenis
Efface ton message au plus vite... la publication
de l'adresse internet en clair ici va te mériter une
foule de pourriels car elle va être récupérer par
un robot en vue de l'ajouter à une base de données
future pour ces pourriels !


"Ghislain" a écrit dans le message de news:

Salut michdenis,
Je te confirme que la référence est bien chargée j'ai trouvé le
Guid, Major et Minor comme tu l'indiques.
J'ai testé sur un poste avec excel 2003, et ça ne marchait pas, je
ne sais pas ce que j'ai fait de travers, alors si ça t'embéte pas
j'aimerais bien que tu m'envoies ton classeur test à

Encore merci pour ton aide,
Ghislain
Avatar
michdenis
Tu peux trouver un fichier exemple version 2003
pour l'ajout de la référence access ici :
http://cjoint.com/?ixnZNVzgu2



"Ghislain" a écrit dans le message de news:

Salut michdenis,
Je te confirme que la référence est bien chargée j'ai trouvé le
Guid, Major et Minor comme tu l'indiques.
J'ai testé sur un poste avec excel 2003, et ça ne marchait pas, je
ne sais pas ce que j'ai fait de travers, alors si ça t'embéte pas
j'aimerais bien que tu m'envoies ton classeur test à

Encore merci pour ton aide,
Ghislain
Avatar
Ghislain
Salut michdenis,
J'espère que le we fut bon et merci pour ton envoi qui marche
effectivement très bien. Alors je me suis dit qu'il y a peut-être un
truc qui cloche au niveau de la fenêtre que je veux afficher. Et
effectivement, ma fenêtre n'était pas modale, en la rendant modale
tout se passe comme demandé : elle reste affichée !
Rappel du code on ne peut plus court :
Call
ThisWorkbook.VBProject.References.AddFromGuid("{91493440-5A91-11CF-8700-00A A0060263B}",
2, 9)
frmBelleVue.Show
Tu peux le tester chez toi, j'ai observé le même problème sur un
poste avec office 2003. La propriété Showmodal étant en lecture seule
à l'exécution, je ne vois pas de solution, si par hasard tu as une
idée ? Ma fenêtre ne peut être modale puisque c'est une boite à
outils.
Merci,
Ghislain
Avatar
michdenis
Adapte le nom du formulaire "Userform1"
pour celui de ton programme.


On Error Resume Next
Load UserForm1 '<---------
With ThisWorkbook.VBProject.References
With .AddFromGuid _
("{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}", 9, 0)
End With
End With
UserForm1.Show 0 '<---------





"Ghislain" a écrit dans le message de news:

Salut michdenis,
J'espère que le we fut bon et merci pour ton envoi qui marche
effectivement très bien. Alors je me suis dit qu'il y a peut-être un
truc qui cloche au niveau de la fenêtre que je veux afficher. Et
effectivement, ma fenêtre n'était pas modale, en la rendant modale
tout se passe comme demandé : elle reste affichée !
Rappel du code on ne peut plus court :
Call
ThisWorkbook.VBProject.References.AddFromGuid("{91493440-5A91-11CF-8700-00AA0060263B}",
2, 9)
frmBelleVue.Show
Tu peux le tester chez toi, j'ai observé le même problème sur un
poste avec office 2003. La propriété Showmodal étant en lecture seule
à l'exécution, je ne vois pas de solution, si par hasard tu as une
idée ? Ma fenêtre ne peut être modale puisque c'est une boite à
outils.
Merci,
Ghislain
Avatar
Ghislain
Ca ne donne rien..
On 25 août, 19:30, "michdenis" wrote:
Adapte le nom du formulaire "Userform1"
pour celui de ton programme.

On Error Resume Next
Load UserForm1     '<---------
With ThisWorkbook.VBProject.References
    With .AddFromGuid _
        ("{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}", 9, 0)
    End With
End With
UserForm1.Show 0     '<---------

"Ghislain" a écrit dans le message de news:

Salut michdenis,
  J'espère que le we fut bon et merci pour ton envoi qui marche
effectivement très bien. Alors je me suis dit qu'il y a peut-être un
truc qui cloche au niveau de la fenêtre que je veux afficher. Et
effectivement, ma fenêtre n'était pas modale, en la rendant modale
tout se passe comme demandé : elle reste affichée !
Rappel du code on ne peut plus court :
Call
ThisWorkbook.VBProject.References.AddFromGuid("{91493440-5A91-11CF-8700-0 0AA0060263B}",
2, 9)
frmBelleVue.Show
  Tu peux le tester chez toi, j'ai observé le même problème sur u n
poste avec office 2003. La propriété Showmodal étant en lecture seu le
à l'exécution, je ne vois pas de solution, si par hasard tu as une
idée ? Ma fenêtre ne peut être modale puisque c'est une boite à
outils.
Merci,Ghislain


Avatar
michdenis
| Ca ne donne rien..

Chez moi, cela permet d'afficher le formulaire
dans une fenêtre non modale. Excel 2003.

N'était-ce point ton objectif ?



"Ghislain" a écrit dans le message de news:

Ca ne donne rien..
On 25 août, 19:30, "michdenis" wrote:
Adapte le nom du formulaire "Userform1"
pour celui de ton programme.

On Error Resume Next
Load UserForm1 '<---------
With ThisWorkbook.VBProject.References
With .AddFromGuid _
("{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}", 9, 0)
End With
End With
UserForm1.Show 0 '<---------

"Ghislain" a écrit dans le message de news:

Salut michdenis,
J'espère que le we fut bon et merci pour ton envoi qui marche
effectivement très bien. Alors je me suis dit qu'il y a peut-être un
truc qui cloche au niveau de la fenêtre que je veux afficher. Et
effectivement, ma fenêtre n'était pas modale, en la rendant modale
tout se passe comme demandé : elle reste affichée !
Rappel du code on ne peut plus court :
Call
ThisWorkbook.VBProject.References.AddFromGuid("{91493440-5A91-11CF-8700-00AA0060263B}",
2, 9)
frmBelleVue.Show
Tu peux le tester chez toi, j'ai observé le même problème sur un
poste avec office 2003. La propriété Showmodal étant en lecture seule
à l'exécution, je ne vois pas de solution, si par hasard tu as une
idée ? Ma fenêtre ne peut être modale puisque c'est une boite à
outils.
Merci,Ghislain


Avatar
Ghislain
salut,
oui c'est bien mon objectif mais chez moi ça ne tourne ni sur 2007,
ni sur 2003. Ca t'embête de me refaire un coup de cijoint.com ?
Merci,
Ghislain
Avatar
michdenis
ce que tu cherches est dans le ThisWorkbook du classeur :

http://cjoint.com/?iAmTjcPLmR



"Ghislain" a écrit dans le message de news:

salut,
oui c'est bien mon objectif mais chez moi ça ne tourne ni sur 2007,
ni sur 2003. Ca t'embête de me refaire un coup de cijoint.com ?
Merci,
Ghislain
Avatar
Ghislain
Ah mais c'est l'événement Activate qui affiche la boite à outils ! Et
là effectivement ça marche ! Fallait y penser et je t'en remercie
MILLE fois. N'empêche que c'est pas normal que ça ne marche pas sur
l'evt Open.
salut l'ami,
Ghislain
1 2