두 개의 지정된 숫자 사이에서 모든 소수를 생성하려면 어떻게 해야 하나요?

Excel에서 두 개의 지정된 숫자 사이에 모든 소수를 나열해 본 적이 있나요? 이 문서에서는 이 작업을 처리하기 위한 몇 가지 흥미로운 방법에 대해 설명하겠습니다.

수식을 사용하여 두 개의 지정된 숫자 사이에서 모든 소수 생성하기

사용자 정의 함수를 사용하여 두 개의 지정된 숫자 사이에서 모든 소수 생성하기

수식을 사용하여 두 개의 지정된 숫자 사이에서 모든 소수 생성하기

이름 정의 기능과 수식을 결합하면 두 특정 숫자 사이의 모든 소수를 나열하거나 생성할 수 있습니다. 다음과 같이 진행하세요:

1. 수식 > 이름 관리자를 클릭하여 첫 번째 범위 이름을 생성하고, 이름 관리자 대화 상자에서 새로 만들기 버튼을 클릭하세요. 스크린샷을 참조하세요:

2. 새 이름 대화 상자에서 이름 텍스트 상자에 rng라는 범위 이름을 입력하고, 다음 수식을 참조 대상 텍스트 상자에 입력합니다: =ROW(INDIRECT(Sheet1!$B$1&":"&Sheet1!$B$2)) (Sheet1은 현재 사용 중인 워크시트이며, B1과 B2는 지정한 시작 및 끝 숫자입니다). 그런 다음 확인 버튼을 클릭하여 이전 대화 상자로 돌아갑니다. 스크린샷을 참조하세요:

3. 계속해서 새로 만들기 버튼을 클릭하여 다른 범위 이름을 생성하고, 새 이름 대화 상자에서 이름 텍스트 상자에 prime이라는 이름을 입력하고, 다음 수식을 참조 대상 텍스트 상자에 입력합니다: =SMALL(IF(MMULT(--(IF(rng>TRANSPOSE(rng-Sheet1!$B$1+2),MOD(rng,(rng>TRANSPOSE(rng-Sheet1!$B$1+2))*TRANSPOSE(rng-Sheet1!$B$1+2)))=0),rng-Sheet1!$B$1+2)=0,rng),ROW(INDIRECT("1:"&Sheet1!$B$2))) (rng는 2단계에서 생성한 첫 번째 범위 이름입니다). 스크린샷을 참조하세요:

4. 그런 다음 확인을 클릭하고 대화 상자를 닫고, 모든 소수를 나열하려는 열을 선택하고, 수식 표시줄에 다음 수식을 입력합니다: =IFERROR(prime,"")(prime은 3단계에서 생성한 범위 이름임) 그리고 CTRL + SHIFT + ENTER 키를 함께 누릅니다. 그러면 지정된 두 숫자 사이의 모든 소수가 아래 스크린샷과 같이 나열됩니다:

사용자 정의 함수를 사용하여 두 개의 지정된 숫자 사이에서 모든 소수 생성하기

첫 번째 방법이 다소 어렵다면 여기서 사용자 정의 함수를 적용하여 해결할 수 있습니다.

1. ALT + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

2. 삽입 > 모듈을 클릭하고 모듈 창에 다음 코드를 붙여넣습니다.

VBA 코드: 두 개의 특정 숫자 사이에서 모든 소수 생성하기:

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. 그런 다음 이 코드를 저장하고 닫고, 워크시트로 돌아가서 다음 수식을 입력합니다: =prime(10,100) (10 은 시작 숫자이고, 100은 소수를 얻으려는 끝 숫자이며 필요에 따라 변경할 수 있음) 그리고 Enter 키를 누르면 모든 소수가 한 셀에 표시됩니다. 스크린샷을 참조하세요: