Run Macro, but don't select button

Thanks for the reply.

Here is the code:

Sub bandwidth_on()
  Range("F7").Select
  ActiveCell.FormulaR1C1 = Range("F7") + "205"
  ActiveSheet.Shapes("bandwidth_toggle").Select
  ActiveSheet.Shapes("bandwidth_toggle").TextFrame.Characters.Text = "Toggle Off"
  Selection.OnAction = "bandwidth_off"
End Sub
Sub bandwidth_off()
  Range("F7").Select
  ActiveCell.FormulaR1C1 = Range("F7") - "205"
  ActiveSheet.Shapes("bandwidth_toggle").Select
  ActiveSheet.Shapes("bandwidth_toggle").TextFrame.Characters.Text = "Toggle On"
  Selection.OnAction = "bandwidth_on"
End Sub

Thanks a lot!