Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > IHM
IHM Ce forum est dédié aux questions relatives à la création de formulaires et d'états, avec ou sans code VBA, et macros.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 29/11/2011, 16h15   #1
Membre à l'essai
 
Inscription : septembre 2008
Messages : 102
Détails du profil
Informations personnelles :
Localisation : France, Haute Garonne (Midi Pyrénées)

Informations forums :
Inscription : septembre 2008
Messages : 102
Points : 21
Points : 21
Par défaut Besoin d'aide pour une condition entre deux formulaires

Bonjour les developpezien(ne)s,

Voici mon problème

J'ai deux formulaire A et B
A est minimisé afin de saisir sur B
je voudrai lorsque je ferme le formulaire B que A s'ouvre en grand mais si A n'est pas ouvert qu'il ne fasse rien à ce moment là

Comment faire?

je vous remercie par avance de votre aide
spacesheep est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 29/11/2011, 17h50   #2
Membre éclairé
 
Homme Michel
Développeur informatique
Inscription : février 2008
Messages : 263
Détails du profil
Informations personnelles :
Nom : Homme Michel
Localisation : France, Hérault (Languedoc Roussillon)

Informations professionnelles :
Activité : Développeur informatique
Secteur : Finance

Informations forums :
Inscription : février 2008
Messages : 263
Points : 309
Points : 309
Peut-être un truc de ce genre ?

Code :
1
2
3
4
If CurrentProject.AllForms("Ton Formulaire").IsLoaded = True Then
    DoCmd.OpenForm ("Ton Formulaire")
    DoCmd.Maximize
End If
J'ai pas testé... à tenter peut-être

Michel
Orion34080 est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 30/11/2011, 15h38   #3
Membre à l'essai
 
Inscription : septembre 2008
Messages : 102
Détails du profil
Informations personnelles :
Localisation : France, Haute Garonne (Midi Pyrénées)

Informations forums :
Inscription : septembre 2008
Messages : 102
Points : 21
Points : 21
Merci orion34080,

ça marche nickel chrome si on le met bien la où il faut ^^

Code :
1
2
3
4
5
6
7
8
Private Sub Form_Close()
 
 
If CurrentProject.AllForms("mon_frm").IsLoaded = True Then
DoCmd.OpenForm ("mon_frm"), , , , , acWindowNormal
End If
 
End Sub
spacesheep est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 00h32.


 
 
 
 
Partenaires

Hébergement Web