¿Cómo generar todos los números primos entre dos números dados en Excel?

En Excel, ¿ha intentado alguna vez enumerar todos los números primos entre dos números dados? En este artículo, hablaré sobre algunos métodos interesantes para abordar esta tarea.

Generar todos los números primos entre dos números dados con fórmulas

Generar todos los números primos entre dos números dados con una Función Definida por el Usuario

Generar todos los números primos entre dos números dados con fórmulas

Combinando la función Definir Nombre y las fórmulas, puede enumerar o generar todos los números primos entre dos números específicos. Por favor, haga lo siguiente:

1. Por favor, cree el primer nombre de rango haciendo clic en Fórmulas > Administrador de nombres, y en el cuadro de diálogo Administrador de nombres, haga clic en el botón Nuevo, vea la captura de pantalla:

2. En el cuadro de diálogo Nuevo Nombre, en el cuadro de texto Nombre, escriba rng como nombre del rango, y luego ingrese esta fórmula: =FILA(INDIRECTO(Hoja1!$B$1&":"&Hoja1!$B$2)) (Hoja1 es la hoja de trabajo actual que está utilizando, B1 y B2 son los números de inicio y fin que ha especificado) en el cuadro de texto Se refiere a, luego haga clic en el botón Aceptar para regresar al cuadro de diálogo anterior. Vea la captura de pantalla:

3. Continúe haciendo clic en el botón Nuevo para crear otro nombre de rango, en el cuadro de diálogo Nuevo Nombre, escriba un nombre primo en el cuadro de texto Nombre, y luego ingrese esta fórmula: =PEQUEÑO(SI(MMULT(--(SI(rng>TRANSPONER(rng-Hoja1!$B$1+2),RESIDUO(rng,(rng>TRANSPONER(rng-Hoja1!$B$1+2))*TRANSPONER(rng-Hoja1!$B$1+2)))=0),rng-Hoja1!$B$1+2)=0,rng),FILA(INDIRECTO("1:"&Hoja1!$B$2))) (rng es el primer nombre de rango que creó en el paso 2) en el cuadro de texto Se refiere a, vea la captura de pantalla:

4. Luego haga clic en Aceptar y cierre los cuadros de diálogo, y seleccione una columna donde desee enumerar todos los números primos, e ingrese esta fórmula: =SI.ERROR(primo," ")(primo es el nombre del rango que creó en el paso 3) en la barra de fórmulas, y luego presione las teclas CTRL + SHIFT + ENTER juntas, todos los números primos entre los dos números dados se enumeran como se muestra en la siguiente captura de pantalla:

Generar todos los números primos entre dos números dados con una Función Definida por el Usuario

Si el primer método es algo difícil, aquí puede aplicar una Función Definida por el Usuario para resolverlo.

1. Mantenga presionadas las teclas ALT + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

2. Haga clic en Insertar > Módulo, y pegue el siguiente código en la Ventana del Módulo.

Código VBA: Generar todos los números primos entre dos números específicos:

Function PRIME(St, En As Long)
'Updateby Extendoffice 20160613
Dim num As String
For n = St To En
    For m = 2 To n - 1
        If n Mod m = 0 Then GoTo 20:
    Next m
    num = num & n & ","
20:
Next n
PRIME = num
End Function

3. Luego guarde y cierre este código, regrese a la hoja de trabajo, por favor ingrese esta fórmula: =primo(10,100) (10 es el número de inicio, y 100 es el número final entre los cuales desea obtener los números primos, puede cambiarlos según sea necesario), y luego presione la tecla Entrar, y todos los números primos se muestran en una celda, vea la captura de pantalla: