Visual Basic - word

Life is soft - evento anual de software empresarial
 
Vista:

word

Publicado por jorge ubaque (10 intervenciones) el 22/10/2005 03:12:17
tiene alguien codigo para escrbir sobre un documento de Word existente desde una aplicacion VB 6.0

gracias

jorge ubaque
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:word

Publicado por Gustavo (181 intervenciones) el 28/10/2005 23:53:18
No lo tengo en mis manos pero te puedo decir como ok
mira primero tienes q hacer la referencia a word esto se hace en el menu proyecto/Referencias/ Microsoft Word Object Library 9.0 despues declarar una variable de tipo objeto word y otra de tipo word documento OK
despues solo direccionas a word con un nuevo objeto con la instruccion SET asi mismo el la variable documento OK
dim OjWord as word.application
dim docword as word document
Set OjWord = CreateObject("Word.Application")
Set docword = ApWord.Documents.Add ' con esto creas uno nuevo pero como lo q quieres es abrirlo esasi
Set docword = ApWord.Documents.open (ruta)
y para escribir solo mandas los textos pero tambien tienes q dar los saltos de linea
with ApWord.Selection
.ParagraphFormat.Alignment = wdAlignParagraphCenter '__Alinear al centro
.Font.Size = 20 '_Tamaño de la letra
.Font.Color = wdColorDarkBlue '_Color de la letra
.Font.Bold = True 'En false para desactivar negritas
.Font.Italic = True 'En false para desactivar cursiva
.Font.Underline = True 'En false para desactivar subrayado
.TypeText "Gustavo García" 'Texto siempre entre comillas
.TypeParagraph 'Salto de linea
.TypeParagraph 'Salto de linea
.Font.Bold = False 'En false para desactivar negritas
.Font.Italic = False 'En false para desactivar cursiva
.Font.Underline = False 'En false para desactivar subrayado
.Font.Color = wdColorGold 'Color de la letra
.ParagraphFormat.Alignment = wdAlignParagraphJustify '_Justificar
end with
apword.visible=true
Suerte
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:word

Publicado por Jubaque (10 intervenciones) el 01/11/2005 01:04:26
Muchas gracias gustavo, eso si es ayuda.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar