Utiliser une cellule active

Bonsoir

je suis un peu embeté par quelque chose de peut etre tout simple : dans mon bout de programme je fais appel à l'instruction

application.goto cel

l ou

cell 

est la cellule que je veux atteindre ( jusque la pas de soucis elle est bien

entourée )ensuite je voudrai utiliser celle meme cellule sans la nommer (par ses coordonnées) dans d'autres instructions , alors

j'ai par exemple ecris au debut :

with  sheets("points obtenus").activecell      
If .Interior.ColorIndex = 6 Then

etc ....

ca ne marche pas car l'instruction ]

with  sheets("points obtenus").activecell

est rejetée par le compilateur

Voyez vous une methode ou manière d'ecrire cela ?

Merci pour vos réponses

Bonjour,

Tu n'as pas à faire référence à la feuille qui contient la cellule.

ActiveCell renvoie un objet Range qui représente la cellule active de la fenêtre active.

Du fait de l'utilisation de la méthode Application.Goto, Excel bascule vers la feuille avant de procéder à la sélection de la cellule.

Sub test()
Dim Cel As Range
    Set Cel = Worksheets("Feuil2").Range("B8")
    Application.Goto Cel
    If ActiveCell.Interior.ColorIndex = 6 Then
        MsgBox "OK"
    End If
End Sub

A+

Merci Frangy ! je vais revoir ma facon de faire