Სარჩევი
VBA Mod არ არის ფუნქცია, ხოლო MOD არის ფუნქცია Excel-ის სამუშაო ფურცელში. VBA Mod არის ოპერატორი, რომელიც ყოფს ორ რიცხვს და აბრუნებს დარჩენილს . ოპერატორი Mod არის MODULO -ის მოკლე ფორმა, რომელიც გამოიყენება მათემატიკურ ოპერაციებში. Mod ოპერატორები ამრგვალებენ მცურავი წერტილი .
ამ სტატიაში მე გაჩვენებთ თქვენ გაქვთ Excel VBA Mod ოპერატორის გამოყენების სხვადასხვა მაგალითები.
ჩამოტვირთეთ პრაქტიკაში
VBA Mod ოპერატორის მაგალითები. xlsm
VBA Mod ფუნქციის საფუძვლები: შეჯამება & amp; სინტაქსი
შეჯამება
VBA Mod ოპერატორი ყოფს ორ რიცხვს და აბრუნებს დარჩენილს . სადაც ერთი ცნობილია როგორც გამყოფი მეორე არის რიცხვი . Mod ოპერატორი ყოფს ნომერს გამყოფზე .
სინტაქსი
Number1 Mod Number2 (Divisor)
არგუმენტები
| არგუმენტები | აუცილებელი/ სურვილისამებრ | ახსნა |
|---|---|---|
| ნომერი 1 | საჭიროა | ეს არის ციფრული გამოხატულება |
| ნომერი2 | აუცილებელი | ეს არის ციფრული გამოხატულება |
დაბრუნების მნიშვნელობა
VBA Mod ოპერატორი აბრუნებს ნარჩენს .
ვერსია
VBA Mod ოპერატორი ხელმისაწვდომია Excel 2000 და უფრო ახალი ვერსიებისთვის.
მე ვიყენებ Excel Microsoft 365 ახსნილია 1-ლ ნაწილში.
➤ მე დავარქვით ღილაკს ლუწი ან კენტი .
ამის შემდეგ დააწკაპუნეთ ღილაკზე გაუშვით VBA კოდი.
აქედან გამომდინარე, თქვენ გაიგებთ რომელი მნიშვნელობა არის ლუწი და რომელი კენტი .
აქ, 1 არის კენტი რიცხვი.
აქ, 2 არის ლუწი ნომერი.
დაწვრილებით: VBA If – მაშინ – სხვა განცხადება Excel-ში (4 მაგალითი)
9. უჯრედების დიაპაზონის გამოყენება VBA Mod-ში ნაშთის მისაღებად
ასევე შეგიძლიათ გამოიყენოთ უჯრედების დიაპაზონი ნარჩენი -ის მისაღებად. VBA Mod .
VBA რედაქტორის გასახსნელად, მიჰყევით 1-ელ ნაწილში ახსნილ ნაბიჯებს.
შემდეგ, ჩაწერეთ შემდეგი კოდი მოდული .
5806
აქ, Get_Reminder_UsingVBA ქვეპროცედურში, მე გამოვაცხადე ცვლადი n როგორც მთელი .
შემდეგ, გამოვიყენე For ციკლი, სადაც შევინარჩუნე მნიშვნელობა, რომელიც გამოვაცხადე უჯრედის მითითებით. მარყუჟი იმუშავებს მნიშვნელობებზე 4 9 -მდე.
შემდეგ გამოიყენეთ MsgBox ნარჩენის <2 საჩვენებლად>.
ახლა, შეინახეთ კოდი და დაბრუნდით სამუშაო ფურცელზე.
ღილაკის ჩასასმელად, მიჰყევით 1-ლ ნაწილში ახსნილ ნაბიჯებს .
➤ მე დავარქვით ღილაკს Dynamic Cell Reference .
ამის შემდეგ დააწკაპუნეთ ღილაკზე გაუშვით VBA კოდი.
აქედან გამომდინარე, თქვენ მიიღებთ დარჩენილს ყველა გამოყენებული მნიშვნელობისთვის ერთიერთით.
პირველი არის ნომრისთვის 29 სადაც გამყოფი არის 3 .
მეორე არის ნომრისთვის -47 სადაც გამყოფი არის 5 .
ციკლი იმუშავებს მანამ, სანამ არ მიაღწევს მწკრივს 9 . მეხუთე არის ნომრისთვის 59 სადაც გამყოფი არის 6 .
დაკავშირებული კონტენტი: როგორ გამოვიყენოთ VBA Randomize ფუნქცია Excel-ში (5 მაგალითი)
განსხვავება Excel MOD & VBA Mod
თუმცა უმეტეს შემთხვევაში დაბრუნებული მნიშვნელობები იგივეა MOD ფუნქციისთვის და VBA Mod ოპერატორისთვის, მაგრამ ზოგიერთ შემთხვევაში შედეგია განსხვავდება ერთმანეთისგან. ნება მომეცით გაჩვენოთ განსხვავება მათ შორის.
| MOD ფუნქცია | VBA Mod ოპერატორი |
|---|---|
| MOD ფუნქცია აბრუნებს როგორც მთლიანი და ათწილადი ციფრებს. | Mod ოპერატორი აბრუნებს მხოლოდ მთლიანი ციფრებს. |
| უარყოფითი ნომრის გამოყენებისას MOD ის არ აბრუნებს უარყოფითი ნიშანი . | ის მხარს უჭერს უარყოფით რიცხვებს და შემდეგ აბრუნებს უარყოფით ნიშანს . |
დასამახსოვრებელი რამ
🔺 ოპერატორი დაამრგვალებს ათობითი/მცურავი წერტილებს.
პრაქტიკის განყოფილება
მე მივაწოდე სავარჯიშო ფურცელი სამუშაო წიგნში ამ ახსნილი მაგალითების გამოსაყენებლად.
დასკვნა
ამ სტატიაში მე ვაჩვენე Excel VBA Mod ოპერატორის 9 მაგალითი. ასევე ვცდილობდი დამეფარებინა მიზეზები, რომ ხშირად მეჩვენებინა შეცდომები. იმ ნივთებთან ერთად, რაც უნდა გახსოვდეთ ოპერატორის გამოყენებისას. მოგერიდებათ კომენტარის გაკეთება ქვემოთ ნებისმიერი სახის შეკითხვისა და შემოთავაზებისთვის.
განახორციელეთ ეს მაგალითები.9 VBA Mod ფუნქციის გამოყენების მაგალითები Excel-ში
1. VBA Mod-ის გამოყენება ნარჩენების მისაღებად
თუ გსურთ, შეგიძლიათ მიიღოთ ნარჩენი VBA Mod ოპერატორის გამოყენებით.
ნება მომეცით აგიხსნათ პროცედურა,
დასაწყისად გახსენით დეველოპერი ჩანართი >> აირჩიეთ Visual Basic .
➤ ახლა გამოჩნდება Microsoft Visual Basic აპლიკაციებისთვის ახალი ფანჯარა.
შემდეგ, ჩასმა >> აირჩიეთ მოდული
ახლა ჩაწერეთ შემდეგი კოდი მოდულში .
7735
აქ, Get_Reminder ქვეპროცედურში, მე გამოვაცხადე ცვლადი n როგორც მთლიანი და გამოვიყენე <1-ის დაბრუნებული მნიშვნელობის შესანარჩუნებლად>Mod ოპერატორი.
შემდეგ გამოიყენეთ MsgBox ნარჩენი საჩვენებლად.
ახლა, შენახვა კოდი და დაუბრუნდით სამუშაო ფურცელს.
ისევ გახსენით დეველოპერი ჩანართი >> ჩასმა -დან >> აირჩიეთ ღილაკი ფორმის კონტროლიდან
ახლა, გადაათრიეთ ღილაკი მოათავსეთ იქ, სადაც გსურთ წარწერის მიცემა.
შემდეგ, შეგიძლიათ დაასახელოთ ღილაკი.
➤ მე დავარქვი მიიღეთ შეხსენება .
⏩ ახლა, დააწკაპუნეთ მაუსის მარჯვენა ღილაკით გამოჩნდება კონტექსტური მენიუ მინიჭება მაკრო .
აქედან აირჩიეთ მინიჭება მაკრო .
⏩ გამოჩნდება დიალოგური ფანჯარა მაკროს მინიჭება -დან. .
შემდეგ,აირჩიეთ მაკროს სახელი და მაკროები -ში.
⏩ ავირჩიე Get_Reminder მაკროს სახელიდან და ავირჩიე VBA Mod.xlsm Macros-დან -დან.
ბოლოს, დააწკაპუნეთ OK .
შემდეგ დააწკაპუნეთ ღილაკზე სახელად Get_Reminder .
აქედან გამომდინარე, გამოჩნდება msg box ნარჩენი .
შეგიძლიათ ეს გააკეთოთ ყველა ნომრისთვის დარჩენილი მისაღებად.
დაწვრილებით: VBA ფორმატის ფუნქცია Excel-ში (8 გამოყენება მაგალითებთან ერთად)
2. უჯრედის მითითების გამოყენება VBA Mod-ში დარჩენილის მისაღებად
Excel-ის ფურცლიდან Cell Reference გამოყენებით, შეგიძლიათ მიიღოთ ნარჩენი VBA Mod -დან.
გასახსნელად VBA რედაქტორი, მიჰყევით 1-ელ ნაწილში ახსნილ ნაბიჯებს.
შემდეგ, ჩაწერეთ შემდეგი კოდი მოდულში .
1635
აქ, Reminder_Using_CellReference , მე გამოვაცხადე ცვლადი n როგორც მთლიანი და გამოვიყენე Mod <-ის დაბრუნებული მნიშვნელობის შესანარჩუნებლად. 2>ოპერატორი.
შემდეგი , გამოიყენა უჯრედის მითითება B4 როგორც number1 და C4 როგორც number2 (გამყოფი)
შემდეგ გამოიყენეთ MsgBox დარჩენის საჩვენებლად.
ახლა, შეინახეთ კოდი და დაბრუნდით სამუშაო ფურცელზე.
ჩასვათ ღილაკი , მიჰყევით 1-ლ ნაწილში ახსნილ ნაბიჯებს.
➤ მე დავარქვით ღილაკს Cell Reference .
ამის შემდეგ დააწკაპუნეთ ღილაკი VBA -ის გასაშვებადკოდი.
აქედან გამომდინარე, თქვენ მიიღებთ ნარჩენს გამოყენებული უჯრედის მითითებისთვის.
დაკავშირებული კონტენტი: როგორ დააბრუნეთ მნიშვნელობა VBA ფუნქციაში (როგორც მასივის, ასევე არამასივნის მნიშვნელობები)
3. VBA Mod-ის გამოყენება უარყოფითი ნომრიდან ნაშთის მისაღებად
VBA Mod ასევე მხარს უჭერს უარყოფით ციფრებს დარჩენის გამოთვლისას.
გასახსნელად VBA რედაქტორი, მიჰყევით 1-ელ ნაწილში ახსნილ ნაბიჯებს.
შემდეგ, ჩაწერეთ შემდეგი კოდი მოდულში .
8904
აქ , Reminder_From_NegativeNumber-ში, გამოვაცხადე ცვლადი n როგორც მთლიანი და გამოვიყენე Mod ოპერატორის დაბრუნებული მნიშვნელობის შესანარჩუნებლად.
შემდეგ, გამოიყენეთ უჯრედის მითითება B5 როგორც ნომერი1 და C5 როგორც ნომერი2 (გამყოფი)
შემდეგ გამოიყენეთ MsgBox ნარჩენი საჩვენებლად.
ახლა, შეინახეთ კოდი და დაუბრუნდით სამუშაო ფურცელს.
> ღილაკის ჩასართავად, მიჰყევით 1-ელ ნაწილში ახსნილ ნაბიჯებს.
➤ მე დავასახელე e ღილაკი შეხსენება უარყოფითი ნომრიდან .
ამის შემდეგ დააწკაპუნეთ ღილაკზე VBA კოდის გასაშვებად.
ამიტომ, თქვენ მიიღებთ დარჩენილს უარყოფითი ნომრისთვის .
დაწვრილებით: როგორ გამოვიყენოთ VBA IsNumeric ფუნქცია (9 მაგალითი)
4. VBA Mod-ის გამოყენება უჯრედში ნარჩენების მისაღებად
დარჩენის ჩვენების ნაცვლად მეშვეობით msg ყუთი შეგიძლიათ მოათავსოთ ის უჯრედში VBA MOD ფუნქციის გამოყენებით.
VBA გასახსნელად. რედაქტორს, მიჰყევით 1-ელ ნაწილში ახსნილ ნაბიჯებს.
შემდეგ, ჩაწერეთ შემდეგი კოდი მოდულში .
9086
აქ, s ქვეპროცედურში Reminder_in_Cell , მე გამოვიყენე ActiveCell.FormulaR1C1 ფორმატი ActiveCell პოზიციის მისაღებად.
შემდეგ, გამოიყენეთ MOD ფუნქცია ნარჩენი მისაღებად.
ასევე, გამოიყენეთ Select მეთოდი.
ახლა. , შეინახეთ კოდი და დაბრუნდით სამუშაო ფურცელზე.
ღილაკის და მინიჭება VBA კოდის ჩასასმელად. მიჰყევით პირველ ნაწილში ახსნილ ნაბიჯებს.
➤ მე დავარქვით ღილაკს შეხსენება უჯრედში .
შემდეგი აირჩიეთ D4 უჯრედი.
შემდეგ, დააწკაპუნეთ ღილაკზე VBA კოდის გასაშვებად.
შედეგად, თქვენ მიიღებთ ნარჩენი არჩეულ უჯრედში.
იგივე პროცესის შემდეგ, თქვენ მიიღებთ ნარჩენს დანარჩენისთვის. ნომრები.
დაწვრილებით: როგორ გამოვიყენოთ MsgBox ფუნქცია Excel VBA-ში (სრული სახელმძღვანელო)
5. VBA Mod-ის გამოყენება მთელი რიცხვის გამყოფით & Float Number
იმ შემთხვევაში, თუ თქვენი გამყოფი არის მთლიანი ტიპი, მაგრამ თქვენი ნომერი არის float აკრიფეთ და შეგიძლიათ გამოიყენოთ VBA Mod ოპერატორი.
VBA რედაქტორის გასახსნელად მიჰყევით განყოფილებაში ახსნილ ნაბიჯებს1.
შემდეგ, ჩაწერეთ შემდეგი კოდი მოდულში .
4770
აქ, R eminder_From_Decimal_Number ქვეპუნქტში. -პროცედურა, მე გამოვაცხადე ცვლადი n როგორც მთლიანი და გამოვიყენე Mod ოპერატორის დაბრუნებული მნიშვნელობის შესანარჩუნებლად.
შემდეგ გამოიყენეთ უჯრედის მითითება B5 როგორც ნომერი1 და C5 როგორც number2 (გამყოფი)
შემდეგ გამოიყენეთ MsgBox დარჩენის საჩვენებლად.
ახლა, შეინახეთ კოდი და დაუბრუნდით სამუშაო ფურცელს.
ჩასვით ღილაკი , მიჰყევით 1-ლ ნაწილში აღწერილი ნაბიჯებს.
➤ მე დავარქვით ღილაკს შეხსენება ათწილადი ნომრიდან .
ამის შემდეგ დააწკაპუნეთ ღილაკზე ღილაკი VBA კოდის გასაშვებად.
აქედან გამომდინარე, თქვენ მიიღებთ დარჩენილს ათწილადი რიცხვისთვის .
მაგრამ არის პრობლემა, რომ VBA ამრგვალებს ათწილადს . აქ, შედეგი უნდა ყოფილიყო 2.25 მაგრამ VBA Mod დაამრგვალა 2 -მდე.
გახსოვდეთ, თუ არის ათწილადი/ მცურავი წერტილი აღემატება 0.5 VBA Mod-ში მაშინ დამრგვალდება შემდეგ მთელ რიცხვამდე.
თუ ის 0.5-ზე ნაკლებია VBA Mod -ში, შემდეგ დამრგვალდება არსებულ მთელ რიცხვამდე.
წაიკითხეთ მეტი: როგორ გამოვიყენოთ VBA Int ფუნქცია Excel-ში ( 3 მაგალითი)
მსგავსი წაკითხვები:
- როგორ გამოვიყენოთ IsNull ფუნქცია Excel VBA-ში (5მაგალითები)
- გამოიყენეთ VBA Str ფუნქცია Excel-ში (4 მაგალითი)
- როგორ გამოვიყენოთ VBA Switch ფუნქცია (6 შესაფერისი მაგალითი)
- გამოიყენეთ VBA Len ფუნქცია Excel-ში (4 მაგალითი)
- როგორ ამოიღოთ დუბლიკატები Excel Sheet-ში (7 მეთოდი)
6. VBA Mod-ის გამოყენება Divisor & რიცხვი ორივე ათწილადია
თუ თქვენი გამყოფი და რიცხვი ორივე არის ათწილადი/ათწილადი ტიპი, მაშინ ასევე შეგიძლიათ გამოიყენოთ VBA Mod ოპერატორი.
VBA რედაქტორის გასახსნელად, მიჰყევით 1-ელ ნაწილში აღწერილი ნაბიჯებს.
შემდეგ, ჩაწერეთ შემდეგი კოდი მოდული .
7276
აქ, ქვეპროცედურში Decimal_Both_Divisor_Number, მე გამოვაცხადე ცვლადი n როგორც მთლიანი და გამოიყენა Mod ოპერატორის დაბრუნებული მნიშვნელობის შესანარჩუნებლად.
შემდეგ, გამოიყენა უჯრედის მითითება B5 როგორც ნომერი1 და C5 როგორც number2 (გამყოფი)
შემდეგ გამოიყენეთ MsgBox ნარჩენი საჩვენებლად.
ახლა, შეინახეთ კოდი და დაუბრუნდით სამუშაო ფურცელს.
ღილაკის ჩასასმელად, მიჰყევით 1-ლ ნაწილში აღწერილი ნაბიჯებს.
➤ მე დავარქვით ღილაკს Get Reminder From When Divisor & რიცხვი ათწილადი .
ამის შემდეგ დააწკაპუნეთ ღილაკზე VBA კოდის გასაშვებად.
აქედან გამომდინარე, თქვენ მიიღებთ ღილაკს 1>ნარჩენი როგორც ათწილადი გამყოფი და რიცხვებისთვის .
მაგრამ არის პრობლემა, რომ VBA ამორგებს ათწილადს . აქ, შედეგი უნდა ყოფილიყო 1.75 მაგრამ VBA Mod დაამრგვალა 2 -მდე.
მსგავსი კონტენტი: VBA EXP ფუნქცია Excel-ში (5 მაგალითი)
7. VBA Mod 0.5-ზე მეტი ათწილადი რიცხვის დასამრგვალებლად
აქ, მე გავაკეთებ გაჩვენებთ, როგორ მუშაობს დაბრუნება VBA Mod .
იმისთვის, რომ გაჩვენოთ ათწილადი ქულის პრობლემა, ჯერ გამოვთვლი ნარჩენი Excel MOD ფუნქციის გამოყენებით.
უჯრედში D4 აკრიფეთ შემდეგი ფორმულა,
=MOD(B6, C6) აქ მე გამოვიყენე B6 როგორც ნომერი C6 როგორც გამყოფი .
შემდეგ, დააჭირეთ ENTER ნარჩენის მისაღებად და მიიღებთ ნარჩენს რომელიც იქნება 7.7 .
ახლა, მოდით გამოვთვალოთ VBA Mod -ით, VBA რედაქტორის გასახსნელად მიჰყევით 1-ელ ნაწილში ახსნილ ნაბიჯებს.
შემდეგ, ჩაწერეთ შემდეგი კოდი მოდულში .
8853
აქ, ქვეპროცედურში Decimal_Both_Divisor_Number, მე გამოვაცხადე. ცვლადი e n როგორც მთლიანი და გამოიყენა Mod ოპერატორის დაბრუნებული მნიშვნელობის შესანარჩუნებლად.
შემდეგ გამოიყენეთ უჯრედის მითითება B6 როგორც number1 და C6 როგორც number2 (გამყოფი)
შემდეგ გამოიყენეთ MsgBox საჩვენებლად ნარჩენი .
ახლა, შეინახეთ კოდი და დაუბრუნდით სამუშაო ფურცელს.
ღილაკის ჩასასმელად, მიჰყევით Theნაბიჯები ახსნილია სექციაში 1.
➤ მე დავარქვით ღილაკს RoundsUp ათწილადი რიცხვი .
ამის შემდეგ დააწკაპუნეთ ღილაკზე გაუშვით VBA კოდი.
აქედან გამომდინარე, თქვენ მიიღებთ ნარჩენს გამოყენებული უჯრედის მითითებისთვის.
დაათვალიერეთ ყურადღებით. დარჩენილზე რომ VBA Mod დაბრუნდა. MOD ფუნქცია იგივე მნიშვნელობებისთვის დააბრუნა 7.7 მაგრამ VBA Mod ოპერატორმა დააბრუნა 0 . როგორც VBA დაამრგვალა მნიშვნელობები.
დაწვრილებით: როგორ გამოვიყენოთ VBA მრგვალი ფუნქცია Excel-ში (6 სწრაფი გამოყენება)
8. განსაზღვრეთ ლუწი ან კენტი რიცხვი
VBA Mod ასევე განსაზღვრავს ლუწი ან კენტი რიცხვს მოცემული დიაპაზონიდან.
VBA რედაქტორის გასახსნელად, მიჰყევით 1-ელ ნაწილში ახსნილ ნაბიჯებს.
შემდეგ, ჩაწერეთ შემდეგი კოდი მოდულში .
8099
აქ, ქვეპროცედურში Determine_Even_Or_Odd, მე გამოვაცხადე ცვლადი n როგორც მთლიანი რიცხვი. .
შემდეგ, გამოვიყენე For ციკლი, სადაც შევინარჩუნე მნიშვნელობა, რომელიც გამოვაცხადე უჯრედის მითითებით.
შემდეგ, გამოვიყენე IF ფუნქცია, სადაც მე დავაყენე კრიტერიუმები, როგორც n Mod 2 = 0 თუ მნიშვნელობა მართალია, მაშინ ის დააბრუნებს ლუწი განცხადებას, წინააღმდეგ შემთხვევაში კენტი .
შემდეგ გამოიყენეთ MsgBox განცხადებების საჩვენებლად.
ახლა, შეინახეთ კოდი და დაუბრუნდით სამუშაო ფურცელს.
ღილაკის ჩასასმელად მიჰყევით ნაბიჯებს
