Bonjour,
J'aimerais savoir si on peut à la fois vérifier une valeur et en affecter une autre en une seule ligne de code.
En fait j'ai :
Le but étant, avec des CASE pareil (je suis obligé) d'avoir la case suivante du tableau remplie
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 'Boucle FOR sur variable i (integer) Select Case texte Case "nom" if (tableau(1,1) <> "") 'Si la case est vide tableau(1,1) = wsExcel.Range("C" & i).Value Case "nom" if (tableau(1,2) <> "") 'Si la case est vide tableau(1,2) = wsExcel.Range("C" & i).Value 'Suite du code 'Fin boucle FOR
Si nom existe déja en tableau(1,1), la variable nom suivante sera mise en position (1,2)
Je voudrai donc contracter la condition de nullité et l'affection en une seule ligne, du genre :
Je sais pas si je suis clair
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 if (tableau(1,2) = wsExcel.Range("C" & i).Value <> "")
Partager