decalaration variable

[Sarlone]

bsr
j'ai une variable "Cell_Moy" qui est utilisée dans une feuille et 2 modules
je dois la déclarer ou ?
dans thisworbook?

Public Cell_Moy As Range?

merci

 

[Pierrot93]

Re : decalaration variable

Bonjour Sarlone,

Avec ce que tu nous dis, je la déclarerais peut être sur la première ligne d'un module standard...

bonne journée
@+

 

[Sarlone]

Re : decalaration variable

re
ca ne marche pas .

d
ans ma feuille 1, j'ai une procedure :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Cell_Moy = Range(Cells(7, 21), Cells(7, 256).End(xlToLeft)).Find("moyenne")
................
If Not Application.Intersect(Target, Range(Cells(11, 2), Cells(60, Cell_Moy.Column))) Is Nothing Then......................;;;

End Sub



dans cette meme feuille, une autre procédure :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Not Application.Intersect(Target, Range(Range("U7"), Cell_Moy)) Is Nothing Then..........
End Sub



Dans un module (affichage) , il y a une procedure

Sub Surlignage_Ligne
Set champ = Range(Cells(11, 2), Cells(60, Cell_Moy.Column))
.....End Sub


Si je mets Public Cell_Moy As Range dans le module,
ca plante
idem si je le mets dans la feuille

Que dois je faire ? merci

A+

 

[Pierrot93]

Re : decalaration variable

Re,

Ca plante... ca veut dire quoi ??? message d'erreur ? quel est-il ? sinon je ne vois dans ton code aucune instruction correcte initialisant ta variable.... pour initialiser une variable de type "range" il faut faire préceder l'instruction de "set"...

Set Cell_Moy = Range("A1")

bon après midi
@+

 

[Sarlone]

Re : decalaration variable

re
manquait le set
merci