Printranges according to textbox and checkbox.

First off, I'll say sorry for my bad English.
I know, you need INPUT & OUTPUT from the userform. You can find samples from sub FormShow in workbook I submitted.
Input code

    frm.TCSCol.TextBoxValues = WorksheetFunction.Transpose(Sheet1.Range("A1:B2"))
    frm.TCSCol.CheckBoxValues = WorksheetFunction.Transpose(Sheet1.Range("D1:E2"))

Output

        v = frm.TCSCol.TextBoxValues
        Sheet1.Range("A5:B5").Resize(UBound(v, 2)) = WorksheetFunction.Transpose(v)
        
        v = frm.TCSCol.CheckBoxValues
        Sheet1.Range("D5:E5").Resize(UBound(v, 2)) = WorksheetFunction.Transpose(v)

It's just an example. You can modify it if necessary.