Macros

Primero debemos elaborar una práctica sobre macros:

1. Crear una Macro que escriba su nombre en una celda y lo ponga cursiva luego observar el Código.
2. Crear una Macro que escriba un nombre en una celda y lo Subraye y observa el Código.
3. Crear una Macro que escriba un nombre en una celda y cambie el tamaño de la letra a 24 puntos y observa el Código.

Códigos Más comunes:

Trasladarse a una Celda

Range("A1").Select

Escribir en una Celda

Activecell.FormulaR1C1="Ramon"

Letra Negrita

Selection.Font.Bold = True

Letra Cursiva

Selection.Font.Italic = True

Letra Subrayada

Selection.Font.Underline = xlUnderlineStyleSingle

Centrar Texto

With Selection

.HorizontalAlignment = xlCenter

End With

Alinear a la izquierda

With Selection

.HorizontalAlignment = xlLeft

End With

Alinear a la Derecha

With Selection

.HorizontalAlignment = xlRight

End With

Copiar

Selection.Copy

Pegar

ActiveSheet.Paste

Cortar

Selection.Cut

Ordenar Ascendente

Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _

OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom

Orden Descendente

Selection.Sort Key1:=Range("A1"), Order1:=xlDescending, Header:=xlGuess, _

OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom

Buscar

Cells.Find(What:="Ramon", After:=ActiveCell, LookIn:=xlFormulas, LookAt _

:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _

False).Activate

Insertar Fila

Selection.EntireRow.Insert

Eliminar Fila

Selection.EntireRow.Delete

Insertar Columna

Selection.EntireColumn.Insert

Eliminar Columna

Selection.EntireColumn.Delete

Tipo de Letra(Fuente)

With Selection.Font

.Name = "AGaramond"

End With

Tamaño de Letra(Tamaño de Fuente)

With Selection.Font

.Size = 15

End With

Abrir un Libro

Workbooks.Open Filename:="C:\Mis documentos\video safe 3.xls"

Grabar un Libro

ActiveWorkbook.SaveAs Filename:="C:\Mis documentos\piscis.xls", FileFormat _

:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:= _

False, CreateBackup:=False

Estos son los códigos más comunes en Excel, usted puede ver mas códigos de otras opciones, es cuestión de que los ponga en práctica.