Masquer un onglet selon son contenu

Le
s.jean
Bonjour

Je souhaiterai masquer un onglet sous condition.
J'ai donc un formulaire frmDemandes avec 2 onglets A L'intérieur de
l'onglet tabAncien j'ai un contrôle Commentaires (champs memo)
SI le champs Commentaires est vide je souhaiterai masquer l'onglet
tabAncien qui contient ce contrôle. L'interet est que le champs
Commentaires n'est plus utilisé aujourd'hui mais doit rester visible
pour les anciens projets.

J'ai essayé avec le code suivant mais en vain

Private Sub Form_Load()
If Me.Commentaires = Null Then
Me.tabAncien.Visible = False
Else
Me.tabAncien.Visible = True
End If

End Sub

Pouvez vous me donner un coup de main ?

2e question : lorsque cet onglet est invisible je souhaiterai rendre
invisible l'autre onglet et passer le contenu de celui-ci sur le
formulaire principal de façon a ne pas avoir 1 onglet. Une idée ?
merci
Sandrine
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
s.jean
Le #7033771
Bonjour,

C'est bon ça marche finalement avec

Private Sub Form_Load()
If Me.Commentaires <> "0" Then
Me.tabAncien.Visible = True
Else
Me.tabAncien.Visible = False
End If


End Sub


Sandrine

On 18 juin, 10:22, "s.jean"
Bonjour

Je souhaiterai masquer un onglet sous condition.
J'ai donc un formulaire frmDemandes avec 2 onglets A L'intérieur de
l'onglet tabAncien j'ai un contrôle Commentaires (champs memo)
SI le champs Commentaires est vide je souhaiterai masquer l'onglet
tabAncien qui contient ce contrôle. L'interet est que le champs
Commentaires n'est plus utilisé aujourd'hui mais doit rester visible
pour les anciens projets.

J'ai essayé avec le code suivant mais en vain ...

Private Sub Form_Load()
If Me.Commentaires = Null Then
Me.tabAncien.Visible = False
Else
Me.tabAncien.Visible = True
End If

End Sub

Pouvez vous me donner un coup de main ?

2e question : lorsque cet onglet est invisible je souhaiterai rendre
invisible l'autre onglet et passer le contenu de celui-ci sur le
formulaire principal de façon a ne pas avoir 1 onglet. Une idée ?
merci
Sandrine


Fabien
Le #7033941
s.jean a écrit :
Bonjour,

C'est bon ça marche finalement avec

Private Sub Form_Load()
If Me.Commentaires <> "0" Then
Me.tabAncien.Visible = True
Else
Me.tabAncien.Visible = False
End If


End Sub


Sandrine

On 18 juin, 10:22, "s.jean"
Bonjour

Je souhaiterai masquer un onglet sous condition.
J'ai donc un formulaire frmDemandes avec 2 onglets A L'intérieur de
l'onglet tabAncien j'ai un contrôle Commentaires (champs memo)
SI le champs Commentaires est vide je souhaiterai masquer l'onglet
tabAncien qui contient ce contrôle. L'interet est que le champs
Commentaires n'est plus utilisé aujourd'hui mais doit rester visible
pour les anciens projets.

J'ai essayé avec le code suivant mais en vain ...

Private Sub Form_Load()
If Me.Commentaires = Null Then
Me.tabAncien.Visible = False
Else
Me.tabAncien.Visible = True
End If

End Sub

Pouvez vous me donner un coup de main ?

2e question : lorsque cet onglet est invisible je souhaiterai rendre
invisible l'autre onglet et passer le contenu de celui-ci sur le
formulaire principal de façon a ne pas avoir 1 onglet. Une idée ?
merci
Sandrine





Que tu peux optimiser en
Private Sub Form_Load()

Me.tabAncien.Visible = not(Me.Commentaires = Null)


End Sub
;-)
s.jean
Le #7034461
Bonjour,

alors il me mets "utilisation incorrecte de Null" avec
Private Sub Form_Load()
Me.tabAncien.Visible = Not (Me.Commentaires = Null)
End Sub

