OVH Cloud OVH Cloud

Barre d'outil personaliser

4 réponses
Avatar
Al..
J'ai un petit probl=E8me.
Je n'arrive pas =E0 inclure dans ma barre barre=20
d'outil mes propres images ".ico"=20
J'ai cr=E9er sur un formulaire un bouton qui me=20
permet d'atteindre un autre formulaire.
Je voudrais l'enlever de sur mon form. et le=20
mettre dans la barre d'outil.
Je travaille avec =ABAccess 2000 =BB
=20
Merci pour votre aide.
=20
Al..

4 réponses

Avatar
hm15
Bonjour Al,

sauf erreur, les boutons de commande créés dans les formulaires ne sont pas
"compatibles" avec ceux des barres d'outils.
Tu peux utiliser le code mais tu dois recréer le bouton dans la barre.
Pour récupérer ton image, il faut qu'elle soit sur 16 x 16 pixels. Si c'est
le cas :
- copie ton image dans Paint, sélectionne-la parfaitement pour respecter les
16x16, copie-la et sur ton nouveau bouton dans ta barre d'outils, colle-la
(boîte Personnaliser ouverte, clic droit sur ton bouton, coller l'image du
bouton)

Autres solutions :
- dessiner ton image à l'aide de l'éditeur de boutons
- copier l'image d'un bouton (de barres d'outils) qui te plaise dans un
autre logiciel (boîte Personnaliser, clic droit sur le bouton, "Copier
l'image du bouton") et la coller sur le tien.
Tu peux aussi trouver des collections d'images de boutons sur le Web.

Cordialement,

Annette
---------------------------------------------------------------------------
www.horizon-micro.com


"Al.." a écrit dans le message de news:
0d6e01c37d5b$a2bd3270$
J'ai un petit problème.
Je n'arrive pas à inclure dans ma barre barre
d'outil mes propres images ".ico"
J'ai créer sur un formulaire un bouton qui me
permet d'atteindre un autre formulaire.
Je voudrais l'enlever de sur mon form. et le
mettre dans la barre d'outil.
Je travaille avec «Access 2000 »

Merci pour votre aide.

Al..
Avatar
Al..
Merci Annette pour ta réponse.
Pour les images c'est ok.
Mais comment faire pour utiliser le code ?

Voici un exemple de code d'un de mes boutons,
il sert a ateindre le formulaire "Acceuil"
*********************************************
Private Sub Commande87_Click()
On Error GoTo Err_Commande87_Click

DoCmd.Close
Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "Acceuil"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Commande87_Click:
Exit Sub

Err_Commande87_Click:
MsgBox Err.Description
Resume Exit_Commande87_Click

End Sub

************************************
Où peut être je doit passer par une macro ?
Merci encore.

Al..

-----Message d'origine-----
Bonjour Al,

sauf erreur, les boutons de commande créés dans les
formulaires ne sont pas

"compatibles" avec ceux des barres d'outils.
Tu peux utiliser le code mais tu dois recréer le bouton
dans la barre.

Pour récupérer ton image, il faut qu'elle soit sur 16 x
16 pixels. Si c'est

le cas :
- copie ton image dans Paint, sélectionne-la parfaitement
pour respecter les

16x16, copie-la et sur ton nouveau bouton dans ta barre
d'outils, colle-la

(boîte Personnaliser ouverte, clic droit sur ton bouton,
coller l'image du

bouton)

Autres solutions :
- dessiner ton image à l'aide de l'éditeur de boutons
- copier l'image d'un bouton (de barres d'outils) qui te
plaise dans un

autre logiciel (boîte Personnaliser, clic droit sur le
bouton, "Copier

l'image du bouton") et la coller sur le tien.
Tu peux aussi trouver des collections d'images de boutons
sur le Web.


Cordialement,

Annette
----------------------------------------------------------
-----------------

www.horizon-micro.com


"Al.." a écrit dans le message de
news:

0d6e01c37d5b$a2bd3270$
J'ai un petit problème.
Je n'arrive pas à inclure dans ma barre barre
d'outil mes propres images ".ico"
J'ai créer sur un formulaire un bouton qui me
permet d'atteindre un autre formulaire.
Je voudrais l'enlever de sur mon form. et le
mettre dans la barre d'outil.
Je travaille avec «Access 2000 »

Merci pour votre aide.

Al..


.



Avatar
hm15
Bonsoir Al,

en effet, avec les boutons des barres d'outils tu es obligé de passer par
une petite macro qui renvoie au code, avec simplement l'action
"ExécuterCode".

Mais pour ce que tu souhaites, tu pourrais faire directement dans la macro
un "OuvrirFormulaire".
Les puristes diront que les erreurs ne seront pas gérées, mais dans ton
exemple, elles me semblent limitées.

Nota : si tu gardes les codes, prends l'habitude de les nommer "proprement".
En d'autres termes, évite de garder les noms que les assistants donnent
comme "Commande87".
Il est préférable de choisir des noms plus significatifs comme "Accueil"
dans ton cas.

Cordialement,

Annette
---------------------------------------------------------------------------
www.horizon-micro.com


"Al.." a écrit dans le message de news:
766501c37e1b$97bd05b0$
Merci Annette pour ta réponse.
Pour les images c'est ok.
Mais comment faire pour utiliser le code ?

Voici un exemple de code d'un de mes boutons,
il sert a ateindre le formulaire "Acceuil"
*********************************************
Private Sub Commande87_Click()
On Error GoTo Err_Commande87_Click

DoCmd.Close
Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "Acceuil"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Commande87_Click:
Exit Sub

Err_Commande87_Click:
MsgBox Err.Description
Resume Exit_Commande87_Click

End Sub

************************************
Où peut être je doit passer par une macro ?
Merci encore.

Al..

[...]
Avatar
Al..
Merci beaucoup Annette.
Tout fonctionne à merveille.

Al.. xx

-----Message d'origine-----
Bonsoir Al,

en effet, avec les boutons des barres d'outils tu es
obligé de passer par

une petite macro qui renvoie au code, avec simplement
l'action

"ExécuterCode".

Mais pour ce que tu souhaites, tu pourrais faire
directement dans la macro

un "OuvrirFormulaire".
Les puristes diront que les erreurs ne seront pas gérées,
mais dans ton

exemple, elles me semblent limitées.

Nota : si tu gardes les codes, prends l'habitude de les
nommer "proprement".

En d'autres termes, évite de garder les noms que les
assistants donnent

comme "Commande87".
Il est préférable de choisir des noms plus significatifs
comme "Accueil"

dans ton cas.

Cordialement,

Annette
----------------------------------------------------------
-----------------

www.horizon-micro.com


"Al.." a écrit dans le message de
news:

766501c37e1b$97bd05b0$
Merci Annette pour ta réponse.
Pour les images c'est ok.
Mais comment faire pour utiliser le code ?

Voici un exemple de code d'un de mes boutons,
il sert a ateindre le formulaire "Acceuil"
*********************************************
Private Sub Commande87_Click()
On Error GoTo Err_Commande87_Click

DoCmd.Close
Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "Acceuil"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Commande87_Click:
Exit Sub

Err_Commande87_Click:
MsgBox Err.Description
Resume Exit_Commande87_Click

End Sub

************************************
Où peut être je doit passer par une macro ?
Merci encore.

Al..

[...]


.