Discussion :

[Anduriel]

Salut,
Je récupère des valeurs de certains champs dans des variables sur une feuille secondaire. Je la ferme et je voudrai afficher à un moment quelconque ces variables sur ma feuille principale.
J'ai essayé avec une variable mais ça plante.
Quel est le moyen ou m'y suis-je mal pris?

Merci

[Tofalu]

Sans plus de détails ... difficile ...

Où sont déclarées tes variables ? Ce sont des propriétés de la feuille principale ? Elles sont dans un module ? Publique ?

[zazaraignée]

Salut

Tant que ta feuille est chargée en mémoire (visible ou non), tu peux accéder à ses variables globales en nommant d'abord le nom de la feuille:

Code :

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

VarLocale = NomFeuille.VariableGlobale

Tes variables globales se comportent comme des propriétés de ta feuille.

[Anduriel]

Sur une feuille secondaire j'ai une variable: Dim VarGlobales(0 To 4) As String que je définis.
Je ferme ce formulaire et sur le formulaire principal je veux réafficher n'importe quand ces variables.

@Zazaignée: d'après ce que j'ai compris j'ai mis sur ma feuille principale après avoir fermé la secondaire: MsgBox (Form2.VarGlobale(0)) mais il me dis Méthode ou membre de donnée introuvable.

Merci à vous.

[sovo]

essai ceci :
sur ta feuille secondaire tu déclare ta variable

Code :

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

1
2
 
Public  VarGlobales(0 To 4) As String

et sur ta feuille princimal tu l'appel

Code :

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

1
2
 
MaVar = FeuilleSecondaire.VarGlobales(0)

[Anduriel]

La variable public je dois bien la déclarer en dehors de toute procédure? J'ai lu le tutoriel des varaibles mais il ne parlent pas précisément des variables globales.
Mais si je la déclare en Dehors, j'ai une erreur, et si je la met Dans une procédure Private Sub ça plante aussi.

Dois je mettre la déclaration dans une fonction publique ou pas?
Je suis égaré là

[sovo]

euh chez moi ca marche impect.

dit moi est que ta variable varGlobales est modifier dans la feuille secondaire ??car peut etre que ca marche mais comme ta variable est vide tu ne t'en rend pas compte.

[Anduriel]

Mais ou je définis

Code :

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

Public VarGlobal(0 To 4) As String

?

Quand je le met en dehors de tout j'ai une erreur à l'exécution...

[AlainTech]

Quand tu parles de récupérer des valeurs de "champs", s'agit-il de contrôles (comme des textbox)?

Si c'est le cas, inutile d'utiliser des variables.

Il suffit de faire Form2.Hide et d'utiliser tous les noms de contrôles de Form2 dans Form1.

Le problème des questions que tu poses, c'est qu'elles sont toujours très vagues et presque jamais accompagnées de code.
On est donc obligé d'essayer de deviner ce que tu veux faire.

Essaye, à l'avenir, d'être un peu plus explicite, tu n'en seras que mieux aidé.

[sovo]

tu doit declarer ta variable dans la partie declaration. Juste en dessous de "Option explicit" (si tu l'utilises) sinon tout en haut.

et quel est l'erreur que tu as ??

[Anduriel]

J'ai l'erreur quand je mes ma variable en tableau:

Code :

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

Public VarGlobal(0 To 4) As String

Mais quand je mets

Code :

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

Public VarGlobal As String

le programme se lance.

L'erreur est justement:

Des constantes, chaines de longeur fixe, tableaux, types définis par l'utilisateur et insctructions Declare ne sont pas autorisés comme membres Public de module d'objet

[sovo]

oui c'est vrai si tu veux utiliser le contenu d'un champs (textbox, combobox etc ...).

tu doit d'abord cacher le feuille en question (suttout ne pas la decharger en memoire sinon ca ne vaut plus la peine). comme le dit AlainTech.

Ensuite faire un truc de ce genre :
form1.text1.text si tu veux veut utiliser le textbox 1 du formulaire 1.

Vraiment faudrais etre plus clair dans tes questions

[Anduriel]

Mais pourtant je me trouve clair
Mais ça ne fait pas tourner du programme pour rien? Je veux dire la cacher...

Mais merci je vais essayer

[sovo]

pour resoudre enfin (je l'espere) ce probleme.
concernant cette erreur :

Des constantes, chaines de longeur fixe, tableaux, types définis par l'utilisateur et insctructions Declare ne sont pas autorisés comme membres Public de module d'objet

procedure à suivre

1. cree un module (simple).
2. declrare ton tableau : Public VarGlogales (0 to 4) as string
3. Maintenant dans tous tes formulaires pour avoir acces a cette variable, fait comme si elle etait locale. C'est a dire tu fait juste
MaVar = VarGlobales(0)

[Anduriel]

Ah oui en effet ça fonctionne là.
Mais ça entraine un autre problème: sur mon formulaire principal j'ai dans mon menu "Quitter" qui renvoit vers ce code:

Code :

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

1
2
Unload Me
End

Donc là mon programme se ferme entièrement.
Mais si je ne fais pas quitter à partir du menu mais que je clique sur la croix rouge en haut à droite, ce form principale disparait mais mon form secondaire tourne toujours.
Je ne sais pas comment execiter des action sur la pression de ce bouton...

[Anduriel]

pour resoudre enfin (je l'espere) ce probleme.
concernant cette erreur :

Des constantes, chaines de longeur fixe, tableaux, types définis par l'utilisateur et insctructions Declare ne sont pas autorisés comme membres Public de module d'objet

procedure à suivre

1. cree un module (simple).
2. declrare ton tableau : Public VarGlogales (0 to 4) as string
3. Maintenant dans tous tes formulaires pour avoir acces a cette variable, fait comme si elle etait locale. C'est a dire tu fait juste
MaVar = VarGlobales(0)

Ah j'ai écris trop vite. Par contre, qu'entends-tu par module? Tu veux dire que je dois refaire un Form pour ça?

[sovo]

apparement tu n'utilise pas une feuille MDI.

mais c pas grave essai ceci :

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
 
private form1_Unload()
     end 
end sub
 
' ca devrai marche mais si ca ne marche pas essai ca :
'plus pratique il decharge toutes les autre formulaire en memoire
 
private form1_Unload()
    dim ctl as form
 
    for each ctl forms
            unload ctl 
    next
end sub

[sovo]

Ah j'ai écris trop vite

Quoi ca ne marche plus ??

qu'entends-tu par module?

un plus plus gros please.

pour creer un module tu fait :

1ere methode :
- fait un clic droit sur l'explorateur des projets
- ensuite choisi ajouter
- click sur module et cole le code

2eme methode
- sous edition il y a une icone (ajouter une feuille)
- click sur module et cole le code

[Anduriel]

C'est bizarre aucun de ces codes ne fonctionnent...

[sovo]

Quel code ??

ceux ci

mais c pas grave essai ceci :

Code:

private form1_Unload()
end
end sub

' ca devrai marche mais si ca ne marche pas essai ca :
'plus pratique il decharge toutes les autre formulaire en memoire

private form1_Unload()
dim ctl as form

for each ctl forms
unload ctl
next
end sub

un instant je vais faire des test.