Bonjour à tous,

j'ai cette fonction dans une feuille excel =GAUCHE(G2;CHERCHE("//";G2)-1)
La colonne G contient des commentaires et j'utilise // pour séparer le dernier commentaire des précédents.
La fonction ci-dessus me permet donc d'écrire dans la colonne H uniquement ce qu'il y a avant le séparateur.
Cependant VBA ne m'accepte pas la syntaxe et me donne l'erreur suivante "sub ou fonction non définie"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Dim NombreCR As Integer
Sub PrsReview()
    Dim Cellule As CellFormat
    NombreCR = ActiveWorkbook.Worksheets(1).UsedRange.Rows.Count
    MsgBox NombreCR
    For i = 2 To NombreCR
    Cellule = ActiveWorkbook.Worksheets(1).Cells(i, 7).Value
    ActiveWorkbook.Worksheets(1).Cells(i, 8) = gauche(Cellule, cherche("attendees", Cellule) - 1)
    Next i
End Sub
Pouvez-vous m'aider à finaliser ce code svp ?