Foros del Web

Foros del Web (http://www.forosdelweb.com/)
-   Visual Basic clásico (http://www.forosdelweb.com/f69/)
-   -   Quiero abrir un archivo de word desde visual (http://www.forosdelweb.com/f69/quiero-abrir-archivo-word-desde-visual-401668/)

cerberus8 13/06/2006 10:23

Quiero abrir un archivo de word desde visual
 
Buenas tardes a todos, he conseguido a través de un botón abrir word para trabajar, pero quiero abrir un archivo concreto de word. Alguien puede ayudarme a decirme como?

Esto es lo que he usado:
Set oApp = CreateObject("Word.Application")

Saludos y muchas gracias

cerberus8 14/06/2006 00:12

nadie ha probado nunca a hacerlo?

roortiz 15/06/2006 18:43

yo he probado y nunca he podido, necesitaba hacer justamente lo que necesiytas hacer vos o mas o menos parecido. Lo que yo queria hacer era que dentro de un form de VB6 me permita editar un documeno de word, pero nunca lo logre.... tal vez alguien lo haya hecho....

vbx3m 16/06/2006 16:16

Para abrir x documento:

Código:

Dim Documento As New Word.Application
    With Documento
        .Application.Documents.Open App.Path & "\ejemplo.doc"
        .Application.Visible = True
    End With
    Set Documento = Nothing

Y para introducir texto o tablas:

Código:

Dim Documento As New Word.Application
    With Documento
        'para abrir un documento
        .Application.Documents.Open App.Path & "\ejemplo.doc"
        'marcadores
        .Documents.Item(1).Bookmarks.Item("Marcador1").Range.Text = "TITULO"
        .Documents.Item(1).Bookmarks.Item("Marcador2").Range.Text = "OTRO TEXTO"
        'final del documento
        .Application.Selection.EndKey wdStory
        'intro
        .Application.Selection.TypeParagraph
        'introduccion de texto
        .Application.Selection.TypeText "Ejemplo de prueba"
        'intro
        .Application.Selection.TypeParagraph
        .Application.Selection.TypeParagraph
        .Application.Selection.TypeParagraph
        'crear tabla
        .Documents.Item(1).Tables.Add Documento.Application.Selection.Range, 3, 5
        'relleno de tabla
        .Documents.Item(1).Tables(1).Cell(1, 1).Range.Text = "Celda 1"
        'muestra el documento
        .Application.Visible = True
    End With
    Set Documento = Nothing


cerberus8 19/06/2006 02:07

vbx3m me da un error al compilar. me dice:

Error de compilación. No se ha definido el tipo definido por el usuario.

Documento As New Word.Application 'en esta línea me da el error.

Saludos

vbx3m 19/06/2006 06:07

Agregaste la libreria Microsoft Word x.x Object Library???

cerberus8 20/06/2006 09:51

Lo intento hacer, pero me da este error. Cosa que en anterior officce no me hacía, me dejaba sin problemas.

En el menu "complementos" -> referencias
obtengo el mensaje * Error en el acceso al registro del sistema *

que puedo hacer vbx3m?

Saludos

cerberus8 23/06/2006 02:47

alguien sabe que me puede estar diciendo ese error?

muchas gracias

selma128 24/06/2006 12:38

aqui tienes un ejemplo para incluir Word dentro de visual basic


http://www.planetsourcecode.com/vb/s...58735&lngWId=1

SoutlinK 01/12/2007 08:27

Re: Quiero abrir un archivo de word desde visual
 
HOla gente.

Gracias por el codigo, pero necesito que me ayuden a realizar una pequeña modificacion.

Yo ya tengo una plantilla echa en word con una tabla.

Se rellenarla pero me hacen falta mas filas.

Alguna opcion para agregar filas a una tabla lla existente mediante codigo??

Gracias de antemano

SoutlinK 01/12/2007 09:13

Re: Quiero abrir un archivo de word desde visual
 
Ya es, ya lo encontré!!
Código:

.Documents.Item(1).Tables(1).Rows.Add
La madre que lo hizo..

lo que me a costado

Gracias de todas formas ;)


La zona horaria es GMT -6. Ahora son las 08:22.

Desarrollado por vBulletin® Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.