
22/05/2007, 17:07
|
 | | | Fecha de Ingreso: febrero-2007 Ubicación: México
Mensajes: 823
Antigüedad: 18 años, 3 meses Puntos: 24 | |
quien está usando un archivo? Saludos:
Me gustaría saber si hay alguna manera de saber exactamente que usuario de una red windows xp tiene abierto un archivo de excel, compartimos un archivo xls y quiero tener una aplicación que me indique si alguien tiene ese archivo abierto entonces la aplicación me indique que alguien lo tiene abierto y lo intente de nuevo, si no esta abierto entonces lo modificará.
Al leer la propiedad ReadOnly puedo saber si está abierto o no por otra aplicación, pero he visto que excel 2003 tambien muestra un mensaje de bloqueo, pero además me dice exactamente quien tiene abierto el archivo, hay alguna manera de saber eso usando vb?, si alguien me puede ayudar gracias, anexo el codigo de lo que estoy haciendo.
-----------------------------------------------------
Dim xlsApp As New Excel.Application
Dim yaabierto As Boolean
Set xlsApp = New Excel.Application
xlsApp.Visible = False
xlsApp.DisplayAlerts = False
xlsApp.Workbooks.Open ruta_mi_excel
yaabierto = xlsApp.ActiveWorkbook.ReadOnly
If yaabierto = True Then
MsgBox "El archivo '" & ubicacion & "' ya se encuentra abierto por otro usuario", vbExclamation, TITULO_APP
Else
'rutina que voy a ejecutar
End If
xlsApp.Workbooks(1).Close
Set xlsApp = Nothing |