Discussion :

[ericb152]

Bonjour,

voici le problème pour lequel j'aimerais avoir votre aide


Dans ma base de données, j'aimerais passer une variable type string d'un formulaire A vers B. Le formulaire B s'ouvre via un stLinkCriteria. J'ai essayé de déclaré la variable public mais je ne sais pas comment faire et ou mettre le code. j'ai essayé de la déclarer dans un module mais ... c'est une partie de VBA que je ne maitrise pas...

Il y a bien un module dans l'onglet projet de VBA mais il est vide. Mon code est au dessus classé par formulaire dans l'onglet Microsoft Access objet de classe
Ce qu'il faudrait c'est que tout le code de tout mes formulaires soit dans le même modules ? mais comment faire ?

Merci de votre aide

Eric

[loufab]

Bonjour,
Il existe plusieurs méthodes pour passer des valeurs d'un formulaire à l'autre.

La variable publique est la plus simple.
Dans un module standard (pas un module de formulaire/etat) déclarer une variable globale. Donc après les 2 lignes Option et avant la première sub/function :

Code :

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

1
2
3
4
5
6
7
Option Compare Database
Option Explicit
 
Dim mavar As String
 
Function test()
...

Pour la peupler (y mettre une valeur) depuis le formulaire A :

Code :

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

mavar = "mavaleur"

Pour l'interroger depuis le formulaire B.

Code :

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

msgbox mavar

A noter qu'on peut l'interroger de n'importe quel endroit de l'application, sauf dans une requête ou dans ce cas il faudra créer une fonction.

Autres solutions :
1) Si la valeur est dans un contrôle on peut également faire un appel direct comme ceci :

Depuis Formulaire B :

Code :

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

msgbox forms.form_A.moncontrole

2) Créer une propriété dans le formulaire. C'est un poil plus complexe.

3) Utiliser la clause OpenArgs de la commande OpenForm, mais dans ce cas la valeur est transmise qu'une seule fois lors de l'ouverture de B (depuis A généralement).

Pour la récupérer il faut utiliser la propriété éponyme dans le formulaire B.

Cordialement,

[loufab]

Je rebondi sur ta question :

Code :

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

Ce qu'il faudrait c'est que tout le code de tout mes formulaires soit dans le même modules ? mais comment faire ?

Oui et non.

Le code commun peut l'être mais dans des formulaires différents, mise à part le CRUD (cf mon tuto sur le sujet), le reste est spécifique à un formulaire (noms de controles différents, procédures métiers différentes...

[ericb152]

Yess...

ça marche, j'avais fait une erreur de syntaxe
chez moi le bon code est

Code :

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

1
2
3
4
Option Compare Database
Option Explicit
 
Public MaVariable As String

Mille merci

[loufab]

En VBA, à moins de mettre Private (à la place de Public) les variables déclarées dans l'en-tête d'un module standard sont toujours publiques.
Dim et Public sont donc équivalent.