Sådan laver du en heldig tegning i et Excel-regneark via VBA

I Excel-regneark kan du også lave en heldig lodtrækning. I dette skrivestykke skal vi vise dig, hvordan du afslutter denne opgave i Excel.

En heldig lodtrækning er meget almindelig i vores daglige liv. For eksempel skal du give bonusser til medarbejderne i slutningen af ​​et år. Du vil gerne vælge nogle heldige medarbejdere tilfældigt. Derfor kan du bruge Excel-filen til at lave en heldig lodtrækning.

Lav en heldig tegning

I denne del introducerer vi metoderne detaljeret.

1. Åbn Excel-filen med alle oplysningerne fra de ansatte. I dette eksempel er der 18 ansatte i regnearket. Og de eksisterende bonusser beregnes i henhold til deres salgsmængde.
2. Og tryk derefter på genvejstasterne "Alt + F11" på tastaturet for at åbne Visual Basic-editoren.
3. Derefter skal du indsætte et nyt modul i editoren.
4. I dette trin skal du kopiere følgende koder til det nye modul:

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

I disse koder vil formlen “Int (Rnd () * (19 - 2 + 1)) + 2” sikre, at det tilfældige tal er i 2-19. Du kan også ændre formlen efter dit behov.

Faktisk, bortset fra ovenstående formel for at generere et tal, kan du også bruge regnearkfunktionen "RandBetween". Og du skal ændre koderne i modulet.

'Generate a random number
nNumber = Application.WorksheetFunction.RandBetween(2, 19)

5. Klik derefter på fanen "Udvikler" i båndet.
6. Og klik derefter på knappen "Indsæt" i værktøjslinjen.
7. I rullelisten skal du vælge indstillingen "Knap".
8. Klik derefter på regnearket. Du får vist vinduet “Tildel makro”.
9. I dette vindue skal du klikke på den makro, du har indtastet i det nye modul.
10. Og klik derefter på knappen "OK".
11. Dernæst kan du se knappen i regnearket. Højreklik på knappen.
12. I pop op-vinduet skal du vælge indstillingen "Rediger tekst".
13. Giv nu et navn til knappen. Vi vil kalde det "Lucky Person".
14. Du har nu foretaget alle indstillinger. Og du kan starte aktiviteten. Klik på knappen.
15. Og så vil du se et vindue, der vises, med navnet på din medarbejder.

Fra ovenstående trin kan du se, at det er meget praktisk at bruge Excel til at lave en heldig lodtrækning. Næste gang kan du også overveje at bruge Excel-filer til disse opgaver.

Sådan repareres dine Excel-filer

Størstedelen af ​​brugerne forlader Excel-applikationen, så længe de møder fejl i Excel. Og næste gang de åbner en Excel-fil, eksisterer problemerne ikke længere. Men hvis du støder på alvorlige Excel-problemer, skal du tage yderligere handlinger. Du kan bruge et tredjepartsværktøj til reparation beskadiget Excel xlsx og rette Excel-fejl. Dette er også den mest effektive metode til at håndtere Excel-fejl.

Forfatter Introduktion:

Anna Ma er datagendannelsesekspert i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder reparere korrupte doc-data og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com