Variables d'adresses récalcitrantes

Bonjour,

Le code ci-dessous fonctionne:

Code:

---

ActiveWorkbook.Worksheets("2017").Sort.SortFields.Add Key:=Range("C2:C234"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

---

Tandis que celui-ci se plante:

Code:

---

ActiveWorkbook.Worksheets("2017").Sort.SortFields.Add Key:=Range(Cells(2, 3), Cells(NbMaxLigne, 3)).Address(RowAbsolute:=False, ColumnAbsolute:=False), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

---

Quelqu'un a une idée de ce qui manque ? des guillemets ? Si oui, je ne vois pas comment les ajouter.

Merci d'avance pour votre réponse.

Henri

bonjour,

dans ton code qui fonctionne, pourquoi tu ne remplaces pas que Range("C2:C234") par Range(Cells(2, 3), Cells(NbMaxLigne, 3)) ?

@+JP

Tu as raison, merci.
Il suffisait d'enlever .Address(RowAbsolute:=False, ColumnAbsolute:=False) et ça fonctionne.

Bonne soirée et encore merci.

Henri