Crear command por valor de celda

Estoy intentando que Excel cree automáticamente un button de command si una celda determinada tiene text. A través de la ejecución de la grabadora de macros y a través de Google, aquí es donde estoy atascado.

Private Sub button() If ActiveSheet.Range("C5") = Text Then ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", Link:=False _ , DisplayAsIcon:=False, Left:=396.75, Top:=18.75, Width:=64.5, Height _ :=26.25).Select Selection.Verb Verb:=xlPrimary End If End Sub 

Intenta search primero la syntax básica, asegúrate de que tu celda C5 tenga el valor "Algo"

  Private Sub Worksheet_SelectionChange(ByVal Target As Range) If ActiveSheet.Range("C5").Value = "Something" Then Dim button As OLEObject Set button = ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", Link:=False _ , DisplayAsIcon:=False, Left:=396.75, Top:=18.75, Width:=64.5, Height:=26.25) End If button.Object.Caption = "Complete" button.Name = "CommandbuttonEL1" End Sub