Checkbox in Bezug auf erste Zelle

Mein Problem:
Ich habe in meiner Userform verschiedene Text; Combo; und Checkboxen. Die Textboxen lese ich über u.g. Code ein. Allerdings habe ich keinen Bezug zu den Checkboxen! Wie macht man denn das? Die Idee ist bei Eingabe durch die Textboxen sollen sich die Einträge aus den Checkboxen auch automatisch eingetragen werden und zwar waagerecht also sprich F3, G3, H3 usw. usw.
Private Sub CommandButton1_Click()
z = Range("A1").End(xlDown).Row + 1
If z > 65000 Then z = 2
Cells(z, 1) = TextBox1
Cells(z, 2) = TextBox2
Cells(z, 3) = TextBox3
Cells(z, 4) = TextBox4
Cells(z, 5) = TextBox5
End Sub

Erst einmal Danke

Gruß
Markus