I have multi Check box's on userform, then below code is adding the record in 1 cell only, its not working as required.
The code to search the lastrow in column J and once the user select the checkbox1 the label caption should be the cell(lastrow), if the user selects checkbox2 then label caption should be in the cell (lastrow) and so on.
Dim LastRow As Long, ws As Worksheet
Set ws = Sheets("Sheet2")
LastRow = ws.Range("J" & Rows.Count).End(xlUp).Row + 1
If Me.CheckBox1.Enabled = True Then ws.Range("J" & LastRow).Offset(0, 9).Value = Me.Label11.Caption
If Me.CheckBox2.Enabled = True Then ws.Range("J" & LastRow).Offset(0, 9).Value = Me.Label12.Caption
The code to search the lastrow in column J and once the user select the checkbox1 the label caption should be the cell(lastrow), if the user selects checkbox2 then label caption should be in the cell (lastrow) and so on.
Dim LastRow As Long, ws As Worksheet
Set ws = Sheets("Sheet2")
LastRow = ws.Range("J" & Rows.Count).End(xlUp).Row + 1
If Me.CheckBox1.Enabled = True Then ws.Range("J" & LastRow).Offset(0, 9).Value = Me.Label11.Caption
If Me.CheckBox2.Enabled = True Then ws.Range("J" & LastRow).Offset(0, 9).Value = Me.Label12.Caption