Par ailleurs la seule solution que j'ai trouvée pour masquer les
onglets lorsque j'en ai qu'un seul est de jouer sur le style, mais il
me reste la bordure. Y aurait - il un autre moyen ? Par ailleurs
j'avais intégré ce code dans mon code, du coup je ne sais plus quoi en
faire !

Merci !
Sandrine

On 18 juin, 11:59, Fabien
s.jean a écrit :



> Bonjour,

> C'est bon ça marche finalement avec

> Private Sub Form_Load()
> If Me.Commentaires <> "0" Then
> Me.tabAncien.Visible = True
> Else
> Me.tabAncien.Visible = False
> End If

> End Sub

> Sandrine

> On 18 juin, 10:22, "s.jean" >> Bonjour

>> Je souhaiterai masquer un onglet sous condition.
>> J'ai donc un formulaire frmDemandes avec 2 onglets A L'intérieur de
>> l'onglet tabAncien j'ai un contrôle Commentaires (champs memo)
>> SI le champs Commentaires est vide je souhaiterai masquer l'onglet
>> tabAncien qui contient ce contrôle. L'interet est que le champs
>> Commentaires n'est plus utilisé aujourd'hui mais doit rester visible
>> pour les anciens projets.

>> J'ai essayé avec le code suivant mais en vain ...

>> Private Sub Form_Load()
>> If Me.Commentaires = Null Then
>> Me.tabAncien.Visible = False
>> Else
>> Me.tabAncien.Visible = True
>> End If

>> End Sub

>> Pouvez vous me donner un coup de main ?

>> 2e question : lorsque cet onglet est invisible je souhaiterai rendre
>> invisible l'autre onglet et passer le contenu de celui-ci sur le
>> formulaire principal de façon a ne pas avoir 1 onglet. Une idée ?
>> merci
>> Sandrine

Que tu peux optimiser en
Private Sub Form_Load()

  Me.tabAncien.Visible = not(Me.Commentaires = Null)

  End Sub
;-)- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -


Fabien
Le #7034751
s.jean a écrit :
Bonjour,

alors il me mets "utilisation incorrecte de Null" avec
Private Sub Form_Load()
Me.tabAncien.Visible = Not (Me.Commentaires = Null)
End Sub

Par ailleurs la seule solution que j'ai trouvée pour masquer les
onglets lorsque j'en ai qu'un seul est de jouer sur le style, mais il
me reste la bordure. Y aurait - il un autre moyen ? Par ailleurs
j'avais intégré ce code dans mon code, du coup je ne sais plus quoi en
faire !

Merci !
Sandrine

On 18 juin, 11:59, Fabien
s.jean a écrit :



Bonjour,
C'est bon ça marche finalement avec
Private Sub Form_Load()
If Me.Commentaires <> "0" Then
Me.tabAncien.Visible = True
Else
Me.tabAncien.Visible = False
End If
End Sub
Sandrine
On 18 juin, 10:22, "s.jean"
Bonjour
Je souhaiterai masquer un onglet sous condition.
J'ai donc un formulaire frmDemandes avec 2 onglets A L'intérieur de
l'onglet tabAncien j'ai un contrôle Commentaires (champs memo)
SI le champs Commentaires est vide je souhaiterai masquer l'onglet
tabAncien qui contient ce contrôle. L'interet est que le champs
Commentaires n'est plus utilisé aujourd'hui mais doit rester visible
pour les anciens projets.
J'ai essayé avec le code suivant mais en vain ...
Private Sub Form_Load()
If Me.Commentaires = Null Then
Me.tabAncien.Visible = False
Else
Me.tabAncien.Visible = True
End If
End Sub
Pouvez vous me donner un coup de main ?
2e question : lorsque cet onglet est invisible je souhaiterai rendre
invisible l'autre onglet et passer le contenu de celui-ci sur le
formulaire principal de façon a ne pas avoir 1 onglet. Une idée ?
merci
Sandrine




Que tu peux optimiser en
Private Sub Form_Load()

Me.tabAncien.Visible = not(Me.Commentaires = Null)

End Sub
;-)- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -






Et avec :
Me.tabAncien.Visible = nz(Me.Commentaires,"")=""
s.jean
Le #7035081
Re-Bonjour,

je rappelle mon code précédent :

