Shared workbook VBA autoupdate

Hi guys,

I'm currently working on a workbook that may have 6 people entering data via user forms sometimes at the same time.

I've been playing with the shared workbook autoupdate function but from what I can see it is time limited to 5 mins and within this time a number of changes could have been made.

What I would like to do is have the workbook autoupdate when the submit command button is pressed. So in essence I want it to update saved changes that other users may have made, enter the data on the completed user form for this user and then save so changes are visible for other users.

What is the best route to go with this?

Thanks

Okay I've managed to solve this, hopefully this will help other people

If ActiveWorkbook.MultiUserEditing Then
ActiveWorkbook.AcceptAllChanges
 
'Enter form date with offset'
Range("A" & Rows.Count).End(xlUp).Offset(1).Value = TxtQA.Value
Range("B" & Rows.Count).End(xlUp).Offset(1).Value = TxtAgent.Value
Range("C" & Rows.Count).End(xlUp).Offset(1).Value = TxtTL.Value
Range("D" & Rows.Count).End(xlUp).Offset(1).Value = TxtDate.Value
Range("E" & Rows.Count).End(xlUp).Offset(1).Value = TxtBP.Value
Range("F" & Rows.Count).End(xlUp).Offset(1).Value = TxtUpOpt.Value

ActiveWorkbook.Save
End If