Abrir y cerrar libros en Red

No sé si habrá alguna función de la API de Windows que
averigüe si un fichero está abierto en otro equipo.
Supongo que sí, y si tengo un rato intentaré buscarla,
pero mientras tanto (o hasta que alguien te facilite otra
posibilidad mejor) puedes usar algo parecido a esto:

Workbooks.Open "UnidadDeRed:\NombreDelLibro"
If ActiveWorkbook.ReadOnly Then
MsgBox prompt:="El libro 'NombreDelLibro' se
encuentra abierto en otro equipo, por lo que se
cerrará.", Buttons:=vbOKOnly + vbInformation
ActiveWorkbook.Close
End If

Un saludo.


Fernando Arroyo
MS MVP - Excel

Buen día a todos

mediante código quiero preguntarles si existe la forma

de detectar si un

libro que está en red se encuentra abierto desde otro

equipo. Lo que quiero

es que otro libro copiado en varios equipos envíe datos

a este primero que

servirá de base de datos pero sin que genere errores al

encontrase abierto

al mismo tiempo por otro usuario.

Muchas gracias

Luis Medina




.

Fernando, muchas gracias. La instrucción que me das me es muy útil para lo
que quiero. Te agradezco si encuentras un procedimiento que talvez haga
esperar un tiempo moderado mientras otro libro cierra la base que está
abierta.

Gracias de nuevo

Luis Medina

"Fernando Arroyo" escribió en el mensaje
news:147901c388b5$117defb0$
No sé si habrá alguna función de la API de Windows que
averigüe si un fichero está abierto en otro equipo.
Supongo que sí, y si tengo un rato intentaré buscarla,
pero mientras tanto (o hasta que alguien te facilite otra
posibilidad mejor) puedes usar algo parecido a esto:

Workbooks.Open "UnidadDeRed:\NombreDelLibro"
If ActiveWorkbook.ReadOnly Then
MsgBox prompt:="El libro 'NombreDelLibro' se
encuentra abierto en otro equipo, por lo que se
cerrará.", Buttons:=vbOKOnly + vbInformation
ActiveWorkbook.Close
End If

Un saludo.


Fernando Arroyo
MS MVP - Excel

Buen día a todos

mediante código quiero preguntarles si existe la forma

de detectar si un

libro que está en red se encuentra abierto desde otro

equipo. Lo que quiero

es que otro libro copiado en varios equipos envíe datos

a este primero que

servirá de base de datos pero sin que genere errores al

encontrase abierto

al mismo tiempo por otro usuario.

Muchas gracias

Luis Medina




.