Changer la couleur d'un Controltab ?

[clickandgo]

Bonjour à tous,

Je dois être aveugle mais je ne vois aucune option pour changer la couleur d'une page de ControlTab, j'arrive juste à changer la couleur des étiquettes d'onglets.

Mon ControlTab reste désespérément blanc, comment faire ?

Merci

[Philippe JOCHMANS]

Bonjour

Merci d'indiquer ta version d'Access.

Sinon en attendant :

Comment mettre des couleurs sur un contrôle onglet ?

Philippe

[clickandgo]

Envoyé par Philippe JOCHMANS

Bonjour

Merci d'indiquer ta version d'Access.

Sinon en attendant :

Comment mettre des couleurs sur un contrôle onglet ?

Philippe

Merci pour votre réponse, j'utilise Access 2010, je voudrais simplement que tout le contrôle ait la même couleur, j'arrive à mettre les etiquettes d'onglets en couleur mais pas le controlTab entier

Merci d'avance pour toute aide

[Philippe JOCHMANS]

Re

Désolé, mais je ne possède pas cette version, c'est pour cela que j'avais crée un palliatif à la couleur des onglets inexistantes.

Donc pour le reste je ne sais pas.

Philippe

[Arkham46]

bjr,

je n'ai pas vu de propriété de couleur de fond de page d'onglet sur 2007

un moyen détourné :
- mettre une étiquette sur chaque page
- la passer en arrière-plan : clic droit => position => mettre à l'arrière-plan
- lui donner un fond standard et une une couleur de fond

Soit dimensionner l'étiquette à la main, soit le faire en VBA parce que c'est un peu galère à la main :

Ajouter une petite fonction dans le module du formulaire :

Code :

1
2
3
4
5
6
7
 
Private Function FitLabelToPage(pLabel As Access.Label)
pLabel.Left = pLabel.Parent.Left
pLabel.Top = pLabel.Parent.Top
pLabel.Width = pLabel.Parent.Width
pLabel.Height = pLabel.Parent.Height
End Function

et redimensionner les étiquettes à la taille de la page à l'ouverture du formulaire :

Code :

1
2
3
4
5
6
 
Private Sub Form_Open(Cancel As Integer)
FitLabelToPage Me.lblPage1
FitLabelToPage Me.lblPage2
....
End Sub

Il reste un petit cadre autour de l'étiquette mais c'est mieux que rien

[clickandgo]

Je te remercie beaucoup Arkham pour la solution proposée, cependant il parait incroyable qu'ils n'aient pas pensé à cette éventualité !