lunes, 30 de octubre de 2017

3 semestre - 2do parcial - Practica 5 Macros en Word

Sub Macro_Libre_Poner_Parentesis()
    Selection.InsertAfter ")"
    Selection.InsertBefore "("
End Sub


Sub Cambiar_tipo_de_letra()
' Cambiar tamaño de la letra
Selection.Font.Size = 18
' Cambiar el tipo de letra
Selection.Font.Name = "ALGERIAN"
' Darle color a la letra
Selection.Font.Color = wdColorBlue
End Sub

No hay comentarios.:

Publicar un comentario