Retroceder   Foros del Web > Temas generales de computación > Ofimática

Respuesta
 
Herramientas Desplegado
Antiguo 04-abr-2008, 15:37   #1 (permalink)
Nuvato está en el buen camino
 
Avatar de Nuvato
 
Fecha de Ingreso: mayo-2005
Mensajes: 60
Pregunta Macro Excel - Copiar valores a archivo cerrado

Como puedo hacer en macro de excel para copiar o escribir un valor en otro archivo, pero este otro archivo esta cerrado???
Nuvato está desconectado   Responder Citando
Antiguo 04-abr-2008, 18:20   #2 (permalink)
caesar.l no se puede cailificar en este momento
 
Avatar de caesar.l
 
Fecha de Ingreso: febrero-2007
Ubicación: Ags~D.F.~Chih~Ver~ETC
Mensajes: 214
Enviar un mensaje por MSN a caesar.l Enviar un mensaje por Yahoo  a caesar.l
Re: Macro Excel - Copiar valores a archivo cerrado

pues en la misma macro tienes que poner que abra el archivo, poner el dato, guardar el archivo y cerrarlo, incluso puedes utilizar el Application.ScreenUpdating y Application.DisplayAlerts para evitar los cambios en las ventanas y alertas de guardar el archivo, respectivamente.
__________________
La paciencia es una gran virtud...No quieran que resuelvan sus dudas en 1e¯²°seg
----- Usuario Linux Registrado #474417 -----
caesar.l está desconectado   Responder Citando
Antiguo 05-abr-2008, 12:23   #3 (permalink)
caesar.l no se puede cailificar en este momento
 
Avatar de caesar.l
 
Fecha de Ingreso: febrero-2007
Ubicación: Ags~D.F.~Chih~Ver~ETC
Mensajes: 214
Enviar un mensaje por MSN a caesar.l Enviar un mensaje por Yahoo  a caesar.l
Re: Macro Excel - Copiar valores a archivo cerrado

Puedes utilizar este código

Sub GaradarOtroArchivo()
Application.ScreenUpdating = False 'evita que se vean los cambios de las ventanas
Application.DisplayAlerts = False 'evita que se vean los anuncios al guardar
Workbooks.Open Filename:="C:\Libro1.xls" 'abre el libro donde quieres guradar el dato
Workbooks("Libro1.xls").Worksheets("Hoja1").Range( "B5").Select 'selecciona hoja y celda donde quieres poner el dato
ActiveCell.FormulaR1C1 = "Aqui va el dato" 'aqui pones el dato, puedes variar dependiendo de lo que quieras poner
ActiveWorkbook.Save 'salva el arvhivo
ActiveWindow.Close 'lo cierra
Application.DisplayAlerts = True 'activa las alertas
Application.ScreenUpdating = True 'activa la actualización de la pantalla
End Sub

espero que te sirva, saludos
__________________
La paciencia es una gran virtud...No quieran que resuelvan sus dudas en 1e¯²°seg
----- Usuario Linux Registrado #474417 -----
caesar.l está desconectado   Responder Citando
Respuesta

Calificación: Calificación de Tema: 1 votos, 5,00 de promedio.


Herramientas
Desplegado

Normas de Publicación
No puedes crear nuevos temas
No puedes responder temas
No puedes subir archivos adjuntos
No puedes editar tus mensajes

BB code is Activado
Caritas están Activado
[IMG] está Activado
Código HTML está Desactivado


La Zona horaria es GMT -6. Ahora son las 16:39.


Message Board Statistics

LinkBacks Enabled by vBSEO 3.1.0

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93