run-time error '50290' Method 'Select' of object 'range' failed

Good day its my first macro and vba and spent a whole night still keep getting this error when i run it  Sub Button1_Click() ' ' Button1_Click Macro ' ' Range("A5").Select Selection.ClearCont...