Discussion :

[Transitoire]

Bonjour a tous.
J'ai un problème, j'ai modifié mon programme de comptabilité. Je passe par une variable publique, pour déterminer le livre comptable choisi dans une liste.

Code :

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

Public JrlChoix As String

J'ai deux type de documents:
Banque/Caisse, pas de problème, jamais.
Achats/OD/RAN, la, j'ai un problème.
Je choisi dans la liste, le journal et le mois, J'arrive sur la page Achats le bon mois.
J'écrit la première saisie, tout va bien, "JrlChoix" m'inscrit "ac" parfait. je valide et lorsque je démarre la deuxième saisie, la plus rien ne s'inscrit. la valeur de la variable est semble-t-il revenu a "".
Le code Achats est à peu près identique a Banque/Caisse, et je ne m'explique pas pourquoi cette différence. J'ai bien sur vérifié que je ne remettais pas a "" la variable par une erreur d'écriture???
Donc, si quelqu'un connaissait une raison possible de perte de valeur de variable, ça m'aiderais.
merci d'avance
Cordialement

[Philippe Tulliez]

Bonjour,
Une explication possible, la déclaration d'une variable locale homonyme
Exemple

Code :

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

1
2
3
4
5
6
7
Option Explicit
Public jl As String
Sub Main()
 jl = "Toto"
 test2
 test1
End Sub

Code :

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

1
2
3
4
Sub test1()
 Dim jl As String
 MsgBox jl
End Sub

Code :

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

1
2
3
Sub test2()
 MsgBox jl
End Sub

[Transitoire]

Bonsoir,
Cher Philippe, je n'ai pas trouvé de variable homonyme, mais cela m'a permis de me rendre compte que je n'ai pas seulement une variable qui se vide, mais j'ai un problème plus général.
Un merci quand même pour votre réponse, je continue mes recherches et ne manquerai pas de vous tenir informé.
Cordialement

[Transitoire]

Bonjour.
Pour vous tenir informé, mon problème vient me semble-t-il du fait que ayant scindé une macro très longue en une succession de macro réutilisable pour d'autres afin d'éviter éviter les redondances, j'ai remplacé des Exit Sub par des End. Ce qui semble-t-il a pour effets, entre autres de vider les Variables et de perturber les "selon.touche"(OnKeys) qui sont à la base de l'automatisme du fonctionnement de mon classeur.
https://docs.microsoft.com/fr-fr/off.../end-statement
Tout est donc redevenu "pour le mieux dans le meilleur des mondes possibles" (Panglos, le philosophe heureux).
Je vais donc reprendre la modernisation et la propreté du code de mon usine à gaz personnel.
Cordialement