Programación General > Visual Basic 6.0 e inferiores

 Como Invertir La Hoja En Word Desde Visual

(1/1)

criman:
hola

necesito un pequeño favor, necesito dejar la hora horizontal pero no se cual es la propiedad indicada plisss ayuda aca les dejo el codigo, le puede servir a alguien:

Dim WordApp As Word.Application
Dim prueba As Word.Document
Dim sel As Word.Selection

Set Db = Adodc1.Recordset
Set WordApp = New Word.Application

    On Error Resume Next
        WordApp.Documents.Add
        Set prueba = WordApp.ActiveDocument
        Set sel = WordApp.Selection
       
        prueba.Tables.Add Range:=sel.Range, NumRows:=1, NumColumns:=16
       
       
        Do Until Db.EOF
           
            sel.TypeText Text:=Db!SERVICIO
            sel.MoveRight unit:=12
           
           
            Db.MoveNext
            Loop
           



    WordApp.Visible = True
    Set WordApp = Nothing

Widark:
Hola criman!

Este es el codigo para poner tu hoja horizontal desde vb
--- Código: Text ---NombredelDocumento.PageSetup.Orientation = wdOrientLandscape espero te ayude.

Navegación

[0] Índice de Mensajes