loop through concatenated object names and variables

So I have the following code which works:

    SL_TB1.ControlSource = "Calculations!AG3"
    SL_TB2.ControlSource = "Calculations!AG4"
    SL_TB3.ControlSource = "Calculations!AG5"
    SL_TB4.ControlSource = "Calculations!AG6"
    SL_TB5.ControlSource = "Calculations!AG7"
    SL_TB6.ControlSource = "Calculations!AG8"
    SL_TB7.ControlSource = "Calculations!AG9"
    SL_TB8.ControlSource = "Calculations!AG10"
    SL_TB9.ControlSource = "Calculations!AG11"
    SL_TB10.ControlSource = "Calculations!AG12"
    SL_TB11.ControlSource = "Calculations!AG13"
    SL_TB12.ControlSource = "Calculations!AG14"
    SL_TB13.ControlSource = "Calculations!AG15"
    SL_TB14.ControlSource = "Calculations!AG16"
    SL_TB15.ControlSource = "Calculations!AG17"
    SL_TB16.ControlSource = "Calculations!AG18"
    SL_TB17.ControlSource = "Calculations!AG19"
    SL_TB18.ControlSource = "Calculations!AG20"

I'd like to simplify this but can't seem to figure out how. So far I have the following code which DOES NOT work.

For Count = 1 To 18
    
    SLTextbox = "SL_TB" & Count
    SLControlSource = "Calculations!AG" & Count + 2
    
    SLTextbox.ControlSource = SLControlSource
    
    Next Count

Any help would be appreciated, thanks.