Discussion :

[brulien]

Bonjour a tous,

Je vous appelle a la rescousse car je m'arrache les cheveux. J'ai fait un petit programme VBA tout con hier et aujourd'hui je reviens et plus rien ne fonctionne, et voire même c'est tout VBA qui déconne. Exemple, la fonction suivante :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Function test() As Integer
    test = 0
 
    Dim variable1 As Integer
    variable1 = 1
 
    If variable1 = 1 Then
        MsgBox ("Tout va bien")
    Else
        MsgBox ("Ca deconne")
    End If
 
    MsgBox (variable1 & (variable1 = 1))
End Function

Elle me renvoit "Ca déconne" et "1 Faux" ce qui est totalement incohérent.

Et c'est hyper bizare, quand j'affiche les variables locales, elles sont "doublées", il existe une copie de la variable1 de type variant :



Comme si VBA avait créé une copie de ma variable et y faisait référence juste pour les tests de condition...

quelqu'un a-t-il une idée ?

Bonne soirée !

[brulien]

C'est a n'y rien comprendre, maintenant la msgbox "MsgBox (variable1 & (variable1 = 1))" m'affiche "1 Vrai", mais continue à m'afficher "ça deconne"

[Menhir]

A quoi correspond l'astérisque dans ton If du code que tu as copié ?
Pourquoi dans le code de ta copie d'écran y a-t-il un double espace entre la variable et le = ?

[brulien]

C'est une erreur de copie ...

Pour l'espace je ne sais pas pourquoi il était la ...

[brulien]

Bingo ! C'était juste l'espace, c'est fou ! ça peut faire bugger VBA à ce point ??

[joe.levrai]

Bonjour,

supprime cet espace

bien que normalement il n'est pas censé rester quand tu changes de lignes .... c'est ça qui te crée une seconde variable1 (avec un espace derrière)


EDIT : oups, t'as fait la modif et c'était ça, tant mieux