În foaia de lucru Excel, puteți face și o tragere la sorți. În acest articol, vă vom arăta cum să finalizați această sarcină în Excel.
O tragere la sorți este foarte comună în viața noastră de zi cu zi. De exemplu, trebuie să acordați bonusuri angajaților la sfârșitul unui an. Ați dori să selectați la întâmplare câțiva angajați norocoși. Prin urmare, puteți folosi fișierul Excel pentru a face o tragere la sorți.
Faceți o tragere la sorți
În această parte, vom prezenta metodele în detaliu.
- Deschideți fișierul Excel cu toate informațiile angajaților. În acest exemplu, în foaia de lucru sunt 18 angajați. Iar bonusurile existente se calculează în funcție de volumul vânzărilor lor.
- Apoi apăsați tastele de comandă rapidă „Alt + F11” de pe tastatură pentru a deschide editorul Visual Basic.
- După aceea, introduceți un nou modul în editor.
- În acest pas, copiați următoarele coduri în noul 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
În aceste coduri, formula „Int(Rnd() * (19 – 2 + 1)) + 2” se va asigura că numărul aleatoriu va fi în 2-19. De asemenea, puteți modifica formula în funcție de nevoile dvs.
De fapt, cu excepția formulei de mai sus pentru a genera un număr, puteți utiliza și funcția de foaie de lucru „RandBetween”. Și trebuie să schimbați codurile din modul.
'Generate a random number nNumber = Application.WorksheetFunction.RandBetween(2, 19)
- După aceea, faceți clic pe fila „Dezvoltator” din panglică.
- Apoi faceți clic pe butonul „Inserare” din bara de instrumente.
- În lista derulantă, alegeți opțiunea „Buton”.
- După aceea, faceți clic în foaia de lucru. Veți vedea fereastra „Atribuiți macrocomandă”.
- În această fereastră, faceți clic pe macrocomanda pe care ați introdus-o în noul modul.
- Și apoi faceți clic pe butonul „OK”.
- În continuare, puteți vedea butonul în foaia de lucru. Faceți clic dreapta pe butonul.
- În fereastra pop-up, alegeți opțiunea „Editați text”.
- Acum dă un nume butonului. Îi vom numi „Persoană norocoasă”.
- Ați finalizat toate setările. Și puteți începe activitatea. Faceți clic pe buton.
- Și apoi veți vedea o fereastră pop-up cu numele angajatului dvs.
Din pașii de mai sus, puteți vedea că folosirea Excel pentru a face o tragere la sorți este foarte convenabilă. Data viitoare, puteți lua în considerare și utilizarea fișierelor Excel pentru acele sarcini.
Cum să vă reparați fișierele Excel
Majoritatea utilizatorilor vor ieși din aplicația Excel atâta timp cât întâlnesc erori în Excel. Și data viitoare când vor deschide un fișier Excel, problemele nu vor mai exista. Dar dacă întâmpinați probleme grave cu Excel, trebuie să luați măsuri suplimentare. Puteți utiliza un instrument terță parte pentru reparați Excel xlsx deteriorat și corectați erorile Excel. Aceasta este, de asemenea, cea mai eficientă metodă de a remedia erorile Excel.
Introducerea autorului:
Anna Ma este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv reparați datele documentelor corupte și produse software de reparații Outlook. Pentru mai multe informații vizitați www.datanumen.com