Hi , i would lie to change a sheet color - tried to use this code

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160930
If Target.Address = "$C$11" Then
Select Case Target.Value
Case "2016"
Me.Tab.Color = vbWhite
Case "2017"
Me.Tab.Color = vbYellow
Case "2018"
Me.Tab.Color = vbRed
Case "2019"
Me.Tab.Color = vbGreen
Case "2020"
Me.Tab.Color = vbBlue
Case Else



but it works only if I manually write down a value (e.g. 2017 etc.). But my intention is to change color based on the value copied from another sheet , in this case it is ='Sumár úľov'!F11 - but it does not work. Any suggestion would be welcome