Discussion :

[diss10]

Bonjour Tout le Monde ,

Voila donc mon pb : Je voudrais colorier mes onglets automatiquement a l'aide d'une combo box .

Exemple : M = Jaune ; S=Bleu ciel ; Q = Vert ; P =Bleu foncé ; E = Rose

Fonctionnement souhaité :

=> Click sur bouton ajouter un nouveau document =>Remplir le userform => puis valider pour créer une feuil avec la couleur définie a travers la combo box 1



Merci Les Amis

[Menhir]

Pas besoin d'un UserForm, un simple InputBox suffit.

Code :

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

1
2
3
4
5
6
With WorkSheets("MaFeuille").Tab
    Select Case InputBox("Choix de la couleur")
    Case "M"
        .Color = RGB(255, 255, 0)
    End Select
End With

En remplaçant MaFeuille par le nom de ta feuille.
Je te laisse compléter les Case pour les autres couleurs.

[diss10]

Je veux l’intégrer dans mon userform au-faite , car le bouton valider va exécuter plusieurs macro et je voudrais qu'il fasse ça aussi en parallèle .

Exemple :



=> Le bouton valider a été programmé pour créer une nouvel feuil a partir d'un model et moi j'ai besoin de gérer le coloriage des feuil avec la combobox appelé "P" .

Merci D'avance .

[Menhir]

Il suffit que, dans le code, tu remplaces le InputBox par l'élément de ton Userform qui contient la valeur à tester.