Is there three ts in

 ActiveSheet.Shapes("buttton1").Enabled = True