Discussion :

[monichou86]

Bonjour,

J'aimerais comprendre l'utilisation de cells pour la manipulation des cellules à travers ce code:

Code :

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

1
2
3
4
5
6
If Sheets("Actions").Cells(i%,1).Value<>"Reunion" Then
theme=Sheets("Actions").Cells(i%,3).Value
End If
Else
i%=i%+1
Wend

Merci

[ouskel'n'or]

If Sheets("Actions").Cells(i%,1).Value<>"Reunion" Then

i% correspond au N° de ligne en entier (ne pourra pas dépasser 32768)
Avec Range ça ferait :

Code :

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

    If Sheets("Actions").Range("A" & NoLigne).Value <> "Reunion" Then

Pour le reste :

theme=Sheets("Actions").Cells(i%,3).Value

Code :

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

    theme=Sheets("Actions").Range("C" & NoLigne).Value

i%=i%+1

Code :

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

    NoLigne = NoLigne + 1

Bonne journée

[monichou86]

Désolé mais Je ne saisi toujours pas ce que fais le code suivant:

Code :

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

If Sheets("Actions").Cells(i%,1).Value<>""

Merci

[ouskel'n'or]

Sans vouloir te heurter de plein fouet, tu devrais lire quelques bouquins d'initiation à VBA.
Mais allons-y

Code :

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

If Sheets("Actions").Cells(i%,1).Value<>""

If => Si
Value => la valeur ou le contenu
Cells => de la cellule
i% => n° de ligne = i
,1 => n° de colonne 1 (soit A)
Soit la Cellule A1
Sheets => de la feuille
("Action") => qui se nomme "Actions"
<> => différente (on parle de la valeur)
"" => vide
Then => Alors... la suite
Résumé : Si la cellule A & N° de ligne i de la feuille Actions n'est pas vide alors...
Bonnes études

[monichou86]

Oui je sais mais c'est juste que je butes sur unproblème que je pense être simple à régler mais je voulais voir si j'avais bien compri!!

Merci pour ton aide!!