Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Fermer un "Form"

Fermer un "Form"

2 réponses
Avatar
Mario Limoges
Bonjour à tous, A97

Dans mon appli. Sur la fermeture d'un form les lignes suivantes s'exécutent

Private Sub BSortie_Click()
On Error GoTo Err_bouton_quiter_Click
If MsgBox("voulez vous imprimer le formulaire ", vbYesNo, "Impression")
= 6 Then
Visible = True
DoCmd.OpenReport "Inter", acPreview
Else
DoCmd.Close
End If
Exit_bouton_quiter_Click:
Exit Sub

Et à la fermeture de l'état je cherche le moyen de fermer la forme appelante
mais je ne réussi qu'à la rendre invisible par cet commande

Private Sub Report_Close()
Forms("Formulaire inter").Form.Visible = False
End Sub

Ma question, existe il un moyen de fermer complètement la form appelante au
lieu de la rendre invisible. Sinon qu'elle est l'impact de laisser la forme
ouverte mais invisible.

Merci à l'avance
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Le Méruvien
bonjour,
a la propriété sur fermeture de l'état, tu met
docmd.close acform "nomduform"

"Mario Limoges" <mario.limoges(suprimer)@sympatico.ca> a écrit dans le
message de news: #
Bonjour à tous, A97

Dans mon appli. Sur la fermeture d'un form les lignes suivantes
s'exécutent


Private Sub BSortie_Click()
On Error GoTo Err_bouton_quiter_Click
If MsgBox("voulez vous imprimer le formulaire ", vbYesNo,
"Impression")

= 6 Then
Visible = True
DoCmd.OpenReport "Inter", acPreview
Else
DoCmd.Close
End If
Exit_bouton_quiter_Click:
Exit Sub

Et à la fermeture de l'état je cherche le moyen de fermer la forme
appelante

mais je ne réussi qu'à la rendre invisible par cet commande

Private Sub Report_Close()
Forms("Formulaire inter").Form.Visible = False
End Sub

Ma question, existe il un moyen de fermer complètement la form appelante
au

lieu de la rendre invisible. Sinon qu'elle est l'impact de laisser la
forme

ouverte mais invisible.

Merci à l'avance




Avatar
mario limoges
Effectivement et c'était simple surtout très claire dans l'aide d'Access
Merci encore

"Le Méruvien" a écrit dans le message de
news:4010cffb$0$28716$
bonjour,
a la propriété sur fermeture de l'état, tu met
docmd.close acform "nomduform"

"Mario Limoges" <mario.limoges(suprimer)@sympatico.ca> a écrit dans le
message de news: #
Bonjour à tous, A97

Dans mon appli. Sur la fermeture d'un form les lignes suivantes
s'exécutent


Private Sub BSortie_Click()
On Error GoTo Err_bouton_quiter_Click
If MsgBox("voulez vous imprimer le formulaire ", vbYesNo,
"Impression")

= 6 Then
Visible = True
DoCmd.OpenReport "Inter", acPreview
Else
DoCmd.Close
End If
Exit_bouton_quiter_Click:
Exit Sub

Et à la fermeture de l'état je cherche le moyen de fermer la forme
appelante

mais je ne réussi qu'à la rendre invisible par cet commande

Private Sub Report_Close()
Forms("Formulaire inter").Form.Visible = False
End Sub

Ma question, existe il un moyen de fermer complètement la form appelante
au

lieu de la rendre invisible. Sinon qu'elle est l'impact de laisser la
forme

ouverte mais invisible.

Merci à l'avance