Hi,
I am working on a Log (see attached: Call Log 2.0.xlsm) that will need to do the following:
1. Enter new data on a new row when ANY of cell in row A:H is not empty.
2. Multipage Page1 and Page2 details will be either or and will be entered in range A:D on next empty row.
3. Clear userform after some or all textbox is filled in (via "Complete Log" CommandButton) without overwriting previously entered data.
Problems:
1. Next row code finds the next empty cell for each column. I need it to be entered in a new row when range A:H is not empty.
NOTE: I have a time stamp on range H when textbox 4 and textbox 1 is typed on so it will always have details on it.
Dim lastrow As Long
Private Sub UserForm_Initialize()
Dim i As Long, j As Long
lastrow = 1
For i = 1 To 9
j = Sheets("Call Log").Cells(60000, i).End(xlUp).Offset(1, 0).Row
If lastrow < j Then lastrow = j
Next i
End Sub
2. Cant find code that allows userform to be cleared without deleting data from sheet.
Bookmarks