Az Excel munkalapon szerencsesorsolást is készíthet. Ebben az írásban megmutatjuk, hogyan kell befejezni ezt a feladatot Excelben.
A szerencsés sorsolás nagyon gyakori mindennapi életünkben. Például bónuszokat kell adnia az alkalmazottaknak egy év végén. Véletlenszerűen szeretne kiválasztani néhány szerencsés alkalmazottat. Ezért az Excel fájl segítségével szerencsés sorsolást készíthet.
Készítsen szerencsés sorsolást
Ebben a részben részletesen bemutatjuk a módszereket.
- Nyissa meg az Excel fájlt az alkalmazottak összes adatával. Ebben a példában 18 alkalmazott szerepel a munkalapon. A meglévő bónuszokat pedig az eladási mennyiségük alapján számítják ki.
- Ezután nyomja meg az „Alt + F11” gyorsbillentyűket a billentyűzeten a Visual Basic szerkesztő megnyitásához.
- Ezután helyezzen be egy új modult a szerkesztőbe.
- Ebben a lépésben másolja be a következő kódokat az új modulba:
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
Ezekben a kódokban az „Int(Rnd() * (19 – 2 + 1)) + 2” képlet biztosítja, hogy a véletlen szám 2-19 között legyen. A képletet igény szerint módosíthatja is.
Valójában a fenti képlet kivételével a szám generálásához használhatja a „RandBetween” munkalapfüggvényt is. És meg kell változtatni a kódokat a modulban.
'Generate a random number nNumber = Application.WorksheetFunction.RandBetween(2, 19)
- Ezután kattintson a „Fejlesztő” fülre a szalagon.
- Ezután kattintson a „Beszúrás” gombra az eszköztáron.
- A legördülő listában válassza a „Gomb” lehetőséget.
- Ezt követően kattintson a munkalapra. Ekkor megjelenik a „Makró hozzárendelése” ablak.
- Ebben az ablakban kattintson az új modulba bevitt makróra.
- Ezután kattintson az „OK” gombra.
- Ezután láthatja a gombot a munkalapon. Kattintson a jobb gombbal a gombra.
- A felugró ablakban válassza a „Szöveg szerkesztése” lehetőséget.
- Most adjon nevet a gombnak. „Szerencsés személy”-nek nevezzük.
- Az összes beállítással végzett. Elkezdheti a tevékenységet. Kattintson a gombra.
- Ezután megjelenik egy felugró ablak az alkalmazottja nevével.
A fenti lépésekből láthatja, hogy az Excel használata nagyon kényelmes szerencsés sorsoláshoz. A következő alkalommal megfontolhatja az Excel-fájlok használatát is ezekhez a feladatokhoz.
Az Excel-fájlok javítása
A felhasználók többsége mindaddig kilép az Excel alkalmazásból, amíg hibákat észlel az Excelben. És amikor legközelebb megnyitnak egy Excel-fájlt, a problémák megszűnnek. De ha súlyos Excel-problémákkal találkozik, további lépéseket kell tennie. Használhat harmadik féltől származó eszközt a sérült Excel xlsx javítása és javítsa ki az Excel hibáit. Ez a leghatékonyabb módszer az Excel hibák kezelésére is.
Szerző Bevezetés:
Anna Ma adat-helyreállítási szakértő DataNumen, Inc., amely világelső az adat-helyreállítási technológiák területén, beleértve javítsa ki a sérült dokumentumadatokat és outlook javítószoftver termékek. További információért látogasson el www.datanumen.com