Kuinka tehdä onnekas piirtäminen Excel-laskentataulukossa VBA: n kautta

Excel-laskentataulukossa voit myös tehdä onnekkaan arvonnan. Tässä kirjoituksessa näytämme sinulle, kuinka tämä tehtävä voidaan suorittaa loppuun Excelissä.

Lucky-arvonta on hyvin yleistä jokapäiväisessä elämässämme. Esimerkiksi sinun on annettava palkkioita työntekijöille vuoden lopussa. Haluat valita joitain onnekkaita työntekijöitä satunnaisesti. Siksi voit käyttää Excel-tiedostoa onnen arvontaan.

Tee Lucky Draw

Tässä osassa esitellään menetelmät yksityiskohtaisesti.

  1. Avaa Excel-tiedosto, jossa on kaikki työntekijöiden tiedot. Tässä esimerkissä laskentataulukossa on 18 työntekijää. Ja nykyiset bonukset lasketaan niiden myyntimäärän mukaan.esimerkki
  2. Avaa sitten Visual Basic -editori painamalla näppäimistön pikanäppäimiä “Alt + F11”.
  3. Tämän jälkeen lisää uusi moduuli editoriin.Aseta moduuli paikalleen
  4. Kopioi tässä vaiheessa seuraavat koodit uuteen moduuliin:
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äissä koodeissa kaava “Int (Rnd () * (19 - 2 + 1)) + 2” varmistaa, että satunnaisluku on 2-19. Voit myös muokata kaavaa tarpeidesi mukaan.

Lukuun ottamatta yllä olevaa kaavaa, voit itse käyttää myös laskentataulukko-toimintoa "RandBetween". Ja sinun on vaihdettava koodit moduulissa.

'Generate a random number
nNumber = Application.WorksheetFunction.RandBetween(2, 19)
  1. Napsauta sen jälkeen valintanauhan Kehittäjä-välilehteä.
  2. Napsauta sitten työkalurivin painiketta "Lisää".
  3. Valitse avattavasta luettelosta vaihtoehto "Button".Lisää-painike
  4. Napsauta sen jälkeen laskentataulukossa. Näet Assign Macro -ikkunan.
  5. Napsauta tässä ikkunassa makroa, jonka olet syöttänyt uuteen moduuliin.Määritä makro
  6. Napsauta sitten painiketta "OK".
  7. Seuraavaksi näet painikkeen laskentataulukossa. Napsauta hiiren kakkospainiketta.
  8. Valitse ponnahdusikkunassa vaihtoehto "Muokkaa tekstiä".
  9. Anna nyt painikkeelle nimi. Nimeämme sen "Lucky Person".Muokkaa tekstiä
  10. Olet suorittanut kaikki asetukset. Ja voit start toiminta. Napsauta painiketta.
  11. Ja sitten näet ikkunan ponnahdusikkunan, jossa on työntekijän nimi.Tulos

Edellä olevista vaiheista näet, että Excelin käyttäminen onnellisen arvonnan tekemiseen on erittäin kätevää. Seuraavan kerran voit myös harkita Excel-tiedostojen käyttöä näissä tehtävissä.

Kuinka korjata Excel-tiedostot

Suurin osa käyttäjistä sulkee Excel-sovelluksen, kunhan he kohtaavat virheitä Excelissä. Ja kun seuraavan kerran he avaavat Excel-tiedoston, ongelmia ei enää ole. Mutta jos kohtaat vakavia Excel-ongelmia, sinun on tehtävä lisätoimia. Voit käyttää kolmannen osapuolen työkalua korjata vaurioitunut Excel xlsx ja korjaa Excel-virheet. Tämä on myös most tehokas tapa käsitellä Excel-virheitä.

Tekijän esittely:

Anna Ma on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien korjata vioittuneet doc-tiedot ja Outlookin korjausohjelmistotuotteet. Lisätietoja osoitteessa www.datanumen.com

Kommenttien lisääminen on estetty.