Aide pour programmer en VBA

teckmicro -  
Bonjour,

comment exploiter cette commande dans vba : Me.LeControle.ForeColor = RGB(255, 0, 0)

je veux choisir couleur écriture de mon formulaire par Bouton 1 = Noir
, Bouton 2 = rouge , bouton 3 =vert

merci d'avance de m'expliquer la fonctionnement : débutant dans vba

cordialement

14 réponses

Résumé de la discussion

Plusieurs échanges portent sur l'utilisation de la commande VBA Me.LeControle.ForeColor = RGB(255, 0, 0) pour régler la couleur d'écriture d'un formulaire et associer Bouton 1 noir, Bouton 2 rouge et Bouton 3 vert. Des réponses analysent la persistance de la couleur lors des recherches et les contraintes des versions Access 2003/2007, avec des fichiers partagés et des tests en mode formulaire ou état. En pratique, certains veulent mémoriser la couleur par enregistrement et retrouver l'affichage couleur lors des recherches, tandis que d'autres signalent des difficultés liées aux autorisations et à l'ouverture de fichiers. D'autres propositions évoquent l'utilisation de modes d'impression et des ajustements spécifiques selon les états et les vues, sans conclure sur une solution unique.

Bobot (l’IA à votre service)
  1. f894009
    Bonjour,

    je veux choisir couleur écriture de mon formulaire

    Feuille EXCEL, UserForm EXCEL, Formulaire ACCESS???????
    1. teckmicro
      sous access

      exemple
      formulaire

      clique sur le bouton rouge , vert , noir

      si rouge = les donnes écrite dans réf,date,, etc = rouge

      réf
      date
      nom
      prénom

      cordialement
      2. f894009
        Re,

        Code VBA du formumaire

        Pour les couleurs vous pouvez utiliser les references des proprietes

        Option Compare Database

        Private Sub Cmd_Noir_Click()
        Ecriture = vbBlack
        Call Format_Couleur(Ecriture)
        End Sub

        Private Sub Cmd_Rouge_Click()
        Ecriture = vbRed
        Call Format_Couleur(Ecriture)
        End Sub

        Private Sub Cmd_Vert_Click()
        Ecriture = vbGreen
        Call Format_Couleur(Ecriture)
        End Sub

        Sub Format_Couleur(Ecriture)
        'Pour chaque champ du formulaire
        Me.réf.ForeColor = Ecriture
        Me.Date.ForeColor = Ecriture
        Me.nom.ForeColor = Ecriture
        Me.prénom.ForeColor = Ecriture
        'et ainsi de suite pour les autres champs
        '
        End Sub

        Bonne suite
        1. teckmicro
          merci de votre patience , si vous pouviez regarder ma base ci-joint
          et faire la manipulation car je viens d'essayer ce ne fonctionne pas comme je voudrais
          merci bien
          cordialement

          ---http://cjoint.com/?3EfpzytW4GZ
        2. teckmicro
          je vous dit merci car je viens d'essayer dans tout les sens !
          mais je n'arrive pas a maître ça en place.
          je peut vous envoyer ma base pour que le comprend mieux
          et j'aurais résolu mon problème et compris le fonctionnement.
          je vous en remercie d'avance ...
          cordialement
          http://cjoint.com/?3EfpzytW4GZ
        3. f894009
          Re,

          Je fais
        5. teckmicro
          alors super bon travaille
          mais juste un petit détails le but de tout ça au niveau écriture
          c'est j'aurais voulu que ça reste mémoriser dans une rechercher soit en mode formulaire ou état
          et que la couleur s'affiche comme a était sélections pour réenregistrements des champs.

          merci de votre aide si vous pouvez accort m'aider .

          cordialement
      5. teckmicro
        bonjour

        je viens de tester Extra !

        serais t'il possible de voir les couleur du texte avec un ETAT d'impression
        si c'est possible !

        ça marche très bien en mode formulaire ....

        je vous remercie de tous de vos effort a ma demande !
        cordialement
        2. teckmicro
          bonjour

          je viens de regarder rien a dire ! parfait

          j'aurais du les laisser je voulez faire des rechercher par nom etc ...
          vous verrez dans le formulaire courrier
          le problème c'est la couleur reste identique !!!
          dit moi si c'est possible
          ou quel recherche serait'il mieux adapter ?

          merci d'avance pour votre aide ....

          http://cjoint.com/?BEjlGjcDTlI

          cordialement
          2. teckmicro
            re-bonjour

            ça fonctionne très bien !

            mais si on fait une recherche par rubrique : nom , motif ,date etc ...
            en mode formulaire !
            la base affiche la rechercher mais pas avec la couleur enregistrer !
            ce qui veut dire que si enregistrent en rouge No 1
            a la recherche il sera vert ou rouge ou noir :
            vue le fonctionnement de la base ci-jointe !

            j'espère que mes explications vous on aider si non dit le moi
            je vous ferais des captures 'écrans :

            merci
            cordialement
            1. teckmicro
              au plus simple

              lorsque vous rechercher une rubrique par critères :
              avec la base fourni vous verrez que la recherche
              par rubrique n'affiche pas la couleur qui correspond a la recherche !

              Discussions similaires

              Méthode find dans VBA - Recherche de données sous Excel
              baissaoui

              0 réponse
              erreur d'execution 9, l'indice n'appartient pas à la sélection
              isidoh

              18 réponses
              "L'indice n'appartient à la sélection" + VBA
              fleur.31

              2 réponses
              VBA excel : résoudre problème de capacité.
              Juan Pedro

              9 réponses
              Message Fransat : Pas de droits
              Clem6464

              4 réponses