Listing Username from a read only file

[saltir]

Hi,

I am using access to open an excel sheet on a server, so whenever another user is using this sheet the file is opened as read only. Is there a way in access to show who is the user using the excel sheet.?
Set appexcel = CreateObject("Excel.Application")
Set wbexcel = appexcel.Workbooks.Open("C:\Documents and Settings\saltir\Desktop\workorder_log.xls")
Set asheet = wbexcel.Sheets("Sheet1")

If ActiveWorkbook.ReadOnly Then
aactiveworkbook.close
End If


Thanks a lot for all your support

 

[SkipVought]

Hi,

Check out the WriteReseredBy property.

Why did you CHANGE from using the workbook reference you set, to activeworkbook???

If wbexcel.ReadOnly Then
   wbexcel.close 
End If

Skip,
[sub]
Just traded in my old subtlety...
for a NUANCE![/sub]