Toggle Button set to true if cell is equal to text

Hello

I'm trying to toggle a toggle button on a worksheet if a cell value data is equal to "Premium". I tried this code below but it didn't work. Is this close or is it not possible?
Thanks in advanced.

'this toggles the CoS button if "Premium" is selected

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "D9" And Target.Value = "Premium" Then
        TglButCoS.Value = True
        Call TglButCoS_Click
        TglButCoS.Value = True
    End If
End Sub