OVH Cloud OVH Cloud

Vous avez demandez la police...

2 réponses
Avatar
Pascal
Bonjour à tous.

Comment faire pour changer la police de tous les champs d'un formulaire ?

Merci d'avance

2 réponses

Avatar
Raymond
Bonsoir.

tu peux faire ceci:
On Error Resume Next
Dim Ctl As Control
For Each Ctl In Me.Controls
Ctl.FontName = "arial"
Ctl.FontSize = 14
Next Ctl

les polices seront changées pour le temps d'exécution du formulaire. dès que
le formulaire sera fermé, les polices d'origine seront remises en place.
pour les changer définitivement il faut passer par un autre formulaire et
ouvrir le formulaire à modifier en mode design.

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Pascal" a écrit dans le message de
news:3f66065c$0$10407$
Bonjour à tous.

Comment faire pour changer la police de tous les champs d'un formulaire ?

Merci d'avance




Avatar
Pascal
Super, merci beaucoup

"Raymond" a écrit dans le message news:

Bonsoir.

tu peux faire ceci:
On Error Resume Next
Dim Ctl As Control
For Each Ctl In Me.Controls
Ctl.FontName = "arial"
Ctl.FontSize = 14
Next Ctl

les polices seront changées pour le temps d'exécution du formulaire. dès
que

le formulaire sera fermé, les polices d'origine seront remises en place.
pour les changer définitivement il faut passer par un autre formulaire et
ouvrir le formulaire à modifier en mode design.

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Pascal" a écrit dans le message de
news:3f66065c$0$10407$
Bonjour à tous.

Comment faire pour changer la police de tous les champs d'un formulaire
?



Merci d'avance