Affichage / Masquage d'un onglet d'un objet multipage

philoche63

XLDnaute Nouveau
Bonjour les amis !
me voila encore confronté à un problème sous VBA :
j'ai un formulaire où se trouve un objet multipage avec 3 onglets.
j'ai une liste déroulante "Période".
Je voudrais que l'onglet "page5" soit visible uniquement quand la période est supérieure à la cellule en 2,33
j'ai mis de debogeage et passe bien la ou il faut mais l'onglet est toujours là.

Un grand merci par avance de votre aide

Cordialement

Philippe


Private Sub CboPeriode_Change()
TxtDebPeriode.Value = "01"
toto = Format(CboPeriode.Value, "dd/mm/yyyy")
Me.TxtFinPeriode.Value = Day(DateSerial(Year(Me.CboPeriode.Value), Month(Me.CboPeriode.Value) + 1, 0))

If toto < Cells(2, 33) Then
MultiPage2.Page5.Visible = False
Else
MultiPage2.Page5.Visible = True
End If
End Sub
 

camarchepas

XLDnaute Barbatruc
Re : Affichage / Masquage d'un onglet d'un objet multipage

Bonjour Philoche ,

Sans fichier pas facile à te dépanner .

si le test toto< cells(2,33) se passe bien ( Et oui avec les dates , y' a tellement d'écarts possibles)

l'écriture pour rendre visible ou invisible semblerait plutot être :

Exemple pour la page 5

multipage2(4).Visible = False

Cordialement
 

philoche63

XLDnaute Nouveau
Re : Affichage / Masquage d'un onglet d'un objet multipage

Bonsoir,
Merci pour votre message !
en fait j'utilisais pas la bonne syntaxe d'une part et j'avais un pb sur le format sur la date.
Merci de votre aide.

Philoche
 

Discussions similaires


Haut Bas