Conditionnelle dans deux classeurs

Bonjour,
j'ai un classeur "obs1"(actif) et des feuilles bilans dont l'intitulé est nom et prénom (donc c'est très variable),
je souhaiterais créer une macro qui vérifierait si la cellule "B2" (qui est le nom de l'individu") dans chaque feuille est équivalente à celle de la colonne 1 de"obs1" (dans mon exemple de code la ligne 7, mais il me faudrait une boucle à vrai dire) :

Private Sub CommandButton2_Click()
For Each Sheet In ActiveWorkbook
    If ActiveSheet.Cells(7, 1).Text = Worksheet.Range("B2").Text Then
    Sheet.Range("C3").Value = ActiveSheet.Range("7,3").Text
    End If
Next Sheet
End Sub

J'ai un rapport d'erreur sur la première ligne du code... quelqu'un pourrait-il m'aider? J'ai oublié de dire mais cela doit se voir dans mon code, je suis débutant.

Merci d'avance