SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado 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
-
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
:)