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

[VBA]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[/VBA]

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

what am I doing wrong here ?