Private Sub Active_Controle()
Dim oCtrl As Control
For Each oCtrl In Me.Controls
If (oCtrl.Name acLabel) And (oCtrl.ControlType <> acTabCtl) Then
oCtrl.Enabled = Not (Cocher35 = -1)
End If
Next
End Sub

Parmis les contrôles désactivés il y a le contrôle Commentaires, qu i,
je pense a du mal à se désactiver si il n'est pas visible ...

Comment faire ? Peut-on lier les 2 codes ? Je souhaite en fait qu'il
n'y ait pas d'onglet si le contenu de Commentaires est vide, mais je
souhaite garder le sous-formulaire qui est sur l'autre onglet, et
qu'il soit sur le formulaire principal (Je suis claire ?)

Merci
Sandrine


On 18 juin, 13:37, Fabien
s.jean a écrit :





> Bonjour,

> alors il me mets "utilisation incorrecte de Null" avec
> Private Sub Form_Load()
> Me.tabAncien.Visible = Not (Me.Commentaires = Null)
> End Sub

> Par ailleurs la seule solution que j'ai trouvée pour masquer les
> onglets lorsque j'en ai qu'un seul est de jouer sur le style, mais il
> me reste la bordure. Y aurait - il un autre moyen ? Par ailleurs
> j'avais intégré ce code dans mon code, du coup je ne sais plus quoi en
> faire !

> Merci !
> Sandrine

> On 18 juin, 11:59, Fabien >> s.jean a écrit :

>>> Bonjour,
>>> C'est bon ça marche finalement avec
>>> Private Sub Form_Load()
>>> If Me.Commentaires <> "0" Then
>>> Me.tabAncien.Visible = True
>>> Else
>>> Me.tabAncien.Visible = False
>>> End If
>>> End Sub
>>> Sandrine
>>> On 18 juin, 10:22, "s.jean" >>>> Bonjour
>>>> Je souhaiterai masquer un onglet sous condition.
>>>> J'ai donc un formulaire frmDemandes avec 2 onglets A L'intérieur d e
>>>> l'onglet tabAncien j'ai un contrôle Commentaires (champs memo)
>>>> SI le champs Commentaires est vide je souhaiterai masquer l'onglet
>>>> tabAncien qui contient ce contrôle. L'interet est que le champs
>>>> Commentaires n'est plus utilisé aujourd'hui mais doit rester visib le
>>>> pour les anciens projets.
>>>> J'ai essayé avec le code suivant mais en vain ...
>>>> Private Sub Form_Load()
>>>> If Me.Commentaires = Null Then
>>>> Me.tabAncien.Visible = False
>>>> Else
>>>> Me.tabAncien.Visible = True
>>>> End If
>>>> End Sub
>>>> Pouvez vous me donner un coup de main ?
>>>> 2e question : lorsque cet onglet est invisible je souhaiterai rendre
>>>> invisible l'autre onglet et passer le contenu de celui-ci sur le
>>>> formulaire principal de façon a ne pas avoir 1 onglet. Une idée ?
>>>> merci
>>>> Sandrine
>> Que tu peux optimiser en
>> Private Sub Form_Load()

>>   Me.tabAncien.Visible = not(Me.Commentaires = Null)

>>   End Sub
>> ;-)- Masquer le texte des messages précédents -

>> - Afficher le texte des messages précédents -

Et avec :
Me.tabAncien.Visible = nz(Me.Commentaires,"")=""- Masquer le texte de s messages précédents -

- Afficher le texte des messages précédents -


Fabien
Le #7035531
s.jean a écrit :
Re-Bonjour,

je rappelle mon code précédent :

Private Sub Active_Controle()
Dim oCtrl As Control
For Each oCtrl In Me.Controls
If (oCtrl.Name acLabel) And (oCtrl.ControlType <> acTabCtl) Then
oCtrl.Enabled = Not (Cocher35 = -1)
End If
Next
End Sub

Parmis les contrôles désactivés il y a le contrôle Commentaires, qui,
je pense a du mal à se désactiver si il n'est pas visible ...

Comment faire ? Peut-on lier les 2 codes ? Je souhaite en fait qu'il
n'y ait pas d'onglet si le contenu de Commentaires est vide, mais je
souhaite garder le sous-formulaire qui est sur l'autre onglet, et
qu'il soit sur le formulaire principal (Je suis claire ?)

Merci
Sandrine


On 18 juin, 13:37, Fabien
s.jean a écrit :





Bonjour,
alors il me mets "utilisation incorrecte de Null" avec
Private Sub Form_Load()
Me.tabAncien.Visible = Not (Me.Commentaires = Null)
End Sub
Par ailleurs la seule solution que j'ai trouvée pour masquer les
onglets lorsque j'en ai qu'un seul est de jouer sur le style, mais il
me reste la bordure. Y aurait - il un autre moyen ? Par ailleurs
j'avais intégré ce code dans mon code, du coup je ne sais plus quoi en
faire !
Merci !
Sandrine
On 18 juin, 11:59, Fabien
s.jean a écrit :
Bonjour,
C'est bon ça marche finalement avec
Private Sub Form_Load()
If Me.Commentaires <> "0" Then
Me.tabAncien.Visible = True
Else
Me.tabAncien.Visible = False
End If
End Sub
Sandrine
On 18 juin, 10:22, "s.jean"
Bonjour
Je souhaiterai masquer un onglet sous condition.
J'ai donc un formulaire frmDemandes avec 2 onglets A L'intérieur de
l'onglet tabAncien j'ai un contrôle Commentaires (champs memo)
SI le champs Commentaires est vide je souhaiterai masquer l'onglet
tabAncien qui contient ce contrôle. L'interet est que le champs
Commentaires n'est plus utilisé aujourd'hui mais doit rester visible
pour les anciens projets.
J'ai essayé avec le code suivant mais en vain ...
Private Sub Form_Load()
If Me.Commentaires = Null Then
Me.tabAncien.Visible = False
Else
Me.tabAncien.Visible = True
End If
End Sub
Pouvez vous me donner un coup de main ?
2e question : lorsque cet onglet est invisible je souhaiterai rendre
invisible l'autre onglet et passer le contenu de celui-ci sur le
formulaire principal de façon a ne pas avoir 1 onglet. Une idée ?
merci
Sandrine




Que tu peux optimiser en
Private Sub Form_Load()
Me.tabAncien.Visible = not(Me.Commentaires = Null)
End Sub
;-)- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -




Et avec :
Me.tabAncien.Visible = nz(Me.Commentaires,"")=""- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -






Tu laisse le controle onglet actif et tu rend invisible la page qui
porte le commentaire
me.page_de_l'onglet_commentaire.visible=nz(me.commentaire,"")<>""
et si la case cocher35 est cochée tu refais apparaitre la page de l'onglet.
s.jean
Le #7035701
super, c'est bon !

Maintenant je me retrouve donc quand mon champs Commentaires est vide,
avec un seul onglet qui contient un sous-formulaire, puis je faire en
sorte que mon sous-formulaire apparaisse sur le formulaire principal,
et qu'il n'y a pas d'onglet ?

Merci
Sandrine



On 18 juin, 15:11, Fabien
s.jean a écrit :





> Re-Bonjour,

> je rappelle mon code précédent :

> Private Sub Active_Controle()
> Dim oCtrl As Control
>    For Each oCtrl In Me.Controls
>         If (oCtrl.Name > acLabel) And (oCtrl.ControlType <> acTabCtl) Then
>           oCtrl.Enabled = Not (Cocher35 = -1)
>     End If
>    Next
> End Sub

> Parmis les contrôles désactivés il y a le contrôle Commentaires , qui,
> je pense a du mal à se désactiver si il n'est pas visible ...

> Comment faire ? Peut-on lier les 2 codes ? Je souhaite en fait qu'il
> n'y ait pas d'onglet si le contenu de Commentaires est vide, mais je
> souhaite garder le sous-formulaire qui est sur l'autre onglet, et
> qu'il soit sur le formulaire principal (Je suis claire ?)

> Merci
> Sandrine

> On 18 juin, 13:37, Fabien >> s.jean a écrit :

