Cómo dibujar X líneas en VBA Excel

Visual Basic para aplicaciones le ayuda a formatear, mostrar, analizar y manipular datos en Excel. VBA puede usar el código que usted escribe para realizar tareas repetitivas que serían difíciles o imposibles de realizar manualmente, incluidas varias operaciones matemáticas en miles de columnas en diferentes libros de trabajo. Una característica de la hoja de cálculo de Excel permite que las celdas tengan bordes representados por líneas rectas o diagonales, que puede usar para dibujar X líneas dentro de las celdas.

Conceptos básicos de VBA

En Excel, las hojas de cálculo, las celdas y los rangos de celdas se conocen como "objetos" y tienen propiedades que puede manipular, como el color. El código VBA que hace que los objetos realicen tareas se llama macro, y se escribe usando el editor de Visual Basic que se encuentra debajo de la pestaña del desarrollador, en "Archivo", seleccione "Opciones" y "Opciones de Excel". En el lado izquierdo del cuadro de diálogo, debe elegir "Personalizar cintas", "Comandos" y luego "Comandos populares". Después de elegir "Personalizar la cinta" y "Principal", y seleccionar la casilla de verificación Desarrollador y hacer clic en "Aceptar", aparecerá la pestaña Desarrollador. Una macro comienza con "sub", que es la abreviatura de subrutina, y termina con "end sub". Debe guardarla con una extensión .xlsm.

Comandos VBA

El formato del comando implica escribir el objeto y su propiedad o método, separados con un punto. El objeto Range se usa con "Selección" y "Seleccionar" para preparar una celda o grupo de celdas para la operación. Por ejemplo, el comando "Rango (" A1 "). Valor = 3" selecciona la celda 1 y le asigna un valor de 3. Para seleccionar las celdas A6 y C6, y todo lo que esté en el medio, escribiría "Rango (" A6: C6 ").Seleccionar."

Propiedades de borde

Los bordes pueden emplear líneas sólidas o discontinuas gruesas o delgadas, en negro de forma predeterminada. Una línea diagonal es un borde interior, que va hacia atrás o hacia adelante, donde el comando es "xlDiagonalDown" o "xlDiagonalUp", respectivamente. El comando para dibujar barras diagonales hacia adelante y hacia atrás es “Selection.Borders (Diagonal Command) .LineStyle = xlContinuous”, donde xlContinuous significa líneas continuas.

Dibujando x lineas

Para dibujar X líneas, debe crear barras diagonales hacia adelante y hacia atrás en cada celda de interés. Puede practicar dibujándolos en tres celdas abriendo la ventana del guión, iniciando y nombrando un nuevo sub y luego escribiendo un guión para seleccionar las celdas donde se dibujarán las líneas X, como "Sub drawDiagonal ()" en una línea y "Rango (" A6: C6 "). Seleccione" debajo de él. Para indicar a la secuencia de comandos que dibuje barras inclinadas hacia adelante y hacia atrás en cada una de las celdas seleccionadas, debe escribir “Selection.Borders (xlDiagonalDown) .LineStyle = xlContinuous” y "Selection.Borders (xlDiagonalUp) .LineStyle = xlContinuous" debajo de él. Escribir "End Sub" cierra la subrutina. Después de hacer clic en "Macros" en la pestaña Desarrollador y luego en "Ejecutar", las líneas X aparecerán en las celdas A6, B6 y C6.