constante pour macro

bonjour

Code:

---

Public Const pat = "A6" & ":H500"

---

ceci est dans un module ou il y a toutes mes constantes

Je souhaite pouvoir l’utilise dans des macros de ce type

Code:

---

1 2 3 4 5

Sub tdatecotisations() ' tdatecotisations Macro Application.Goto Reference:="pat" ActiveWorkbook.Worksheets("Cotisations").Sort.SortFields.Clear Excetera … End Sub

---

Svp pourquoi il ne veut pas de ma constante svp
es qu'il y a des déclarations ?

Bonjour,

une constante ne peu être calculée :

Code:

---

Public Const pat = "A6:H500"

---

pas de guillemets autour du nom de variables ...:

Code:

---

Application.Goto Reference:=pat

---

bonjour et merci

référence non valide ?
cela bloque sur la ligne la

Code:

---

Application.Goto Reference:=pat

---

es qui il ya une declaration sur la feuille ?

à quoi sert cette ligne ?? tu fais un diaporama ? pourquoi as tu besoin de changer de cellule active?

c'est tout simplement le début d'un trie de colonne

Bonsoir,

Citation:

---

Envoyé par pilounet54

bonjour et merci
référence non valide ?
cela bloque sur la ligne la

Code:

---

Application.Goto Reference:=pat

---

es qui il ya une declaration sur la feuille ?

---

Si

Code:

---

Public Const pat = "A6:H500"

---

Je pense que c'est

Code:

---

Application.Goto Reference:=Range(pat)

---

merci beaucoup cela fonctionne @+
:ccool: