VBA를 통해 Excel 워크 시트에서 Lucky Draw를 만드는 방법

지금 공유 :

Excel 워크 시트에서 행운의 추첨을 할 수도 있습니다. 이 글에서는 Excel에서이 작업을 완료하는 방법을 보여줍니다.

럭키 드로우는 일상 생활에서 매우 일반적입니다. 예를 들어, 연말에 직원에게 보너스를 제공해야합니다. 행운의 직원을 무작위로 선택하고 싶습니다. 따라서 Excel 파일을 사용하여 행운의 추첨을 할 수 있습니다.

럭키 드로우 만들기

이 부분에서는 방법을 자세히 소개합니다.

  1. 직원의 모든 정보가 포함 된 Excel 파일을 엽니 다. 이 예에서는 워크 시트에 18 명의 직원이 있습니다. 그리고 기존 보너스는 판매량에 따라 계산됩니다.예시
  2. 그런 다음 키보드에서 바로 가기 키 "Alt + F11"을 눌러 Visual Basic 편집기를 엽니 다.
  3. 그런 다음 편집기에 새 모듈을 삽입하십시오.모듈 삽입
  4. 이 단계에서는 다음 코드를 새 모듈에 복사합니다.
Sub MakeLuckyDraw()
  Dim nNumber As Integer, nRowIndex As Integer

  'Generate a random number
  nNumber = Int(Rnd() * (19 - 2 + 1)) + 2

  'Go through the list
  For nRowIndex = 2 To 19
    If nRowIndex = nNumber Then
      MsgBox "The lucky one is " & Cells(nRowIndex, 1).Value
    End If
  Next nRowIndex
End Sub

이 코드에서 "Int (Rnd () * (19 – 2 + 1)) + 2"공식은 난수가 2-19가되도록합니다. 필요에 따라 수식을 수정할 수도 있습니다.

실제로 숫자를 생성하는 위의 공식을 제외하고 워크 시트 함수 "RandBetween"을 사용할 수도 있습니다. 그리고 모듈의 코드를 변경해야합니다.

'Generate a random number
nNumber = Application.WorksheetFunction.RandBetween(2, 19)
  1. 그런 다음 리본에서 "개발자"탭을 클릭합니다.
  2. 그런 다음 도구 모음에서 "삽입"버튼을 클릭합니다.
  3. 드롭 다운 목록에서 "버튼"옵션을 선택합니다.삽입 버튼
  4. 그런 다음 워크 시트를 클릭합니다. "매크로 할당"창이 나타납니다.
  5. 이 창에서 새 모듈에 입력 한 매크로를 클릭합니다.매크로 지정
  6. 그런 다음 "확인"버튼을 클릭합니다.
  7. 다음으로 워크 시트에서 버튼을 볼 수 있습니다. 버튼을 마우스 오른쪽 버튼으로 클릭하십시오.
  8. 팝업 창에서 "텍스트 편집"옵션을 선택합니다.
  9. 이제 버튼의 이름을 지정하십시오. 이름을 "행운의 사람"으로 지정하겠습니다.텍스트 편집
  10. 모든 설정을 완료했습니다. 그리고 당신은tart 활동. 버튼을 클릭하십시오.
  11. 그러면 직원 이름이 표시된 창이 나타납니다.결과

위의 단계에서 Excel을 사용하여 행운의 추첨을 만드는 것이 매우 편리하다는 것을 알 수 있습니다. 다음에 해당 작업에 Excel 파일 사용을 고려할 수도 있습니다.

Excel 파일을 복구하는 방법

대부분의 사용자는 Excel에서 오류가 발생하는 한 Excel 응용 프로그램을 종료합니다. 다음에 Excel 파일을 열면 문제가 더 이상 존재하지 않습니다. 그러나 심각한 Excel 문제가 발생하면 추가 조치를 취해야합니다. 타사 도구를 사용하여 손상된 Excel xlsx 복구 Excel 오류를 수정합니다. 이것은 또한 m입니다ost Excel 오류를 처리하는 효과적인 방법.

저자 소개 :

Anna Ma는 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. 손상된 문서 데이터 복구 및 전망 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM

지금 공유 :

댓글이 닫혀있다.