İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Exceldə lotereya nömrələrini necə yaratmaq olar?

Heç Exceldə lotereya ədədləri yaratmağı düşünürsənmi və ya Excel-də lotereya sayını yaratmağı düşünürsən? Bu yazıda, asanlıqla əldə etmək üçün üç üsul təqdim edirəm.

Excel funksiyaları ilə lotereya nömrələrini yaradın (5 addım)

VBA Makro ilə lotereya nömrələrini yaradın

Excel üçün Kutools ilə lotereya nömrələrini yaradın (2 addım)

Asanlıqla Excel-də bir neçə sıra məlumatın bütün birləşməsini qeyd edin

Excel üçün Kutools Bütün Kombinasiyalar siyahısı kommunal bir neçə verilənlər seriyasından mümkün olan bütün birləşmələrə görə nəzərdə tutulmuşdur və göstərilən ekran görüntüsünün aşağıda göstərilən bir sütunda bu birləşmələri göstərməlidir. Tam xüsusiyyətli 60-sınaq sınaq!
1 bütün kombinasiyalar siyahısı kimi


Excel funksiyaları ilə lotereya nömrələrini yaradın

Bu üsul, lotereya nömrələrini yaratmaq üçün bir neçə Excel funksiyasını tətbiq etməklə sizə gedəcəkdir. Və aşağıdakıları edə bilərsiniz:

1. Boş bir işdə, Range A1: C1 sütun başlıqlarını aşağıda göstərilən ekran şəklində yazın:

2. Sütun A, B sütununda və S sütununda formulalar daxil edin:

(1) Cell A2-da formula daxil edin = RAND ()doldurun və sonra A2 aralığına sürüşdürün: A50.
(2) B2 hücresində formulun daxil edin =RANK($A2,$A$2:$A$50)+COUNTIF(B$1:B1,B1)-1, sonra Doldurma Tutacaqını B2 Aralığına sürükləyin: B50. A2, A2, cari xanaya qoyulan təsadüfi rəqəmdir: $ A $ 50: $ A $ 1 ilk formula ilə əldə etdikləri təsadüfi ədəddir, B $ 1 Sütun B-də ilk hüceyrədir və BXNUMX cari hüceyrənin yuxarı hüceyrəsi).
(3) Range C2: C50, 1-dan 49-ə qədər sıra nömrələrini daxil edin.

Sonra ekranın sol ekranında göstərildiyi kimi bir masa əldə edəcəksiniz:

qeyd lenti Formula yadda saxlamaq üçün çox mürəkkəbdir? Gələcəkdə yalnız bir kliklə təkrar istifadə etmək üçün Formula avtomatik mətn yazısı olaraq qeyd edin!
Daha çox oxu… Ödənişsiz sınaq

3. Aşağıdakı ekran şəklində göstərildiyi kimi, ardıcıl sıra aralığında boşluq aralığını tapın:

4. 1-in ilk sıra nömrəsini aşağıda formulun daxil edin = VLOOKUP (G1, $ B $ 1: $ C $ 50,2, FALSE) daxil edin və doldurmaq qolunu sizə lazım olan aralığa sürükləyin.

Qeyd: Bu formada, G1, 1, $ B $ 1: $ C $ 50 ilk sıralaması olan hüceyrəsidir: $ C $ 2 Unikal Rank sütun və Ball sayı sütunudur, 1 Range $ B $ 50 ikinci sütununda dəyərlər deməkdir: $ C $ XNUMX.

Sonra lotereyanın nömrələrini aşağıda göstərilən ekran vuruşunda əldə edəcəksiniz:

5. Bu isteğe bağlıdır. Mövcud səhifənin yeniləndiyi zaman lotereya nömrələrinin avtomatik olaraq dəyişdirilməsini maneə törətmək üçün, bu səhifəni tıklaya bilərsiniz Formula > Hesablama Seçimləri > dərslik.


VBA Makro ilə lotereya nömrələrini yaradın

Bu üsul Excel-də lotereya nömrələrini yaratmaq üçün VBA makrosunu tətbiq etməyə kömək edəcək. Xahiş edirəm:

1. Basın Dayandırmaq + F11 Microsoft Visual Basic for Applications penceresini açmaq üçün düymələr.

2. Basın Taxmaq > Modules yeni bir modul pəncərəsi açmaq və onu VBA kodu daxil etmək üçün:

VBA: Lotereya nömrəsi Generator Excel

Sub LotteyCode()
Dim Rng As Range
Dim WorkRng As Range
Dim xNumbers(49) As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Out put to (single cell):", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.Range("A1")
For xIndex = 1 To 49
xNumbers(xIndex) = xIndex
Next
For xIndex = 1 To 6
xNum = 1 + Application.Round(Rnd * (49 - xIndex), 0)
WorkRng.Offset(0, xIndex - 1).Value = xNumbers(xNum)
xNumbers(xNum) = xNumbers(50 - xIndex)
Next
End Sub

3. Basın F5 düyməsini basın və ya basın qaçış bu VBA makrosunu çalıştırmak üçün düyməsini basın.

4. İndi açılan informasiya qutusunda, lotereya nömrələrini çıxarmaq üçün bir hüceyrəni seçin və basın OK düyməsini basın.

Sonra 6 unikal lotereya ədədləri müəyyən hüceyrələrdə yaradılan və göstərilir.


Excel üçün Kutools ilə lotereya nömrələrini yaradın

Excel üçün Kutools quraşdırılmışsa, onun Təsadüfi məlumatları daxil edin kommunal bir dəfə Excel-də lotereya nömrələrini yaratmağa kömək edə bilər.

Excel üçün Kutools - Microsoft Excel üçün 300 Ətraflı funksiyaları və Alətlərdən daha çox birləşir

1. 6 bitişik hüceyrələri, məsələn A1: F1 seçin və sonra basın Kutools > Taxmaq > Təsadüfi məlumatları daxil edin.

2. İndi Təsadüfi Məlumatları Daxil etmə qutusu çıxır. Gedin Tam seksiyə yazın 1 in etibarən qutusu, növü 49 in Kənar qutusuna baxın Benzersiz dəyərlər seçimi və basın OK düyməsini basın. İndi 6 unikal lotereya ədədləri dərhal seçilmiş hüceyrələrdə yaradılıb və göstərilir.

Excel üçün Kutools - 300-dən çox lazımlı Excel alətləri daxildir. Tam xüsusiyyət pulsuz sınaq 60-gün, kredit kartı lazım deyil! Ele indicə onu al!


Demo: Excel üçün Kutools ilə lotereya nömrələri yaradır

Bu videoda Kutools nişanı və Kutools Plus nişanı əlavə olunur Excel üçün Kutools. Lazım olsa, klikləyin burada məhdudiyyətsiz bir 60 günlük pulsuz sınaq üçün!


Related articles:



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.