XL 2016 Variable vide pourquoi ?

BARNS · 10 Septembre 2021

Bonjour tout le monde,

J'ai réalisé un logiciel pour calculer une liste de matériel sans rentrer dans les détails non nécessaire voilà mon problème :

Je défini une variable :

VB:

With Sheets("datas")
    For x = 1 To 16 'Range("Tab_Cannes_Mont").Rows.Count
        If Range("Choix_montage").Value = .Cells(x, 15) Then k = .Cells(x, 14)
    Next x
Range("Montage_num") = k

La valeur que je trouve est donc accessible par trois chemins :
– par la cellule qui est défini par Range("Montage_num")
– par la variable k
– par la variable "Montage_num"

Donc j'ai bien à un moment donné :

L31

Or plus bas dans mon code (dans un autre module)

[...]

Tout ces endroits sont vides avec :

Code:

If Not Sheets("Datas").Cells(21, 14).Value = 21 Or k = 21 Or Range("Montage_num") = 21 Then Exit Sub

L196

Je ne comprends pas. J'ai eu le problème avec ma variable k, j'ai donc inscrit la valeur sur une cellule ca ne marchait toujours pas j'ai donc nommé cette cellule, ca ne marche toujours, j'ai fouillé à droite à gauche sans succès je viens donc vous voir.

Ces partie de code sont dans le modules M03_LongCannes dans le fichier joint.

Pour lancer le code : cliquer sur Etape 1 puis 2 puis 3.

Merci pour vos précieux conseils.

mapomme · 10 Septembre 2021

Bonjour @Barnes,

Code examiné vite fait...

Vous déclarez k comme une variable publique en tête du module M03_LongCannes

Vous exécutez la procédure Sub LongCannes() dans laquelle vous affectez une (ou non) une valeur à k
Mais en tête de cette procédure, vous re-déclarez la variable k. Cette déclaration est prioritaire dans cette procédure qui va utiliser ce k "local". A la sortie de la procédure, ce k local est retiré de la pile puisque c'est une variable locale. Sa valeur est définitivement perdue.

Quand ensuite, vous utilisez k dans la procédure Sub dico_tubes2(), vous utilisez la variable k...

shinozak · 10 Septembre 2021

Bonjour,

Passe ta variable k en public

VB:

Public k as integer

sub xxx
'ton code'
end sub

mapomme · 10 Septembre 2021

Bonjour @Barnes,

Code examiné vite fait...

Vous déclarez k comme une variable publique en tête du module M03_LongCannes

Vous exécutez la procédure Sub LongCannes() dans laquelle vous affectez une (ou non) une valeur à k
Mais en tête de cette procédure, vous re-déclarez la variable k. Cette déclaration est prioritaire dans cette procédure qui va utiliser ce k "local". A la sortie de la procédure, ce k local est retiré de la pile puisque c'est une variable locale. Sa valeur est définitivement perdue.

Quand ensuite, vous utilisez k dans la procédure Sub dico_tubes2(), vous utilisez la variable k déclarée publique.

A cette variable publique k n'a jamais été affecté une quelconque valeur. Donc elle est vide et le restera.

Déclarer le même nom de variable à deux endroits (publique en tête de module et localement dans une procédure) aboutira à 99% à une erreur ou incohérence de résultat (pas d'exécution) très difficile à repérer (à moins de savoir très exactement ce qu'on fait).

BARNS · 17 Septembre 2021

Oui okay tout ceci fait sens.

Merci pour vos réponses le problème est solutionné.

Bon week end à tous

XL 2016 Variable vide pourquoi ?

BARNS

XLDnaute Junior

Pièces jointes

mapomme

shinozak

XLDnaute Occasionnel

mapomme

XLDnaute Barbatruc

BARNS

XLDnaute Junior

Discussions similaires