VB Code not moving to the next line

[sassy]

Can't get the following code to work as intended. Can anyone tell me what I am missing??

I have a form with checkboxes and when the form is closed, i want it to feed the the designated information from the checked boxes to the sheet skiping over the ones that are not checked. Does this make sense??

It is not moving to the next empty line, it is just going over the B3 again and again.

Private Sub CloseButton_Click()
If Box_Term.Value = True Then
    Worksheets("CICI").Activate
    Range("B11").Select
    Range("B3:B10").End(xlUp).Offset(1, 0).Select
    Selection.Value = "Term"
Else
End If
If Box_Change.Value = True Then
    Worksheets("CICI").Activate
    Range("B11").Select
    Range("B3:B10").End(xlUp).Offset(1, 0).Select
    Selection.Value = "Add a file"
Else
End If
 
If Box_Lock.Value = True Then
    Worksheets("CICI").Activate
    Range("B11").Select
    Range("B3:B10").End(xlUp).Offset(1, 0).Select
    Selection.Value = "Date Lock"

 

[Norie]

Try this.

    Worksheets("CICI").Range("B" & Rows.Count).End(xlUp).Offset(1) = "Term

 

[JackDanIce]

Try changing this line:

Range("B3:B10").End(xlUp).Offset(1, 0).Select

To

If Range("B3").End(xlDown).Row <> Rows.Count Then Range("B3").End(xlDown).Offset(1, 0).Select

 

[sassy]

It worked!!! Thanks guys, I really appreciate it!