Hi Golf,

Why not just skip the VBA and use Data Validation? You can use Custom, formula ...

=((A1<>4)+(A1<>5))<>1