Códigos Fuente de Visual Basic para Aplicaciones

Codigo de VBA que convierte un numero a cadena en Nuevos Soles

Codigo de macro en VBA para Excel que realiza el formato condicional en un rango de celdas seleccionadas por programa o por la selección del usuario antes de llamar a la macro.
El formato condicional consiste en realzar las celdas con el valor minimo (relleno en verde) y maximo (relleno en rojo) por cada fila según se muestra en la imagen.
En la imagen se ha seleccionado el rango de celdas D5:L22 y luego se ha ejecutado la macro.

Este código muestra como crear una barra de progreso para nuestros procesos.
En este ejemplo, genera una barra de progreso mientras se escriben numeros aleatorios en una parte de la hora.

Este simple código muestra como exportar el contenido de una hoja de calculo a un archivo de texto delimintando las celdas por coma, espacio, tabulador, punto y coma o cualquier carácter que deseemos.

Breve ejemplo de como crear una secuencia o progresión de números pentagonales, empleando VBA para tal fin.

Un número pentagonal es un número figurado que extiende el concepto de número triangular y cuadrado al pentágono, pero, a diferencia de los dos primeros, los patrones utilizados en la construcción de los números pentagonales no son simétricamente rotacionales.

El n-ésimo número pentagonal pn es el número de distintos puntos en un patrón de puntos, consistente en el contorno de pentágonos regulares cuyos lados contienen de 1 a n puntos, superpuestos, de forma que tienen en común el vértice. Por ejemplo, el tercero de ellos está formado de contornos compuestos por 1,5 y 10 puntos respectivamente, pero el 1, 3 puntos del de 5, coinciden con 3 del de 10, dejando 12 puntos distintos, 10 en forma de pentágono, y 2 dentro de él...

Numero Triangular con VBA (Visual Basic for applications) en Excel.
Un número triangular es aquel que puede recomponerse en la forma de un triángulo equilátero (por convención, el primer número triangular es el 1). Los números triangulares, junto con otros números figurados, fueron objeto de estudio por Pitágoras y los Pitagóricos, quienes consideraban sagrado el 10 escrito en forma triangular, y al que llamaban Tetraktys.
Según la ecuación de Ramanujan–Nagell, se considera que el número triangular más grande puede ser representado mediante la fórmula 2k − 1 es 4095.

Entonces cabe destacar que un número triangular es aquel número que puede ser representado a través de un patrón triangular que posee puntos espaciados de forma equilibrada.

Además los números triangulares pueden ser obtenidos gracias a la expresión:

[(n+1)(n+2)] /2;

Donde "n" es un numero natural mayor o igual que 1.

En esta oportunidad, les quiero mostrar una forma de encontrar, por medio de una secuencia, los divisores de N números y sus respectivos números perfectos.
Todo esto bajo programación VBA (Visual Basic for Applications).
Un número perfecto es un número natural que es igual a la suma de sus divisores propios positivos. Dicho de otra forma, un número perfecto es aquel que es amigo de sí mismo.
Así, 6 es un número perfecto porque sus divisores propios son 1, 2 y 3; y 6 = 1 + 2 + 3. Los siguientes números perfectos son 28, 496 y 8128.

Narayana, matemático hindú del siglo XIV, propuso la siguiente situación:

"Una vaca tiene anualmente una cría. Cada una de ellas, cuando ya es novilla a los cuatro años, también tiene una cría anual."

De esta forma, el primer año habrá una vaca, el segundo permanece la misma vaca, al igual que el tercero, en el cuarto año ya hay dos vacas, pues la original tiene una cría...
Para poder resolverlo, empleamos VBA (Visual Basic for Applications) en Excel, ya que es una excelente herramienta para estos casos.