SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: criman en Lunes 26 de Septiembre de 2005, 21:54

Título: Como Cambian El TamaÑo De La Letra
Publicado por: criman en Lunes 26 de Septiembre de 2005, 21:54
HOLA DE NUEVO

estoy exportando un archivo a word y no se como cambiar el tamaño de la fuente cuando se exporta el archivo les dejo el codigo puede que le sirva 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
       
        sel.Text = "Servicios no realizados Delegacion: " & Combo1.Text
        sel.MoveDown
        sel.MoveDown
     
        prueba.PageSetup.Orientation = wdOrientLandscape
        prueba.Tables.Add Range:=sel.Range, NumRows:=1, NumColumns:=12
       
        sel.Text = "SERVICIO"
        sel.MoveRight unit:=12


 
    WordApp.Visible = True
    Set WordApp = Nothing
Título: Re: Como Cambian El TamaÑo De La Letra
Publicado por: cpmario en Martes 27 de Septiembre de 2005, 04:37
Prueba con esto, además del tamaño puedes cambiar el nombre, etc

Sel.Font.Name = "Arial"
Sel.Font.Size = 14
Sel.Font.Bold = True

 :)