સામગ્રીઓનું કોષ્ટક
આ લેખ એક્સેલમાં VBA નો ઉપયોગ કરીને કોઈ ડુપ્લિકેટ વિના રેન્ડમ નંબર જનરેટર ના 4 ઉદાહરણો દર્શાવે છે. અહીં અમે અમારા કોડને ગોઠવવા માટે એક્સેલના બિલ્ટ-ઇન Rnd ફંક્શનનો ઉપયોગ કરીશું. અનન્ય રેન્ડમ નંબરો બનાવવા માટેની તકનીકો શીખવા માટે ચાલો ઉદાહરણોમાં ડાઇવ કરીએ.
પ્રેક્ટિસ વર્કબુક ડાઉનલોડ કરો
તમે આ લેખ વાંચી રહ્યાં હોવ ત્યારે કસરત કરવા માટે આ પ્રેક્ટિસ વર્કબુક ડાઉનલોડ કરો.
રેન્ડમ નંબર જનરેટર વિથ નો ડુપ્લિકેટ.xlsm
4 એક્સેલ VBA માં ડુપ્લિકેટ વગર રેન્ડમ નંબર જનરેટરના ઉદાહરણો
વિઝ્યુઅલ બેઝિક એડિટરમાં કોડ લખો
કોઈ ડુપ્લિકેટ વિના રેન્ડમ નંબરો બનાવવા માટે , આપણે ખોલો અને VBA લખવાની જરૂર છે કોડ વિઝ્યુઅલ બેઝિક એડિટરમાં. વિઝ્યુઅલ બેઝિક એડિટર ખોલવા ખોલવા સ્ટેપ્સ ફોલો કરો અને ત્યાં અમુક કોડ લખો.
- <1 પર જાઓ Excel રિબન માંથી>વિકાસકર્તા ટેબ.
- વિઝ્યુઅલ બેઝિક વિકલ્પ પર ક્લિક કરો.
- વિઝ્યુઅલ બેઝિક ફોર એપ્લીકેશન્સ વિન્ડોમાં, ઇનસર્ટ ડ્રોપડાઉન ને પસંદ કરવા માટે નવું મોડ્યુલ ક્લિક કરો વિકલ્પ.
હવે તમારો કોડ વિઝ્યુઅલ કોડ એડિટર ની અંદર મૂકો અને F5 દબાવો તેને ચલાવો તેને.
1. કોઈ ડુપ્લિકેટ વિના રેન્ડમ નંબર જનરેટ કરવા માટે VBA Rnd ફંક્શનનો ઉપયોગ
Rnd ફંક્શન નો ઉપયોગ Excel VBA થી <1 માં થાય છે>રેન્ડમ નંબરો બનાવો જે 0 ની વચ્ચે છે અને 1 એક્સક્લુઝિવ.
ટાસ્ક : 10 રેન્ડમ નંબર્સ જનરેટ કરો 0 અને 1 વચ્ચે સેલ્સ A1:A10 માં.
કોડ : વિઝ્યુઅલ બેઝિક એડિટરમાં નીચેનો કોડ ઇનસર્ટ કરો અને F5 દબાવો તેને ચલાવવા તેને.
7155
આઉટપુટ : ઉપરનો સ્ક્રીનશોટ 10 અનન્ય રેન્ડમ નંબર્સ<2 બતાવે છે> 0 અને 1 ની શ્રેણીમાં.
કોડ સમજૂતી:
આ કોડમાં, અમે Rnd ફંક્શન <2 નો ઉપયોગ કર્યો સેલ શ્રેણી A1:A10 માં રેન્ડમ નંબરો દાખલ કરવા માટે . એક નવો નંબર દાખલ કરતાં પહેલાં, અમે નંબર માટે જુઓ માટે ડુ જ્યારે લૂપ નો ઉપયોગ કર્યો. 1>પૂર્વવ્યાખ્યાયિત કોષ શ્રેણી (A1:A10) શું તે પહેલેથી અસ્તિત્વમાં છે અથવા નહીં . દર વખતે કોષ શ્રેણી માં નંબર ના અસ્તિત્વ ને તપાસવા માટે, અમે કોડને COUNTIF ફંક્શન , આ ફંક્શન સાથે ગોઠવ્યો છે. 1>તે દાખલ કરતા પહેલા પહેલાથી જ અસ્તિત્વમાં છે તે નંબરોની સૂચિ માં એક નવો રેન્ડમ નંબર ચેક કરે છે.
વધુ વાંચો : રેન્ડમ નંબર જનરેટ કરવા માટે એક્સેલ ફોર્મ્યુલા (5 ઉદાહરણો)
2. કોઈ ડુપ્લિકેટ્સ સાથે વ્યાખ્યાયિત લોઅરબાઉન્ડ અને અપરબાઉન્ડ માટે રેન્ડમ નંબર જનરેટર
એક વ્યાખ્યાયિત શ્રેણી ની અંદર રેન્ડમ નંબરો બનાવવા માટે, અમારે જરૂર છે અમારા VBA કોડમાં લોઅરબાઉન્ડ અને અપરબાઉન્ડ ને સેટ કરો. માહિતી માટે, નીચલી બાઉન્ડ એ સૌથી નીચી સંખ્યા અને અપરબાઉન્ડ છેરેન્ડમ નંબર જનરેટર માટે શ્રેણી માં સૌથી વધુ નંબર છે. અમે અમારા કોડમાં નીચેના સૂત્ર નો ઉપયોગ કરી શકીએ છીએ.
(અપરબાઉન્ડ - લોઅરબાઉન્ડ + 1) * Rnd + લોઅરબાઉન્ડ
2.1 રેન્ડમ નંબર જનરેટર- દશાંશ
ટાસ્ક : 10 રેન્ડમ નંબરો જનરેટ કરો 10 અને 20 વચ્ચે <1 માં>કોષ A1:A10.
કોડ : વિઝ્યુઅલ બેઝિક એડિટરમાં નીચેનો કોડ ઇનસર્ટ કરો અને F5 દબાવો તેને ચલાવવા તેને.
9654
આઉટપુટ : ઉપરોક્ત સ્ક્રીનશોટ 10 અનન્ય રેન્ડમ નંબર્સ<2 બતાવે છે> 1 અને 10 ની શ્રેણીમાં.
2.2 રેન્ડમ નંબર જનરેટર- પૂર્ણાંક
આ ચિત્રમાં, અમે <1 નો ઉપયોગ કરીશું> VBA Int ફંક્શન દૂર કરવા માટે રેન્ડમ નંબર્સ માંથી આંશિક ભાગ .
ટાસ્ક : સેલ્સ A1:B10 માં 1 અને 20 વચ્ચે 20 રેન્ડમ પૂર્ણાંક સંખ્યાઓ બનાવો.
કોડ : વિઝ્યુઅલ બેઝિક એડિટરમાં નીચેનો કોડ ઇનસર્ટ કરો અને F5 દબાવો તેને ચલાવવા તેને.
5637
આઉટપુટ : ઉપરનો સ્ક્રીનશોટ 20 અનન્ય રેન્ડમ પૂર્ણાંક સંખ્યાઓ દર્શાવે છે 1 અને 20 ની રેન્જમાં.
વધુ વાંચો: કોઈ રિપીટ્સ વિના એક્સેલમાં રેન્ડમ નંબર જનરેટર (9 પદ્ધતિઓ)
સમાન રીડિંગ્સ
- ડેટા એનાલિસિસ ટૂલ અને એક્સેલમાં કાર્યો સાથે રેન્ડમ નંબર જનરેટર
- કેવી રીતે એક્સેલમાં રેન્ડમ ડેટા જનરેટ કરો (9સરળ પદ્ધતિઓ)
- એક્સેલમાં રેન્ડમ 5 ડિજીટ નંબર જનરેટર (7 ઉદાહરણો)
- એક્સેલમાં રેન્ડમ 4 ડીજીટ નંબર જનરેટર (8 ઉદાહરણો)
- એક્સેલમાં સૂચિમાંથી રેન્ડમ નંબર બનાવો (4 રીતો)
3. એક્સેલ VBA માં અનન્ય રેન્ડમ નંબર જનરેટર માટે દશાંશ સ્થાનો નિર્દિષ્ટ કરો
અમે અમારા કોડમાં રાઉન્ડ ફંક્શન નો ઉપયોગ સ્પષ્ટ કરવા માટે અવ્યવસ્થિત રીતે બનાવેલ અનન્ય સંખ્યાઓ માં દશાંશ સ્થાનો ની સંખ્યા. ફંક્શનનું સિન્ટેક્સ છે-
રાઉન્ડ(અભિવ્યક્તિ, [સંખ્યા દશાંશ સ્થાનો])
આપણે સ્પષ્ટ કરવાની જરૂર છે અમારી જરૂરિયાત મુજબ 2જી દલીલ .
ટાસ્ક : 20 રેન્ડમ નંબરો જનરેટ કરો જેમાં 2 દશાંશ સ્થાનો ની વચ્ચે <1 સેલ્સ A1:B10 માં>1 અને 20 .
કોડ : વિઝ્યુઅલ બેઝિક એડિટરમાં નીચેનો કોડ ઇનસર્ટ કરો અને F5 દબાવો તેને ચલાવવા તેને.
8253
આઉટપુટ : ઉપરનો સ્ક્રીનશોટ 20 અનન્ય રેન્ડમ પૂર્ણાંક સંખ્યાઓ બતાવે છે 1 અને 20 ની શ્રેણીમાં 2 દશાંશ સ્થાન .
વધુ વાંચો: એક્સેલમાં દશાંશ (3 પદ્ધતિઓ) સાથે રેન્ડમ નંબર બનાવો
4. એક્સેલ VBA માં કોઈ ડુપ્લિકેટ્સ વિના રેન્ડમ નંબર જનરેટર માટે યુઝરફોર્મ વિકસાવો
આ ચિત્રમાં, અમે UserForm નો <1 માં ઉપયોગ કેવી રીતે કરવો તે બતાવીશું કોઈ ડુપ્લિકેટ સાથે રેન્ડમ નંબરો બનાવવા માટે Excel VBA .
કાર્ય: જનરેટ કરો20 રેન્ડમ નંબરો સેલ શ્રેણીમાં A1:B10 ઇનપુટ મૂલ્યો (i) લોઅરબાઉન્ડ (ii) સાથે UserForm નો ઉપયોગ કરીને અપરબાઉન્ડ (iii) દશાંશ સ્થાનોની સંખ્યા.
UserForm બનાવો:
અમારા ઇચ્છિત ઇનપુટ ફીલ્ડ્સ સાથે UserForm બનાવવા માટે નીચેના પગલાંઓ અનુસરો .
- Excel રિબન માંથી વિકાસકર્તા ટેબ પર જાઓ.
- વિઝ્યુઅલ પર ક્લિક કરો મૂળભૂત વિકલ્પ.
- Visual Basic For Applications વિન્ડોમાં, Insert dropdown <2 પર ક્લિક કરો વપરાશકર્તા ફોર્મ વિકલ્પ પસંદ કરવા માટે.
- વપરાશકર્તા ફોર્મમાં ઉમેરો a લેબલ .
- પ્રોપર્ટીઝમાં લેબલ ને લોઅરબાઉન્ડ તરીકે કૅપ્શન આપો.
- બે વધુ લેબલ્સ નામવાળા અપરબંડ અને દશાંશ સ્થાનો ઉમેરો.
- હવે યુઝરફોર્મ માં ત્રણ ટેક્સ્ટબોક્સ ઉમેરો.
- આ તબક્કે, ઉમેરો એક કમાન્ડ બટન અને તેને નામ આપો જનરેટ .
- હવે, કમાન્ડ બટન બે વાર ક્લિક કરો અને નીચેનો કોડ કોડ એડિટર માં મૂકો.
2910
- કોડ ચલાવવા F5 દબાવો>અને વપરાશકર્તા ફોર્મ દેખાયો .
- નીચલી બાઉન્ડ , અપરબાઉન્ડ, અને નંબર મૂકો દશાંશ સ્થાનો યુઝરફોર્મ માં અને જનરેટ પર દબાવોબટન .
આઉટપુટ : કોષ A1:B10 માં, ત્યાં 20 રેન્ડમ છે સંખ્યાઓ 2 દશાંશ સ્થાનો સાથે 1 થી 30ની શ્રેણીમાં.
વધુ વાંચો: એક્સેલમાં ડુપ્લિકેટ વિના રેન્ડમ નંબરો કેવી રીતે જનરેટ કરવા (7 રીતો)
યાદ રાખવા જેવી બાબતો
- આપણે તેનો ઉપયોગ પણ કરી શકીએ છીએ વિશિષ્ટ પૂર્ણાંક સંખ્યાઓ જનરેટ કરવા Int ફંક્શન ને બદલે ફંક્શનને ઠીક કરો. ફંક્શન સંખ્યા ના સંખ્યાનો અપૂર્ણાંક ભાગ દૂર કરે છે, જેમ કે ઇન્ટ ફંક્શન .
નિષ્કર્ષ
હવે, આપણે જાણીએ છીએ કે યોગ્ય ઉદાહરણોની મદદથી એક્સેલમાં VBA નો ઉપયોગ કરીને અનન્ય રેન્ડમ નંબરો કેવી રીતે જનરેટ કરવા. આશા છે કે, તે તમને કાર્યક્ષમતાનો વધુ વિશ્વાસપૂર્વક ઉપયોગ કરવામાં મદદ કરશે. કોઈપણ પ્રશ્નો અથવા સૂચનો તેમને નીચેના ટિપ્પણી બોક્સમાં મૂકવાનું ભૂલશો નહીં.
