求助求助，vba使用ai给的代码显示第一行第八列语法错误？

新手想实现：当一个单元格数值为特定值则，将其他特定单元格自动清除数值。
比如在a2单元格使用公式：a1的值为0，则b1,b5,b7为空值
ai给的代码如下：
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
If Range("A1").Value = 0 Then
Range("B1, B5, B7").ClearContents
End If
End If
End Sub