Códigos Más comunes:

Trasladarse a una Celda
Range("A1").Select

Escribir en una Celda
Activecell.FormulaR1C1="Jose Luis"

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

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:="Jose Luis", 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

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

Grabar un Libro
ActiveWorkbook.SaveAs Filename:="C:\Mis documentos\jlp.xls", FileFormat _
:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:= _
False, CreateBackup:=False

p.d.
Me los encontre por ahi...

Esperando, como siempre les sea de utilidad...

Saludos..

Jose Luis Padilla

Muchas gracias jlp encontre algunos codigos q necesitaba :)

Alguien sabe cual es el código de la Macro para evitar que la información de una hoja en excel se pueda copiar a otra???

¡Saludos!