abrir varias hojas nada mas iniciar excel

"Jordi Maycas" escribió

Hola!!

Tengo 3 hojas vinculadas, y siempre abrimos una... el problema es el
siguiente:

¿Como podria con un simple acceso directo, abrirl el excel'97, y que me
abra directamente 3 hojas, y me ponga maximiada una de ella? Lo digo,
porque asi estoy seguro que las otras dos, se me actualizaran seguro.

Gracias

Hola Jordi,

¿son tres hojas o tres libros? las hojas forman parte de los libros y se
actualizan las referencias sin problemas aparentes.

En el caso de que te refieras a libros, puedes crear, en el evento del libro
principal (thisworkbook_open) o en un módulo normal una macro que se llame
auto_open(), un código que abra los otros dos libros.

sub auto_open()
Workbooks.Open "archivo1.xls"
Workbooks.Open "archivo2.xls"
thisworkbook.activate
end sub

o por medio de un script abrir los tres libros (si no quieres llevar macros
en los libros)

crea un archivo de texto, copia las siguientes instrucciones y luego lo
guardas como 'nombrearchivo.vbs'

inicio código
dim xlApp, strArchivo1, strArchivo2, strArchivo3, wrkL

strArchivo1="archivo1.xls"
strArchivo2="archivo2.xls"
strArchivo3="archivo2.xls"

'Creo un objeto Excel

set xlApp=CreateObject("Excel.Application")

xlApp.Visible=true

set wrkL = xlApp.workbooks.open(strArchivo1)
set wrkL = xlApp.workbooks.open(strArchivo2)
set wrkL = xlApp.workbooks.open(strArchivo3)

set wrkL = nothing
set lapp = nothing
Fin código

Un saludo,
Juan