............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

Forzar Actualizacion de Vinculos a otros Libros

Ver el tema anterior Ver el tema siguiente Ir abajo

Forzar Actualizacion de Vinculos a otros Libros

Mensaje por QuestionMan el Jue Abr 24, 2008 7:38 pm

La verdad es que no se si esto se puede hacer, pero como a veces me sorprendo de lo que se consigue con excel...

Tengo un archivo con referencias externas (vinculos o links) a otro libro. Queria saber si es posible llevar un control de las veces que se actualiza ese link. Es decir, si una persona hace una actualizacion, que eso quede reflejado en algun sitio (tambien me valdria la ultima fecha en que se actualizó el link)

Basicamente quiero poder demostrar que si un archivo no tiene la informacion actualizada fue porque la persona que lo usa no actualizó el link, y no porque el archivo vinculado tenia datos desactualizados...

Tambien podria valerme una opcion que obligase al abrir el archivo a actualizar los links...

Cualquier idea es buena. Muchas gracias por la ayuda.

Un saludo

QuestionMan

Cantidad de envíos : 1
Fecha de inscripción : 26/01/2008

Volver arriba Ir abajo

Re: Forzar Actualizacion de Vinculos a otros Libros

Mensaje por GalileoGali el Jue Abr 24, 2008 7:41 pm

Para la segunda de tus preguntas hay respuesta:
Menu Edicion>>Vínculos>>Modificar Vinculos>>Pregunta Inicial>>"No Mostrar la alerta y actualizar"
Luego vas a Herramientas > Opciones > Pestaña Modificar y destildás "Consultar al actualizar vinculos automaticos"

Ahora bien para primera pregunta una respuesta posible: supongamos tenes vinculos de un libro a 4 Libros:
Necesitamos 4 hojas que terminaran ocultas.
Todas las hojas llevaran el mismo esquema:
en A1 una formula que simplemente referencia un valor en el primer archivo fuente
y asi en cada hoja para cada archivo diferente

en B1 de cada Hoja :"Fecha Modificacion"
en C1 de cada Hoja : "usuario"

En el Modulo correspondiente a cada hoja, para el evento
Private Sub Worksheet_Calculate()
Dim fila as long

fila = Cells(Rows.count,"b").End(xlup).Offset(1,0).Row

Cells(fila,"b") = Now
Cells(Fila,"c") = Application.Username
End Sub


En principio podrian no ser necesarias tantas hojas ya que lo habitual es que al aceptar se actualicen todos los vinculos, con lo cual no seria necesaria mas que una hoja conteniendo un vinculo. Sin embargo, existe la posibilidad de ir a edicion>>Vinculos Modificar Vinculos y Actualizar solo los vinculos que se desee (libros fuente si, o libros fuente no)
GALILEOGALI

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1962
Edad : 61
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.