domingo, 10 de febrero de 2013

Codigos comunes en macros para Excel



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

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

Copiar

Selection.Copy

Pegar

ActiveSheet.Paste

Cortar

Selection.Cut

Insertar Fila

Selection.EntireRow.Insert

Eliminar Fila

Selection.EntireRow.Delete

Insertar Columna

Selection.EntireColumn.Insert

Eliminar Columna

Selection.EntireColumn.Delete

Abrir un Libro

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

No hay comentarios: