Bonjour,
Sur le petit listing que j'ai dans ma table d'adresses, j'aimerais changer
la couleur de certains éléments.
Mais lorsque je veux le faire, TOUS les éléments de ce listing changent.
Comment faire pour ne changer la police des personnes de mon listing que je
choisirais.
<d'avance, merci.
--
JCE
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
Raymond
Bonjour.
Il faut ajouter un champ supplémentaire dans la table pour indiquer la couleur ou la police d'impression etc.. . Dans ton état, si tu es en version 2000 & + , tu peux changer la couleur d'impression par la mise en forme conditionnelle. Pour changer la police, il faut passer par vba et placer ce genre de fonction dans la section Détail_Format:
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer) If Left(Me.Client_Nom, 1) = "A" Then Me.Client_Nom.ForeColor = RGB(255, 0, 0) Me.Client_Nom.FontName = "arial" Me.Client_Nom.FontBold = True Me.Client_Nom.FontSize = 14 Else Me.Client_Nom.ForeColor = RGB(0, 0, 0) Me.Client_Nom.FontName = "arial" Me.Client_Nom.FontBold = False Me.Client_Nom.FontSize = 10 End If End Sub Tous les clients commençant par "A" seront en rouge et en police 14
voir un exemple dans la page: http://access.seneque.free.fr/couleurs_condition.htm pour les conditions mais le principe est le même.
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"jcl.even" a écrit dans le message de news:bk1ue1$su3$
Bonjour, Sur le petit listing que j'ai dans ma table d'adresses, j'aimerais changer la couleur de certains éléments. Mais lorsque je veux le faire, TOUS les éléments de ce listing changent. Comment faire pour ne changer la police des personnes de mon listing que je
choisirais. <d'avance, merci. -- JCE
Bonjour.
Il faut ajouter un champ supplémentaire dans la table pour indiquer la
couleur ou la police d'impression etc.. . Dans ton état, si tu es en
version 2000 & + , tu peux changer la couleur d'impression par la mise en
forme conditionnelle.
Pour changer la police, il faut passer par vba et placer ce genre de
fonction dans la section Détail_Format:
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)
If Left(Me.Client_Nom, 1) = "A" Then
Me.Client_Nom.ForeColor = RGB(255, 0, 0)
Me.Client_Nom.FontName = "arial"
Me.Client_Nom.FontBold = True
Me.Client_Nom.FontSize = 14
Else
Me.Client_Nom.ForeColor = RGB(0, 0, 0)
Me.Client_Nom.FontName = "arial"
Me.Client_Nom.FontBold = False
Me.Client_Nom.FontSize = 10
End If
End Sub
Tous les clients commençant par "A" seront en rouge et en police 14
voir un exemple dans la page:
http://access.seneque.free.fr/couleurs_condition.htm pour les conditions
mais le principe est le même.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.
"jcl.even" <jcl.even@wanadoo.fr> a écrit dans le message de
news:bk1ue1$su3$1@news-reader5.wanadoo.fr...
Bonjour,
Sur le petit listing que j'ai dans ma table d'adresses, j'aimerais changer
la couleur de certains éléments.
Mais lorsque je veux le faire, TOUS les éléments de ce listing changent.
Comment faire pour ne changer la police des personnes de mon listing que
je
Il faut ajouter un champ supplémentaire dans la table pour indiquer la couleur ou la police d'impression etc.. . Dans ton état, si tu es en version 2000 & + , tu peux changer la couleur d'impression par la mise en forme conditionnelle. Pour changer la police, il faut passer par vba et placer ce genre de fonction dans la section Détail_Format:
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer) If Left(Me.Client_Nom, 1) = "A" Then Me.Client_Nom.ForeColor = RGB(255, 0, 0) Me.Client_Nom.FontName = "arial" Me.Client_Nom.FontBold = True Me.Client_Nom.FontSize = 14 Else Me.Client_Nom.ForeColor = RGB(0, 0, 0) Me.Client_Nom.FontName = "arial" Me.Client_Nom.FontBold = False Me.Client_Nom.FontSize = 10 End If End Sub Tous les clients commençant par "A" seront en rouge et en police 14
voir un exemple dans la page: http://access.seneque.free.fr/couleurs_condition.htm pour les conditions mais le principe est le même.
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"jcl.even" a écrit dans le message de news:bk1ue1$su3$
Bonjour, Sur le petit listing que j'ai dans ma table d'adresses, j'aimerais changer la couleur de certains éléments. Mais lorsque je veux le faire, TOUS les éléments de ce listing changent. Comment faire pour ne changer la police des personnes de mon listing que je