Portée des variables (string)

Bonjour,

Encore et toujours en train de développer en VBA, je suis confronté à un nouveau problème. En effet, Je suis entrain de faire le lien entre mon InterfaceGraphique2 et mon code..
Rapidement, le but de mon code est d'ouvrir un fichier txt, de le télécharger dans une de mes feuilles (écriture ou écriture2). l'idée ensuite consiste a récupérer des infos de ce fichier et de les mettre en forme.

Cependant, j'indique dans ma USF de récupérer la variable dans ma combobox1. Sachant que cette variable est le nom de fichier, je veux la réutiliser à l'aide d'une méthode PRINT pour récupérer mon fichier dans ma macro "lire_fichier_texte_1". Malheureusement je n'y arrive pas :/

Démarche à suivre en debugg:
-Ouvrir interfacegraphique2 (dans la feuille "usfrm")
-Cocher "feuille simple"
-Cocher ligne 1 ou 2
-Entrer une valeur en dur dans la combobox (Vous n'aurez pas accès a mes fichiers donc pas possible de récupérer un nom de fichier, entrer un truc du genre xxxxxx.txt)
-Valider la selection

Vous trouverez mon fichier excel ci-joint!
Pièce jointe 177040

Merci d'avance

Bonjour,

si tu veux transporter ta variable en dehors de la procédure, il faut augmenter la portée de ta variable :

- variable publique à déclarer dans un module standard
- écrire le nom du fichier dans une cellule nommée de Excel, et le réutiliser

Bonjour,
Le sujet portant sur la portabilité des variables, je ne peux que t'encourager à lire Utiliser les variables en VBA Excel et tout particulièrement le chapitre V. Les niveaux de variables

Bonjour,
pour compléter ce que mes prédécesseurs ont dit il faut voir par qui le traitement est exécuté!
si c'est le UserForm ExecuteCode Me.comboBox1. sur le bouton Click

Code:

---

1 2 3

sub ExecuteCode(MaVariable as string) 'Traitement End Sub

---

Bonjour,

Je prend bien en compte tous vos conseil! Cependant joe.levrai j'ai bel et bien déclaré ma variable en "public" dans mon fichier (module: LireFichierTexte1).. Mais cela ne change rien.
Y a-t-il un endroit précis ou déclarer cette variable ? stp

De plus en réponse à la remarque de rdurupt. Oui c'est bien a travers mon USF que j'initialise ma variable, tu peux le constater dans mon fichier joint. En revanche je n'ai pas bien compris les actions à effectuer si le traitement est effectué par ma USF. Peux-tu préciser ? stp

Merci Philippe Tulliez pour le petit cours bien utile.

Merci pour toutes les réponses!! Encore un petit coup de pouce et je penses en résoudre le problème!

Bonjour,

Citation:

---

Je prend bien en compte tous vos conseil! Cependant joe.levrai j'ai bel et bien déclaré ma variable en "public" dans mon fichier (module: LireFichierTexte1).. Mais cela ne change rien.
Y a-t-il un endroit précis ou déclarer cette variable ? stp

---

La réponse est dans le chapitre du tutoriel que j'ai donné en lien

Citation:

---

Merci Philippe Tulliez pour le petit cours bien utile.

---

attention à ne pas mélanger "portée publique" et "portée module"

Code:

---

Dim Chaine as String

---

Code:

---

Public Chaine as String

---

n'auront pas la même portée, la première se limite au module, la seconde porte sur l'ensemble du projet

Philippe Tulliez,

J'ai bien pris en compte le cours que tu m'as transmis et j'ai bien effectuer la déclaration de ma variable au même endroit que dans le cours. Cependant ça ne fonctionne pas, as-tu jeté un œil à mon fichier ?

Citation:

---

Envoyé par iliaseyah

Bonjour,

De plus en réponse à la remarque de rdurupt. Oui c'est bien a travers mon USF que j'initialise ma variable, tu peux le constater dans mon fichier joint. En revanche je n'ai pas bien compris les actions à effectuer si le traitement est effectué par ma USF. Peux-tu préciser ? stp

---

Code:

---

Call EcritureEtMiseEnForm1(OFchoisi)

---

Code:

---

Sub EcritureEtMiseEnForm1(OFchoisi As String)

---

ceci dit, tu as déclaré ta variable public dans le userform et pas dans un module standard elle n'es donc pas accessible saut par UserForma1.OFchoisi

Citation:

---

ceci dit, tu as déclaré ta variable public dans le userform et pas dans un module standard elle n'es donc pas accessible saut par UserForma1.OFchoisi

---

lorsque je la déclare dans mon module "EcritureEtMiseEnForme", elle n'est pas accessible non plus.

l'instruction "Call" avec en paramètre ma variable, je dois la placer à quel niveau? en fin de traitement du code ma USF ?

Et à quoi ressemble la ligne de code de ta déclaration de variable dans

Citation:

---

"lorsque je la déclare dans mon module "EcritureEtMiseEnForme", elle n'est pas accessible non plus."

---

que de perte de temps, dont une simple copie des codes que tu nous expliques en diminuerai la quantité.

tu la déclare une seule fois dans un module standard .
je te suggère d'ajouter un module standard qui ne contiendra que tes variable publics.

bien sur tu supprime toutes déclaration existante ailler!

Merci pour toutes les réponses, j'ai réussi !

J'aime bien l'idée des "call" avec la variable en paramètre! c'est le top !!

Juste une petite précision, peut-on passer en paramètre plusieurs variables ?

tu même ajouter des paramètres optionnels!

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Sub test() Debug.Print A("toto", ActiveCell) Debug.Print A("toto", ActiveCel, True) Debug.Print A("toto", ActiveCel, True, True) Debug.Print A("toto", ActiveCell, Test4:=False) Debug.Print A("toto", ActiveCell, Test3:=False, Test4:=False) Debug.Print A("toto", ActiveCell, Test4:=False, Test3:=False) End Sub     Function A(Test1 As String, Test2 As Range, Optional Test3 As Boolean, Optional Test4 As Boolean) As Boolean   End Function

---