Quiero Pedirles ayuda con una planilla para generar finiquitos, quiero hacerla lo mas automatizada posible, para que cuando la usen otras personas en la oficina, no intervengan en la estructura de la planilla ni de la combinacion de correspondencia con word...
El Problema: tengo un codigo para abrir un documento "x" que tome de aca y adapte para usarlo en mi planilla, el problema es que cuando aplico la macro, abre el documento, pero sin la combinacion de correspondencia, lo que inutiliza la planilla completa, que modificacion se puede hacer para que al abrir el ".doc" mantenga la combinacion de correspondencia que yo le asigne?, les dejo el codigo:
Sub abre_Word()
Dim MiHoja As Object
Dim txttxt = "C:\Documents and Settings\Victor Jara\Escritorio\AUTO - FINIQUITOS\Finiquito 2.doc"
Set MiHoja = CreateObject("Word.Application")
MiHoja.Visible = True
MiHoja.Documents.Open (txt)
MsgBox "IMPORTANTE: Revise el Finiquito creado antes de imprimirlo."
Set MiHoja = Nothing
Sheets("Feriado Proporcional").Select
ActiveWorkbook.Save
Application.Quit
End Sub
tambien quisiera saber si puedo ejecutar una macro de word, desde una macro de excel, me explico: para este mismo tramite, cree una macro en word que toma el ultimo finiquito de la base de datos y lo combina en un ".doc" nuevo, funciona tal como yo quiero, pero quisiera saber si puedo hacer que excel ordene a word que ejecute dicha macro?
ojala puedan ayudarme, desde ya muchas gracias y hasta luego
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Amigos, Buenas Tardes...
Quiero Pedirles ayuda con una planilla para generar finiquitos, quiero hacerla lo mas automatizada posible, para que cuando la usen otras personas en la oficina, no intervengan en la estructura de la planilla ni de la combinacion de correspondencia con word...
El Problema: tengo un codigo para abrir un documento "x" que tome de aca y adapte para usarlo en mi planilla, el problema es que cuando aplico la macro, abre el documento, pero sin la combinacion de correspondencia, lo que inutiliza la planilla completa, que modificacion se puede hacer para que al abrir el ".doc" mantenga la combinacion de correspondencia que yo le asigne?, les dejo el codigo:
Sub abre_Word() Dim MiHoja As Object Dim txttxt = "C:\Documents and Settings\Victor Jara\Escritorio\AUTO - FINIQUITOS\Finiquito 2.doc" Set MiHoja = CreateObject("Word.Application") MiHoja.Visible = True MiHoja.Documents.Open (txt) MsgBox "IMPORTANTE: Revise el Finiquito creado antes de imprimirlo." Set MiHoja = Nothing Sheets("Feriado Proporcional").Select ActiveWorkbook.Save Application.Quit End Subtambien quisiera saber si puedo ejecutar una macro de word, desde una macro de excel, me explico: para este mismo tramite, cree una macro en word que toma el ultimo finiquito de la base de datos y lo combina en un ".doc" nuevo, funciona tal como yo quiero, pero quisiera saber si puedo hacer que excel ordene a word que ejecute dicha macro?
ojala puedan ayudarme, desde ya muchas gracias y hasta luego