Multiple Checkbox values to one cell

Hello all...first post for me.
I'm brand new to VBA, and learning very slowly.
I've tried searching the forum for an answer first, but couldn't find what I was looking for.

I've created a userform that transfers data from text boxes into appropriate cells, and now have a series of checkboxes that I would like to do the same thing to.

I have 3 separate 'groups' of similar check boxes. 1 'group' contains only 1 checkbox, and I was able to to get that value converted to text and input into the correct cell.

But now I have a group of 5 different check boxes that I would like returned into a singular cell, separated by a comma.

Here is what I have so far (a lot still left to do to clean it all up, but I'd like to solve this before I move on)

Private Sub CommandButton1_Click()
ActiveCell = TextBox1.Value
ActiveCell.Offset(0, 1) = TextBox2.Value
ActiveCell.Offset(0, 2) = TextBox3.Value
ActiveCell.Offset(0, 3) = TextBox4.Value
ActiveCell.Offset(0, 4) = TextBox5.Value
ActiveCell.Offset(0, 5) = TextBox6.Value

If CheckBox20.Value = True Then
ActiveCell.Offset(0, 6) = "PE"
Else
ActiveCell.Offset(0, 6) = ""
End If


ActiveCell.Offset(1, 0).Select

Call resetForm

End Sub
Sub resetForm()
TextBox1.Value = ""
TextBox2.Value = ""
TextBox3.Value = ""
TextBox4.Value = ""
TextBox5.Value = ""
TextBox6.Value = ""
MainForm.TextBox1.SetFocus


End Sub

Private Sub UserForm_Click()

End Sub

I hope this makes sense. Please let me know what I can try and if you need any more info.

Thank you very much. It didn't work 100% like I wanted, but it got me started, and after playing around with it, it works like a champ.

Thank you for the quick reply. This forum is such a great resource!