Fonction de feuille en VBA

Bonsoir à tous,

J'aimerais savoir pourquoi ce code n'affiche rien dans la feuille :

Code:

---

1 2	Worksheets("Feuil2").Range("N" & tRow - 1 & "X:" & tRow - 1).Name = "Prix" ActiveCell.Formula = "=AVERAGE(Prix)"

---

Merci.

Code:

---

Worksheets("Feuil2").Range("N" & tRow - 1 & ":X" & tRow - 1).Name = "Prix"

---

:X et non X:

Code:

---

1 2 3 4 5 6 7

Sub alidroos_CP() Dim tRow As Range A = ActiveCell.End(xlUp).Row Set tRow = Range(Cells(A, "N").Address, Cells(A, "X").Address) tRow.Name = "Prix" ActiveCell.Formula = "=AVERAGE(Prix)" End Sub

---

Bonsoir mercatog, alidroos

Merci pour vos réponses respectives.