Discussion :

[TRIBORD33]

Bonjour,

Je souhaite récupérer des données d'un formulaire déja ouvert dans un autre qui s'ouvre au dessus, j'ai utilisé IsOpen mais cela ne fonctionne qu'avec des données numériques, les données texte me renvoient #Nom ?
Merci pour votre aide.

[Gabout]

Bonjour et bienvenue sur le forum,

Philippe a raison, tu es guère explicite.

j'ai utilisé IsOpen

Montre-nous ce que tu as écrit. IsOpen c'était pour quoi faire ? Pour vérifier si ton formulaire était ouvert ?

Pour vérifier si un formulaire est ouvert tu peux utiliser

Code :

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

1
2
3
If CurrentProject.AllForms("Nom_du_formulaire").IsLoaded Then
   '...
End If

[TRIBORD33]

Voici le code :
"TEST" est le 1er formulaire que j'ouvre il est issu d'une table, sur ce formulaire une liste déroulante qui me permet d'afficher dans "Test01" et "test02" les informations de la table, 1 bouton me permet d'ouvrir le 2ème formulaire dans lequel je souhaite récupérer les infos "Test01 et 02" pour les compléter par une date, le 2ème formulaire est issu d'une seconde table.
Tout fonctionne bien quand les informations récupérées dans le 1er formulaire sont numériques mais j'ai le message "#NOM? quand il s'agit du format texte.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub Form_Current()
 
DoCmd.GoToRecord , , acNewRec
 
 
 
    If IsOpen("TEST") Then
 
Test01.DefaultValue = Forms!TEST!Test01!
 
    End If
 
If IsOpen("TEST") Then
 
Test02.DefaultValue = Forms!TEST!Test02!
 
    End If
 
End Sub

Voila en espérant avoir été plus précis.
Par avance merci pour votre aide.

[Gabout]

Bonjour,

L'aide en ligne de IsOpen

Cette propriété a la valeur True si le projet HTML spécifié est ouvert dans Microsoft Script Editor. Type de données Boolean en lecture seule.

Manifestement, tu n'es pas dans un projet HTML ! Utilise le code que je t'ai transmis.