Discussion :

[halaster08]

Je ne sais pas si ce sujet a sa place ici mais comme j'ai rencontré ce cas en faisant du VBA, je pose ma question ici.

Ayant oublié de déclarer une variable de boucle (qui est utilisée dans un calcul) je me retrouvé avec le problème énoncé dans le titre: 2012 n'est pas égal a 2012, après déclaration de ma variable le problème est résolu mais n'étant pas informaticien de formation j'ai du mal a saisir pourquoi.

Le premier 2012 vientd'un TCD (.PivotItems(i).Value) et l'autre est un calcul (y - j) avec y un integer j un variant.
A partir du moment où j est déclarée int, long, double pas de problème mais si j est non déclaré ou déclaré variant alors j'obtient l'erreur. En fait ce que je ne comprends pas c'est en quoi 2012 integer est différent de 2012 variant? De plus si j'ai du controle sur la déclaration de mes variable, je n'en ai aucun (a ma connaissance) sur le type de .PivotItems(i).Value, est-il possible de voir quel type vba donne à cette valeur? et est-il possible de forcer un certain type? (sans passer par une variable intermédiaire)

Merci d'avance.

[joe.levrai]

Bonjour,

c'est probablement car la valeur de ton TCD n'est pas un "nombre" mais un "texte" ?

pour vérifier, il te suffit d'interroger le Type de ta variable :

Code :

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

MsgBox TypeName(MaVariable)

tu verras si c'est un String implicite ou pas ... ce qui explique l'erreur si tu veux le soustraire d'un Integer (Incompatibilité de type)

Forcer un type, oui c'est possible, il te suffit d'utiliser les Fonctions de Conversion (regarde dans l'aide toutes les fonctions de conversions disponibles)

par exemple :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
'Forcer un Integer
CInt(MaVariable)
 
'Forcer un Booleen
CBool(MaVariable)
 
'Forcer un Long
Clng(MaVariable)
 
'Forcer une date
CDate(MaVariable)

[halaster08]

Grand merci a toi Joe.

Effectivement la valeur de mon TCD était considérée comme du texte.