Visual Basic - Tipo de letra

Life is soft - evento anual de software empresarial
 
Vista:

Tipo de letra

Publicado por Oscar (3 intervenciones) el 16/01/2007 18:24:41
Hola,
sabria alguien decirme como desde un programa de visual basic puedo hacer que un documento de Word cualquiera tenga siempre un tipo de letra en concreto.
Ej:
Yo abro un doc de word que tengo guardado en el pc pero quiero que aunque el usuario lo guarde con Times New Roman, yo quiero obligar a que cuando lo abre desde la aplicación me lo abra con Arial.

'--------------------CODIGO DE LA LLAMADA AL DOC DE WORD------------------------
Private Sub btn_1cara_Click()
Dim Fichero1 As String

Nomb_Fich = Mid(V_Fichero, 1, 4)
Nomb_Fich1 = Mid(V_Fichero, 6, 2)
Nomb_Fich2 = Nomb_Fich & "01" & Nomb_Fich1 & ".doc"

Fichero1 = "c:\" & Nomb_Fich2
Access Read Lock Read As #15

If Nomb_Fich2 <> "01.doc" Then
Dim ObjWord As Word.Application
Set ObjWord = New Word.Application
ObjWord.Documents.Add (Fichero1)
ObjWord.Visible = True
Else
MsgBox "Debe de seleccionar un Fichero", vbInformation, "Ficheros"
Exit Sub
End If

End Sub
'--------------------------------------------------------------------------------------------------------------------
Gracias y un Saludo.
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:Tipo de letra

Publicado por lolo (6 intervenciones) el 16/01/2007 18:49:25
al abrir el doc le asignais la font como arial y si no quereis que lo modifiquen lo abris como de solo lectura.
espero haberos ayudado. Un saludo
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