>>> Bonjour,
>>> alors il me mets "utilisation incorrecte de Null" avec
>>> Private Sub Form_Load()
>>> Me.tabAncien.Visible = Not (Me.Commentaires = Null)
>>> End Sub
>>> Par ailleurs la seule solution que j'ai trouvée pour masquer les
>>> onglets lorsque j'en ai qu'un seul est de jouer sur le style, mais il
>>> me reste la bordure. Y aurait - il un autre moyen ? Par ailleurs
>>> j'avais intégré ce code dans mon code, du coup je ne sais plus qu oi en
>>> faire !
>>> Merci !
>>> Sandrine
>>> On 18 juin, 11:59, Fabien >>>> s.jean a écrit :
>>>>> Bonjour,
>>>>> C'est bon ça marche finalement avec
>>>>> Private Sub Form_Load()
>>>>> If Me.Commentaires <> "0" Then
>>>>> Me.tabAncien.Visible = True
>>>>> Else
>>>>> Me.tabAncien.Visible = False
>>>>> End If
>>>>> End Sub
>>>>> Sandrine
>>>>> On 18 juin, 10:22, "s.jean" >>>>>> Bonjour
>>>>>> Je souhaiterai masquer un onglet sous condition.
>>>>>> J'ai donc un formulaire frmDemandes avec 2 onglets A L'intérieur de
>>>>>> l'onglet tabAncien j'ai un contrôle Commentaires (champs memo)
>>>>>> SI le champs Commentaires est vide je souhaiterai masquer l'onglet
>>>>>> tabAncien qui contient ce contrôle. L'interet est que le champs
>>>>>> Commentaires n'est plus utilisé aujourd'hui mais doit rester vis ible
>>>>>> pour les anciens projets.
>>>>>> J'ai essayé avec le code suivant mais en vain ...
>>>>>> Private Sub Form_Load()
>>>>>> If Me.Commentaires = Null Then
>>>>>> Me.tabAncien.Visible = False
>>>>>> Else
>>>>>> Me.tabAncien.Visible = True
>>>>>> End If
>>>>>> End Sub
>>>>>> Pouvez vous me donner un coup de main ?
>>>>>> 2e question : lorsque cet onglet est invisible je souhaiterai rend re
>>>>>> invisible l'autre onglet et passer le contenu de celui-ci sur le
>>>>>> formulaire principal de façon a ne pas avoir 1 onglet. Une idé e ?
>>>>>> merci
>>>>>> Sandrine
>>>> Que tu peux optimiser en
>>>> Private Sub Form_Load()
>>>>   Me.tabAncien.Visible = not(Me.Commentaires = Null)
>>>>   End Sub
>>>> ;-)- Masquer le texte des messages précédents -
>>>> - Afficher le texte des messages précédents -
>> Et avec :
>> Me.tabAncien.Visible = nz(Me.Commentaires,"")=""- Masquer le texte des messages précédents -

>> - Afficher le texte des messages précédents -

Tu laisse le controle onglet actif et tu rend invisible la page qui
porte le commentaire
me.page_de_l'onglet_commentaire.visible=nz(me.commentaire,"")<>""
et si la case cocher35 est cochée tu refais apparaitre la page de l'ong let.- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -


Fabien
Le #7035961
s.jean a écrit :
super, c'est bon !

Maintenant je me retrouve donc quand mon champs Commentaires est vide,
avec un seul onglet qui contient un sous-formulaire, puis je faire en
sorte que mon sous-formulaire apparaisse sur le formulaire principal,
et qu'il n'y a pas d'onglet ?

Merci
Sandrine



On 18 juin, 15:11, Fabien
s.jean a écrit :





