Basico en programacion 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
WithSelection
.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.SortKey1:=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
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
Significado de la FORMULA R1C1
La FORMULA R1C1 se emplea para colocar el resultado de una línea de código en la celda que actualmente está activa.
El comando Rem es empleado para poner comentarios dentro de la programación.
El comando Empty es empleado para vaciar los Textbox.
Ira una hoja de cálculo
Sheets("NombreHoja").Select
Funcion Val
permite convertir un valor de texto a un valor numérico.val(TextoAConvertirANumero)
Función si (función condicional)
If Condicion thenAquí van las instrucciones que se ejecutaran si la condición resulta verdaderaElseAquí van las instrucciones que se ejecutaran si la condición resulta falsoEnd If
Abrir un formularioNombreFormulario.show
Presentar un mensaje flotante al usuario.
MsgBox “escriba el mensaje entre comillas”
Moverse por la hoja de calculo
Objeto.offset(CantidadFilasAMoverse, CantidadColumnasAMoverse).selectEjemplo: activecell.offset(0,1).select se desplaza una columna hacia la derecha
Llamar a una macro desde código
Call NombreMacro
Trasladarse a una Celda
Range("A1").Select
Escribiren 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 = xlCenterEnd With
Alinear a la izquierda
With Selection.HorizontalAlignment = xlLeftEnd With
Alinear a la Derecha
WithSelection.HorizontalAlignment = xlRightEnd With
Trasladarse a una Celda
Range("A1").Select
Escribir en una Celda
Activecell.FormulaR1C1="Ramon"
Tipo de Letra(Fuente)
With Selection
.Font .Name = "Arial"
End With
Tamaño de Letra(Tamaño de Fuente)
With Selection.Font .Size = 12
End With
IF……Then……Else ……End IF
IF……Then……ElseIf ……Else ……End IF
Estructura deiteración While - Wend
INTRODUCCION:
Esta es una iteración en la que no sabemos de antemano cuantas veces se repetirá el ciclo por lo tanto debe haber una condición para salir de el ya que en caso contrario el ciclo se repetiría en forma indefinida.
Para explicar While - Wend me parece que lo mejor es dar un ejemplo en el que iremos analizando cada línea de código.
Vamos a sumar un rango de...
Regístrate para leer el documento completo.