[VBA-E]Déclaration d'une plage de données

Bonjour,


Dans mon fichier Excel, j'ai nommé une plage de cellule, nommée plage qui représente par exemple :

Code:

---

Range("C3:Q17")

---

Cette plage de cellule, je l'ai nommée "Plage". Je voudrais en fait tout simplement savoir comment utiliser cette référence pour mes calculs. J'ai beau chercher un peu partout j'ai rien trouvé la dessus.

Faut-il écrire :

Code:

---

Plage.cells(1,1)

---

Par exemple pour avoir la cellule C3 ?

Et si une plage est dans une autre feuille, comment écrit-on un truc du genre :

Code:

---

sheets("Feuil1").Plage.cells(1,1)

---

Parce que j'ai essayé et ce code ne marche pas :?


Merci pour votre aide en tout cas :)

Essaie ça sur une feuille renseignée

Code:

---

1 2 3 4 5 6

Sub TravailSurUnePlage() Set plage = Range("C3:Q17") For Each LaCell In plage MsgBox LaCell.Value Next End Sub

---

... et tires-en les conséquences :mouarf:
A+

Bah le soucis c'est que je veux pas faire une boucle dessus moi :? je veux juste une cellule bien particulière qui appartient a cette plage.

De plus si c'est sur une feuille bien précise, je vois pas non plus comment faire...

Ah si je fais un :

Code:

---

Set P = Sheets("Feuil1").Range("C3:Q17")

---

ça marcherait :aie:

Je complète

Code:

---

1 2 3 4 5 6 7 8 9 10

Sub TravailSurUnePlage() Dim Plage As Range Set F1 = Worksheets("Feuil1") Set Plage = F1.Range("C3:Q17") For Each LaCell In Plage MsgBox LaCell.Value Next Set F1 = Nothing Set Plage = Nothing End Sub

---

A+

Comment tu identifies la bonne cellule dans ta plage ?
Si tu peux faire un test, fais ça

Code:

---

1 2 3 4 5 6 7 8 9

For Each LaCell In Plage If LaCell.Value = "Coucou" then 'ou If LaCell.row = 5 then 'ou If LaCell.column = ... 'ou If LaCell.adress = ... Next

---

Précise ton tourment :mouarf:

Je vais joindre un fichier tu vas comprendre :)

Tout est écrit dedans :mrgreen:

Ben, tu peux faire comme ça

Code:

---

1 2 3 4 5

Dim Cheval As Range Dim Ecurie As Range Set Cheval = Feuil1.Range("G11") Set Ecurie = Feuil1.Range("D5") Cheval.Copy Destination:=Ecurie

---

:mouarf: :mouarf: :mouarf:

Tu fais exprès c'est ça hein avoue :mrgreen:

Tiens en passant question subsidiaire : tu sais quel est le code Ascii de ce caractère justement (du cheval je parle) ? car quand je fais un "Asc" dessus, il me sort 63 (je crois, si mes souvenirs sont bons), mais si je fais un Chr(63), il me ressort pas mon caractère. Tu sais pourquoi ? ou comment le faire apparaitre en utilisant Asc, ou autre chose ? (genre un .Font ou un truc du genre)

(Pour information, ce caractère est présent, dans Word (j'ai fait un copier/Coller), dans caractères spéciaux > Arial Unicode MS > Dingbats divers (sous-ensemble) )

Ce n'est pas une question de code ascii mais une question de police
Essaie J majuscule en Wingdings et tu auras mon état d'esprit en ce moment ;)
A+

PS - Je n'ai pas réussi à identifier la police qui fournit un cheval pour 63 seulement :mouarf:

Bah oui a force de trainer ici c'est compréhensible :mrgreen:

Bon je te laisse te reposer alors ;)

Moi je part en week end A lundi :P