I'm trying to make a dynamic range based on checked boxes that spans columns c e f g h


ElseIf optionbutton1.value = True And optionbutton3.value = True And optionbutton4.value = True And Optionbutton5.value = True And optionbutton6.value = True Then
    Dim DynamicRange As Range
     
     ActiveSheet.Select
   Range("C20,E20,F20,G20,H20").Select
    Range("H20").Activate
    Set DynamicRange = Range(Selection, Selection.End(xlDown))
    DynamicRange.Select
        

    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.ChartType = xlLine
    ActiveChart.SetSourceData Source:=DynamicRange

but for some reason it will only select the C column and not the rest (e f g h )

what am I doing wrong here ?