Problème méthode Range

Bonjour,

Je poste car j'ai un problème avec un de mes objets... Voici le code :

Private Function Rest_Plat()
    Worksheets("BadgesRestants").Range("C2").Cells(1, 1).Activate
    compt = 2
    Do While ActiveCell <> 0
        compt = compt + 1
        ActiveCell.RowOffset(1).Activate
    Loop
    Rest_Plat = Range(Cells(2, 3), Cells(compt, 3))
End Function

Le principe de cette fonction c'est qu'elle va créer d'une Range de cellules, qui représente le nombre de cellules étant remplies d'un numéro de badge, afin que, ensuite, traiter en fonction du nombre de badges présents.

Cependant, lorsque le programme arrive à la ligne

ActiveCell.RowOffset(1).Activate

J'obtiens l'erreur '438' Propriété ou méthode non gérée par l'objet.

Bref, j'ai cherché, cherché et cherché et j'ai aucune idée de ce qui bloque...

Merci d'avance de votre aide.

Bonne journée

Steven

bonjour.

"RowOffset" n'existe pas en VBA

A+

Quand tu sélectionne une ligne en entier tu considère que ton curseur est sur A, quelle que soit ta ligne. Du coup tu offset ta cellule, et re-selectionne ta ligne entière je pense