Se estiver algum erro/comentário, gentileza infomar.
'Adiciona Cliente_ à coluna A e concatena com o que já está lá antes de rodar a macro'
Sub cliente()
If Left(Range("A3"), 8) <> "Cliente_" Then
Range("A3") = "Cliente_" & Range("A3")
End If
End Sub