Discussion :

[revemane]

bonjour

je souhaiterai dans un userform multipage faire la chose suivante

sur chaque page j'ai des textbox et optionbutton et j'aimerai que quand toute les txtbox et optionbutton d'un page contienne des données que l'onglet change de couleur pour passer au vert et tant qu il manque une donnée il ne change pas de couleur

merci

[laetitia]

bonjour revemane le forum question?? tu veus que soit ta feuille qui change de couleur ou la page du multipage si c 'est le multipage pas possible a moins de mettre un frame ou image de plus tu parles des optionbuttons par defaut tu peus en mettre qu' un a true a la fois!!! a moins que ceci soit aussi dans un frame aussi .cela devient complique!!! en attendant plus de details

[revemane]

je m y attendait un peu

donc si vous avez une autre idée je suis preneur, donc j'ai un userform contenant des multiples pages avec chaqu une une multitude de option button et de textbox qui chacune ont des noms asser compliqués, donc meme si fait verifier par msgbox si une textebox ou option button n'est pas remplie il me sera difficile de savoir sur quelle page la txtbox ne sera pas remplie

c'est pour ca que j'aurrais aimé que la page de ces multis pages change de couleur quand tout est bien remplit

donc je cherche quelque chose de visuel pour savoir si une txtbox est oubliee

merci

[laetitia]

bonsoir revemane le forum si tu pouvez zipper seulement l'user avec tes multipages sans code pour voir comment cela se présente je te garantie rien meme en passant par des groupManes ou module de classe assez lourd !! si pas de reponses ce soir je regarderais demain

[Didier Gonard]

Bonjour

Dur de répondre avec si peu sur le contexte et la quantité possible d’état d’initialisation…. (tout est vierge au départ, on peut changer d’onglet si non plein etc, etc..).
Voici toutefois quelques pistes :
Tu peux à la construction (ou ensuite, mais plus lourd) ajouter un N° d’onglet en index aux noms de tes contrôles si besoin..

Tu peux jouer sur la couleur d’un bord de contrôle (ou de son label / nom ) ou…. Ce qui peut être assez sympa visuellement du genre pour un textbox initialisé vide le mettre par défaut en bord vert (il faut que la propriété Borderstyle soit à 1) et changer en noir si rempli, d’un coup d’œil, les vides ressortent (msgbox « merci de remplir les verts »), en pensant que l’utilisateur peut effacer un contenu aussi genre :

Code :

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

1
2
3
Private Sub txtSigle_AfterUpdate()
If txtSigle = "" Then txtSigle.BorderColor = 4966415 Else txtSigle.BorderColor = RGB(128, 128, 128)
End Sub

Même chose dans le genre (les OptionsButton n’ont pas de propriété border…, les Frames, oui) pour d’autres contrôles,….

Pour savoir sinon sur quelle page est le contrôle non rempli, tu peux voir du côté de sa propriété Parent genre (à paramétrer si des contrôles dans des frames), pur exemple, un bouton Contrôle sur l’USF :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub cmdDvP_Click()
Dim objCntrl As Control
Dim ZA As Integer
ZA = 1
  For Each objCntrl In usfFicheCli.Controls
    If TypeOf objCntrl Is MSForms.TextBox Then
      If objCntrl.Value = "" Then
        With Worksheets("Pass")
            .Cells(ZA, 1) = objCntrl.Name
            .Cells(ZA, 2) = objCntrl.Parent.Name
        ZA = ZA + 1
        End With
      End If
    End If
  Next
End Sub

Bon WE,

Didier

[revemane]

voici mon fichier

dans le formulaire
userform2
merci

[stefan69]

Je me permets de répondre, un peu tard , sur ta question.
J'ai débuté le développement d'un petit outil avec gestion d'onglet et je rencontre le même pb que toi.
Pour ma part, j'ai contourné le pb qui se pose à nous et cela fonctionne très bien

Ma solution est de mettre un "label" sur la page de l'onglet et ensuite de poser tes objets dessus .
Je n'ai rencontré aucun pb de modification de couleur, ou bien lors de redimensionnement automatique des multipages. Les objets de traitement restent bien au 1er plan et mon label "déco" exécute bien les ordres envoyés.

Je pense même que cette solution optimise la taille de ton fichier xls car il n'y a pas d'image (à voir)

En espérant avoir pu te proposer une autre solution.

A+