codigo para abrir otro libro

14/11/2008 - 21:33 por J. Ricardo Hdz. | Informe spam

Hola,
quiero abrir un archivo que esta en una carpeta que es el año en curso (2008)
pero no me funciona este codigo
Dim fechaarc As String * 4
fechaarc = Trim(Format$(Date, "YYYY"))
Workbooks.Open Filename:= _
"\\vimosaapps-w2k\spp\JUNTA DIARIA\DECORADO\& fechaarc &" \ "decorado.xls"

me podrian ayudar
Saludos y Gracias por su ayuda..

Siga el debate

2 respuestas

Tengo una respuesta

Preguntas similare

Desde donde veo código de doble clic para ingresar a otro libro?????

Leer las respuestas

#1 Héctor Miguel

15/11/2008 - 03:42 | Informe spam

hola, J. Ricardo !

quiero abrir un archivo que esta en una carpeta que es el a#o en curso (2008) pero no me funciona este codigo
Dim fechaarc As String * 4
fechaarc = Trim(Format$(Date, "YYYY"))
Workbooks.Open Filename:= _
"\\vimosaapps-w2k\spp\JUNTA DIARIA\DECORADO\& fechaarc &" \ "decorado.xls"

(p.e.)

Workbooks.Open Filename:= _
"\\vimosaapps-w2k\spp\junta diaria\decorado\" & fechaarc & "\decorado.xls"

saludos,
hector.

Responder a este mensaje

#2 J. Ricardo Hdz.

15/11/2008 - 15:51 | Informe spam

Gracias Hector Miguel, me funciono a la perfeccion
Saludos

"Héctor Miguel" wrote:

hola, J. Ricardo !

> quiero abrir un archivo que esta en una carpeta que es el a#o en curso (2008) pero no me funciona este codigo
> Dim fechaarc As String * 4
> fechaarc = Trim(Format$(Date, "YYYY"))
> Workbooks.Open Filename:= _
> "\\vimosaapps-w2k\spp\JUNTA DIARIA\DECORADO\& fechaarc &" \ "decorado.xls"

(p.e.)

Workbooks.Open Filename:= _
"\\vimosaapps-w2k\spp\junta diaria\decorado\" & fechaarc & "\decorado.xls"

saludos,
hector.

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida