Spécifier Range ?

Bonjour,

Je voudrais pouvoir spécifier un Range de manière a ce que la colonne et ligne peuvent varier.

Code:

---

.Range("A1:A250")

---

Je sais faire varier la ligne de la façon suivante:

Code:

---

1 2	Dim r as Integer .Range("A" & r)

---

Mais je n'arrive pas à faire varier la colonne.

D'avance merci pour vos réponses.

Bonjour à tous
Bonjour deamonRav

Un exemple parmi d'autres :

Code:

---

1 2 3 4 5 6 7 8 9

Sub essai() Dim r As Integer, s As Integer 'colonnes Dim t As Integer, u As Integer 'lignes r = 1 u = 1 s = 1 t = 4 nb = Application.WorksheetFunction.Count(Range(Cells(r, u), Cells(s, t)).Value) End Sub

---

Eric

Bonjour,
je ne sais pas si c'est ce que tu cherches mais syntaxe:

Code:

---

.Range("A1:A" & r)'si la valeur de r est connue, bien sur

---

Merci pour vos réponse, la deuxième est déjà en application.

Je vais aussi essayer la première.

Bonne journée:D

bonjour deamonRav,

il y a plusieurs méthode,

Code:

---

Range("A" & lign1 & ":A" & lign2)

---

Code:

---

Range(Cells(lign1, col1), Cells(lign2, col2))

---

Code:

---

Range(Cells(lign1, "A"), Cells(lign2, "B"))

---

Bonjour,

Code:

---

1 2 3 4 5 6 7 8

Sub brouillon()   For i = 1 To 50 For j = 1 To 50 Cells(i, j) = "DVP " & i * j Next j Next i End Sub

---

cordialement,

Didier

C'est noté, j'arrive à spécifier tous mes range comme je le souhaite.

Merci à vous tous.