logique de syntaxe vba

[lerogertroutman]

Bonjour à tous,

Le Premier code fonctionne, mais pas le second. Une âme charitable peut-elle m'expliquer pourquoi ?

Dim MaVar As Integer

MaVar = Range("A1").Row
MsgBox MaVar

Dim MaVar As Integer

MaVar = Range("A1")
MsgBox MaVar.Row

Par avance merci,
Le Roger

 

[suistrop]

Re : logique de syntaxe vba

salut,

tu dis que "mavar" c est un integer et tu lui met mavar = range("A1")... je crois il aime pastrop !

 

[Pierrot93]

Re : logique de syntaxe vba

Bonjour Roger, suistrop

pour que ton 2ème code fonctionne, il faudrait déclarer ta variable en type de donnée "range" :

Dim MaVar As Range
Set MaVar = Range("A1")
MsgBox MaVar.Row

en l'état dans ton code, comme tu n'avais pas précisé la propriété à utiliser, il renvoyait dans ta variable la propriété par défaut, c'est à dire pour ton cas la valeur de la cellule...

bon après midi
@+

 

[Bigfish]

Re : logique de syntaxe vba

Salut,

Range("A1") est un objet de la colection range, un peu comme dans la realité, une boite est un objet. Une boite peu contenir d'autre chose, peu avoir differente propriété comme: sa couleur, sa forme, sa position, etre verrouilée etc.

donc je reprends, range("a1") est un objet alors que row est une propriété de l'objet range. Cette propriété renvois la position en numero de ligne de l'objet range au quel on l'applique.

Ce que tu doits savoir:

Une varialble une fois typée, c'est a dire que l'on lui a attribuée ce qu'elle a le droit de contenir, ne peu donc contenir que le type spécifié. Par exemple:

Dim MaChaine As String
Ici MaChaine ne peu contenir que des chaine de caracteres.

Dim MesCellules As Range
Ici MesCellules ne peu contenir que des objets de la collection range.

une exception toute fois qui est le type Variant (qui est a eviter d'ailleurs) , et qui accept n'importe quel type de valeur ou d'objet.

pour attribué une valeur a une variable de type valeur (long, Integer, String etc)il suffit de faire

Dim MaValeur As Long
MaValeur=10

pour une variable typée objet (Range, Worksheet, Object etc) il faut ajouter l'instruction set:

Dim MaCellule As Range, Ligne As Long
Set MaCellule=Range("A1")
Ligne=MaCellule.Row
Msgbox Ligne

Si tu as besoin de précision n'hesite pas
A+

 

[lerogertroutman]

Re : logique de syntaxe vba

Bonjour suistrop, Pierrot, Bigfish,

Merci à tous les trois, je me demande comment j'ai fait jusqu'à présent sans avoir compris ça (En fait je sais : je n'ai pas fait grand chose).

Bigfish, c'est vraiment sympa ton explication. Non seulement elle a achevé de me faire comprendre le fonctionnement des variables, ce qu'est une variable typée objet, ce qu'est une collection, etc. mais elle m'a en outre fait comprendre quand utiliser SET (jusqu'à présent je l'utilisais pour tout et n'importe quoi, selon... mon humeur).

Bref, j'étais dans le brouillard, tu fus ma lanterne

Ce qui induit en erreur, c'est que vba semble tolérer certains écarts, comme ici :

Dim MaVar As Integer
MaVar = Range("A1").Row
MsgBox MaVar

Mais au fait, quand utilise-t-on une variable typée Object ?

Merci encore !

Le Roger

 

[Pierrot93]

Re : logique de syntaxe vba

Re

ce n'est pas un écart Roger, en la matière, "row" n'est pas un objet mais une propriété de l'objet "range", te renvoie donc la valeur de la propriété "row" de l'objet "range"...

@+

 

[lerogertroutman]

Re : logique de syntaxe vba

I got it !
Merci Pierrot