Comados para visual basic
Ir a 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 then Aquí van las instrucciones que se ejecutaran si la condición resulta verdadera Else Aquí van las instrucciones que se ejecutaran si la condiciónresulta falso End If Abrir un formulario NombreFormulario.show Presentar un mensaje flotante al usuario. MsgBox “escriba el mensaje entre comillas” Moverse por la hoja de calculoObjeto.offset(CantidadFilasAMoverse, CantidadColumnasAMoverse).select Ejemplo: activecell.offset(0,1).select se desplaza una columna hacia la derecha Llamar a una macro desde código Call NombreMacro Trasladarse a una CeldaRange("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 WithSelection .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 WithCopiar 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 BuscarCells.Find(What:="TEXTOABUSCAR", After:=ActiveCell, LookIn:=xlFormulas, LookAt _ :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False).Activate Insertar Fila Selection.EntireRow.Insert Eliminar...
Regístrate para leer el documento completo.