Re-Bonjour,
je rappelle mon code précédent :
Private Sub Active_Controle()
Dim oCtrl As Control
For Each oCtrl In Me.Controls
If (oCtrl.Name acLabel) And (oCtrl.ControlType <> acTabCtl) Then
oCtrl.Enabled = Not (Cocher35 = -1)
End If
Next
End Sub
Parmis les contrôles désactivés il y a le contrôle Commentaires, qui,
je pense a du mal à se désactiver si il n'est pas visible ...
Comment faire ? Peut-on lier les 2 codes ? Je souhaite en fait qu'il
n'y ait pas d'onglet si le contenu de Commentaires est vide, mais je
souhaite garder le sous-formulaire qui est sur l'autre onglet, et
qu'il soit sur le formulaire principal (Je suis claire ?)
Merci
Sandrine
On 18 juin, 13:37, Fabien
s.jean a écrit :
Bonjour,
alors il me mets "utilisation incorrecte de Null" avec
Private Sub Form_Load()
Me.tabAncien.Visible = Not (Me.Commentaires = Null)
End Sub
Par ailleurs la seule solution que j'ai trouvée pour masquer les
onglets lorsque j'en ai qu'un seul est de jouer sur le style, mais il
me reste la bordure. Y aurait - il un autre moyen ? Par ailleurs
j'avais intégré ce code dans mon code, du coup je ne sais plus quoi en
faire !
Merci !
Sandrine
On 18 juin, 11:59, Fabien
s.jean a écrit :
Bonjour,
C'est bon ça marche finalement avec
Private Sub Form_Load()
If Me.Commentaires <> "0" Then
Me.tabAncien.Visible = True
Else
Me.tabAncien.Visible = False
End If
End Sub
Sandrine
On 18 juin, 10:22, "s.jean"
Bonjour
Je souhaiterai masquer un onglet sous condition.
J'ai donc un formulaire frmDemandes avec 2 onglets A L'intérieur de
l'onglet tabAncien j'ai un contrôle Commentaires (champs memo)
SI le champs Commentaires est vide je souhaiterai masquer l'onglet
tabAncien qui contient ce contrôle. L'interet est que le champs
Commentaires n'est plus utilisé aujourd'hui mais doit rester visible
pour les anciens projets.
J'ai essayé avec le code suivant mais en vain ...
Private Sub Form_Load()
If Me.Commentaires = Null Then
Me.tabAncien.Visible = False
Else
Me.tabAncien.Visible = True
End If
End Sub
Pouvez vous me donner un coup de main ?
2e question : lorsque cet onglet est invisible je souhaiterai rendre
invisible l'autre onglet et passer le contenu de celui-ci sur le
formulaire principal de façon a ne pas avoir 1 onglet. Une idée ?
merci
Sandrine




Que tu peux optimiser en
Private Sub Form_Load()
Me.tabAncien.Visible = not(Me.Commentaires = Null)
End Sub
;-)- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -




Et avec :
Me.tabAncien.Visible = nz(Me.Commentaires,"")=""- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -




Tu laisse le controle onglet actif et tu rend invisible la page qui
porte le commentaire
me.page_de_l'onglet_commentaire.visible=nz(me.commentaire,"")<>""
et si la case cocher35 est cochée tu refais apparaitre la page de l'onglet.- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -





Ben l'astuce serait de mettre ton sous formulaire directement dans ton
formulaire et de le cacher par defaut. De mettre par dessus ton onglet
actuel .
Tu caches ton onglet et tu 'dé-cache' ton sous-formulaire en cas de besoin.
s.jean
Le #7036311
C'est bon ! J'y avais déjà pensé mais je me demandais si il y avait u n
autre moyen que de mettre 2 fois le même sous-formulaire.

Merci !
Sandrine


On 18 juin, 15:57, Fabien
s.jean a écrit :



> super, c'est bon !

> Maintenant je me retrouve donc quand mon champs Commentaires est vide,
> avec un seul onglet qui contient un sous-formulaire, puis je faire en
> sorte que mon sous-formulaire apparaisse sur le formulaire principal,
> et qu'il n'y a pas d'onglet ?

> Merci
> Sandrine

> On 18 juin, 15:11, Fabien >> s.jean a écrit :

