Sheet used by multiple users

[Voltz]

HI to All,

I have been forllowing and learning for a long time but now i'm stack on my own and would appreciate your help.

I have a workbook (jobsheet.xlsm) that is used by 3 users, inputting data in there individual form and with a code data will be sent into the Jobsheet. So far so good, but if for any reason 1 of the user open the Jobsheet to check or edit something into it and while the sheet is open another user input more data, the new data will not be saved since it will be opened on another PC.
All workbooks including Jobsheet.xlsm is on a mapped Drive "T".

Is there a work around to make fool proof?

part of the code

 [FONT=Verdana,Arial,Tahoma,Calibri,Geneva,sans-serif]Sub copy_to_print_Jobsheet()
'
' Macro5 Macro
'
    Application.ScreenUpdating = False
'
    Range("a7:n7").Offset(Range("m2").Value, 0).Select
    Range(Selection, Selection.End(xlUp)).Select
    Selection.Copy
    Workbooks.Open "t:\Users\Documents\Orders\jobsheet.xlsm"
    Worksheets("JSH PRINT").Activate
    Range("A1").Select
    Selection.End(xlDown).Offset(1, 0).Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    With Selection.Borders(xlEdgeBottom)
        .LineStyle = xlDouble
        .Color = -16776961
         .TintAndShade = 0
            .Weight = xlThick
    End With
    Workbooks("jobsheet.xlsm").Save
    Workbooks("jobsheet.xlsm").Close
    Range("a8").Select
    Range("M6").Select
    Range("M6").Value = "Order Saved"
    Range("m1").Select
    Selection.Copy
    Range("L5").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    ActiveSheet.Protect
    
    
    
End Sub

Thanks

[/FONT]

 

[dmt32]

but if for any reason 1 of the user open the Jobsheet to check or edit something into it and while the sheet is open another user input more data, the new data will not be saved since it will be opened on another PC.

Is there a work around to make fool proof?

Hi,
If you are using your JobSheet workbook as a database which your users write to via a template workbook, the database workbook as you discovered, cannot be opened in read / write mode whilst users need to write to it.

Not fool proof but you can reduce conflicts by providing an edit function in the template workbooks where users can call back a record. You need to develop code that would briefly open the database workbook in readonly mode, find and return the required record. Users can then edit it in their workbook and then write back the updates to the database.

Dave

 

[Voltz]

Hi,
If you are using your JobSheet workbook as a database which your users write to via a template workbook, the database workbook as you discovered, cannot be opened in read / write mode whilst users need to write to it.

Not fool proof but you can reduce conflicts by providing an edit function in the template workbooks where users can call back a record. You need to develop code that would briefly open the database workbook in readonly mode, find and return the required record. Users can then edit it in their workbook and then write back the updates to the database.

Dave

Hi Dave,

That may be an option yes.

Thanks,