Discussion :

[FreeAccess]

Bonjour,

Suite à plusieurs questions sur ce sujet, et comme il me semble qu'une solution n'existe pas encore dans la ou dans les différentes contributions ou posts .... je vous propose celle-ci ....

Fonctionne sous ACC2007 (voir compatibilité avec d'autres versions)
Fonctionne sous ACC2003 (merci à User .... )
Fonctionne sous ACC2010-32Bits (merci à curt )

1) Passer dans l'éditeur de code (Alt+F11)
2) Menu Outils > Références > Clic sur bouton "Parcourir
.... dans le répertoire Microsoft Office/OfficeXX/xxxx (à modifier en fonction de la version), rechercher le fichier "UTILITY.ACCDA".

3) Sélectionner ce fichier et cliquer sur ouvrir. Une nouvelle référence est cochée ==> [X] utility

4) Créer un nouveau module avec le code suivant..

Code :

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

1
2
3
4
5
6
7
8
Public Function ZoomBoxFunction()
'Taille de la Police
utility.zoom_iFontSize = 14
'Nom de la Police
utility.zoom_stFontName = "Arial"
'Couleur Police
utility.zoom_lForeColor = vbRed
End Function

Possibilités pour rendre actif cette fonction.....

- soit placer le curseur n'importe où dans la fonction et cliquer sur F5 (a effectuer à chaque fois qu'on lance l'application)

- soit créer une macro Autoexec

• ExécuterCode >>>>>> ZoomBoxFunction()

Cela modifie toutes les boîtes Zoom d'ACCESS...
__________________

[User]

Salut Free,

Testé avec succès sous Access 2003, Apparemment ça affecte Access et pas uniquement la base ?

Mais à priori ça semble tout nouveau en tout cas sur le forum Access et bien intéressant

Cdlt,

Denis

[curt]

Bonjour à tous,

ça fonctionne aussi avec Access 2010 (32 bits)
Le fichier "UTILITY.ACCDA" est là :

Code :

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

C:\Program Files (x86)\Microsoft Office\Office14\ACCWIZ

Par contre, il ne s'agit pas vraiment d'une nouveauté : http://support.microsoft.com/kb/462872/fr. Mais rappeler les choses n'est jamais nuisible. (+1 pour FreeAccess )

Curt

[robyseb]

Fonctionne nickel

• Pour ceux qui ne connaissent pas la fonction zoom vous devez sélectionner un champ puis MAJ+F2

[FreeAccess]

Bonjour à tous,

Merci pour vos différents retours...

@ curt

...Par contre, il ne s'agit pas vraiment d'une nouveauté : http://support.microsoft.com/kb/462872/fr.

Sauf erreur de ma part . . . mais as-tu testé la procédure proposée par ton lien

L'article cité date de 1995 ..... et s’applique pour les premières versions d'ACCESS . . . .
.... au temps ou effectivement le fichier UTILITY.MDA pouvait être modifié.... ce qui n'est plus le cas avec UTILITY.ACCDA....

[curt]

Bonsoir FreeAccess,

L'article cité date de 1995 ..... et s’applique pour les premières versions d'ACCESS . . . .
.... au temps ou effectivement le fichier UTILITY.MDA pouvait être modifié.... ce qui n'est plus le cas avec UTILITY.ACCDA....

Tu as entièrement raison (je te remets +1)

Je faisais juste la remarque sur l'historique de l'astuce que tu relevais.

C'est vrai qu'à la longue, on s'y perd dans ces versions... 2003 au boulot, 2007 et 2010 à la maison et encore un 97 qui traîne sur un vieux portable...
Alors se rappeler ce qui est modifiable ou pas !!!....

Curt