Discussion :

[dj_djocker]

Bonjour,

J'ai créé une petite base de donnée avec plein de formulaire et un menu d'acces. Tout vas bien mis a part que je voudrai n'avoir qu'un formulaire et ensuite changer de sous-formulaire en fonction du bouton sur le quel je click.

Mais lorsque je fais ça :

Code :

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

1
2
 
    SF.SourceObject = Forms![01 - Registre d'Exploitation].Object

Access m'envoie le message suivant : "Impossible de trouver le formulaire ..."
Alors que le nom du formulaire vien d'un copier/coller

Quelqu'un a-t-il une solution pour moi?

Merci d'avance

[Dolphy35]

Salut,

plusieurs solutions :

Comment changer la source d'un sous-formulaire ?

tu cache les sous-form et tu rend visible le sous-form voulu en fonction du bouton.

Dolphy

[dj_djocker]

D'abord merci Dolphy.

Mais, parcequ'il y à toujours un mais avec moi, je suis assez perfectioniste et je voudrai alleger un maximum le codage de mon programme et passer par un serie de sous formulaire me ferai tapper un 10éne de ligne pour changer de formulaire contre un seule avec ce que je cherche. Ce que vous me proposez donnerai :

Code :

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

1
2
3
4
5
 
Sf1.Show()
Sf2.Hide()
...
Sfn.hide()

[Invité]

D'abord merci Dolphy.

Mais, parcequ'il y à toujours un mais avec moi, je suis assez perfectioniste et je voudrai alleger un maximum le codage de mon programme et passer par un serie de sous formulaire me ferai tapper un 10éne de ligne pour changer de formulaire contre un seule avec ce que je cherche. Ce que vous me proposez donnerai :

Code :

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

1
2
3
4
5
 
Sf1.Show()
Sf2.Hide()
...
Sfn.hide()

Bonjour,

Tu es sous Access ?

Car ton code pour ouvrir ton formulaire c'est pour des UserForm Excel ou du VB6.

Starec

[dj_djocker]

Tu es sous Access ?

Car ton code pour ouvrir ton formulaire c'est pour des UserForm Excel ou du VB6.

Oui je suis sous access 2003 le code que je montre est un exemple que j'ai utilisé dans un hautre programme, et ce que je cherche a faire est en VB

[dj_djocker]

Ca y est j'ai trouvé par moi même, il est vraiment possible de faire ce que je voulai et même trés simplement. Et en un seule ligne, en fait je m'était trompé sur le format à envoyer a la propriété sourceobject.

Pour ceux qui voudron le faire par le futur voici la solution :

Code :

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

SF.SourceObject = "non_du_formulaire_sans_crochets"

[francishop]

Bonjour,

Bravo! C'est exactement ça. Notre sous formulaire--> sfrm_Change garde toujours le même nom ce qui donne :

Code :

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

1
2
3
4
5
Private Sub cmd_sfrmDeux_Click()
    If Me.sfrm_Change.SourceObject <> "sfrm_Deux" Then
       Me.sfrm_Change.SourceObject = "sfrm_Deux"
    End If
End Sub

Cordialement.