Utilisation de cells

Bonjour,

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

Code:

---

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:D

Citation:

---

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:

---

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

---

Pour le reste :

Citation:

---

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

---

Code:

---

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

---

Citation:

---

i%=i%+1

---

Code:

---

NoLigne = NoLigne + 1

---

Bonne journée

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

Code:

---

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

---

Merci

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

Code:

---

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

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!!