Discussion :

[EGSway]

Bonjour !
J'ai un sous formulaire qui prend de la place sur mon formulaire principal.
Ce que j'aimerais obtenir c'est que lorsque j'ouvre mon formulaire principal, je puisse appuyer sur un bouton qui restaure mon sous formulaire et qu'à l'inverse je puisse le réduire une fois les données rentrées.
Merci par avance de votre aide !!

[Renardo]

Bonjour
tu crais un bouton a basule pour le rendre visible ou invisble
Genre

Code :

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

1
2
3
4
5
if me.NomBascule = 0 then
me.NomSousForm.Visible=true
else
me.NomSousForm.Visible=False
end if

[EGSway]

Désolée mais je ne suis pas très douée...
Le code je le met où? Est ce que je dois cliquer sur droit sur mon sous formulaire et cliquer sur creer un code évènement???

[Renardo]

Tu dois creer un bouton a bascule Et sur la propriete Sur Clic du bouton a bascule tu clicsur les 3 petit point et tu selectionne generateur de code
Et tu colle le code dedans
n'oubli pas de mettre le nom reel du bouton a bascule ici(Bascule5)
et le nom reel du sous form ici(NomSousForm)

Code :

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

1
2
3
4
5
6
7
8
Private Sub Bascule5_Click()
If Me.Bascule5 = 0 Then
Me.NomSousForm.Visible = True
Else
Me.NomSousForm.Visible = False
End If
 
End Sub

[EGSway]

J'obtiens un message d'erreur.
Je ne sais pas où j'ai fait l'erreur dans le code.

[Renardo]

Dans l'editeur vba tu as deux fois

Code :

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

Private Sub Bascule51_Click()

il y en a un avec le code l'autre sans rien suprime celui qui n'a pas de code
Mais etant donnee que je ne voix pas grand chose sur les 2 images que tu as mis je te joint une demo

[EGSway]

Dans le code il y a d'inscrit sousform.visible = true et sousform.visible = false.
Mais comment faire pour le réduire (le rendre invcisible)?

[Renardo]

A tu regarde la demo que je t'est mis ?

[EGSway]

Oui mais je crois que ca ne marche pas car elle est toujours visible

[Renardo]

Il faut apuyer une fois sur le bouton (vue sous form )pour le rendre invisible et une deuxieme fois pour le rendre visible