>>> Re-Bonjour,
>>> je rappelle mon code précédent :
>>> Private Sub Active_Controle()
>>> Dim oCtrl As Control
>>>    For Each oCtrl In Me.Controls
>>>         If (oCtrl.Name >>> acLabel) And (oCtrl.ControlType <> acTabCtl) Then
>>>           oCtrl.Enabled = Not (Cocher35 = -1)
>>>     End If
>>>    Next
>>> End Sub
>>> Parmis les contrôles désactivés il y a le contrôle Commentair es, qui,
>>> je pense a du mal à se désactiver si il n'est pas visible ...
>>> Comment faire ? Peut-on lier les 2 codes ? Je souhaite en fait qu'il
>>> n'y ait pas d'onglet si le contenu de Commentaires est vide, mais je
>>> souhaite garder le sous-formulaire qui est sur l'autre onglet, et
>>> qu'il soit sur le formulaire principal (Je suis claire ?)
>>> Merci
>>> Sandrine
>>> On 18 juin, 13:37, Fabien >>>> s.jean a écrit :
>>>>> Bonjour,
>>>>> alors il me mets "utilisation incorrecte de Null" avec
>>>>> Private Sub Form_Load()
>>>>> Me.tabAncien.Visible = Not (Me.Commentaires = Null)
>>>>> End Sub
>>>>> Par ailleurs la seule solution que j'ai trouvée pour masquer les
>>>>> onglets lorsque j'en ai qu'un seul est de jouer sur le style, mais il
>>>>> me reste la bordure. Y aurait - il un autre moyen ? Par ailleurs
>>>>> j'avais intégré ce code dans mon code, du coup je ne sais plus quoi en
>>>>> faire !
>>>>> Merci !
>>>>> Sandrine
>>>>> On 18 juin, 11:59, Fabien >>>>>> s.jean a écrit :
>>>>>>> Bonjour,
>>>>>>> C'est bon ça marche finalement avec
>>>>>>> Private Sub Form_Load()
>>>>>>> If Me.Commentaires <> "0" Then
>>>>>>> Me.tabAncien.Visible = True
>>>>>>> Else
>>>>>>> Me.tabAncien.Visible = False
>>>>>>> End If
>>>>>>> End Sub
>>>>>>> Sandrine
>>>>>>> On 18 juin, 10:22, "s.jean" >>>>>>>> Bonjour
>>>>>>>> Je souhaiterai masquer un onglet sous condition.
>>>>>>>> J'ai donc un formulaire frmDemandes avec 2 onglets A L'intérie ur de
>>>>>>>> l'onglet tabAncien j'ai un contrôle Commentaires (champs memo)
>>>>>>>> SI le champs Commentaires est vide je souhaiterai masquer l'ongl et
>>>>>>>> tabAncien qui contient ce contrôle. L'interet est que le champ s
>>>>>>>> Commentaires n'est plus utilisé aujourd'hui mais doit rester v isible
>>>>>>>> pour les anciens projets.
>>>>>>>> J'ai essayé avec le code suivant mais en vain ...
>>>>>>>> Private Sub Form_Load()
>>>>>>>> If Me.Commentaires = Null Then
>>>>>>>> Me.tabAncien.Visible = False
>>>>>>>> Else
>>>>>>>> Me.tabAncien.Visible = True
>>>>>>>> End If
>>>>>>>> End Sub
>>>>>>>> Pouvez vous me donner un coup de main ?
>>>>>>>> 2e question : lorsque cet onglet est invisible je souhaiterai re ndre
>>>>>>>> invisible l'autre onglet et passer le contenu de celui-ci sur le
>>>>>>>> formulaire principal de façon a ne pas avoir 1 onglet. Une id ée ?
>>>>>>>> merci
>>>>>>>> Sandrine
>>>>>> Que tu peux optimiser en
>>>>>> Private Sub Form_Load()
>>>>>>   Me.tabAncien.Visible = not(Me.Commentaires = Null)
>>>>>>   End Sub
>>>>>> ;-)- Masquer le texte des messages précédents -
>>>>>> - Afficher le texte des messages précédents -
>>>> Et avec :
>>>> Me.tabAncien.Visible = nz(Me.Commentaires,"")=""- Masquer le tex te des messages précédents -
>>>> - Afficher le texte des messages précédents -
>> Tu laisse le controle onglet actif et tu rend invisible la page qui
>> porte le commentaire
>> me.page_de_l'onglet_commentaire.visible=nz(me.commentaire,"")<>""
>> et si la case cocher35 est cochée tu refais apparaitre la page de l' onglet.- Masquer le texte des messages précédents -

>> - Afficher le texte des messages précédents -

Ben l'astuce serait de mettre ton sous formulaire  directement dans ton
formulaire et de le cacher par defaut. De mettre par dessus ton onglet
actuel .
Tu caches ton onglet et tu 'dé-cache' ton sous-formulaire en cas de bes oin.- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -


Publicité
Poster une réponse
Anonyme