VBA Mod գործառույթ չէ, մինչդեռ MOD գործառույթ է Excel-ի աշխատաթերթում: VBA Mod -ը օպերատոր է, որը բաժանում է երկու թվեր և վերադարձնում մնացորդը : Mod օպերատորը MODULO -ի կարճ ձևն է, որն օգտագործվում է մաթեմատիկական գործողություններում: Mod օպերատորները կլորացնում են լողացող կետը :

Այս հոդվածում ես ցույց կտամ. դուք Excel VBA Mod օպերատորի օգտագործման տարբեր օրինակներ եք:

Ներբեռնեք գործնականում

VBA Mod ֆունկցիայի հիմունքները՝ ամփոփում & Շարահյուսություն

Ամփոփում

VBA Mod օպերատորը բաժանում է երկու թվեր և վերադարձնում մնացորդը ։ Այնտեղ, որտեղ մեկը հայտնի է որպես բաժանարար մյուսը թիվ է: Mod օպերատորը թիվը բաժանում է բաժանարար :

Շարահյուսություն

Number1 Mod Number2 (Divisor)

Փաստարկներ

Վերադարձի արժեքը

VBA Mod օպերատորը վերադարձնում է մնացորդ .

Տարբերակ

VBA Mod օպերատորը հասանելի է Excel 2000 և ավելի նոր տարբերակների համար:

Ես օգտագործում եմ Excel Microsoft 365 բացատրված է 1-ին բաժնում:

➤ Ես անվանել եմ կոճակը Զույգ կամ կենտ :

Դրանից հետո սեղմեք կոճակը <1-ը գործարկելու համար:>VBA կոդ:

Հետևաբար, դուք կիմանաք, թե որ արժեքը Զույգ և որն է Կենտ :

Այստեղ, 1 Կենտ թիվն է:

Այստեղ 2 Զույգ համարը:

Կարդալ ավելին. VBA If – Այնուհետեւ – Էլի հայտարարություն Excel-ում (4 օրինակ)

9. Օգտագործելով բջիջների տիրույթը VBA Mod-ում՝ մնացորդ ստանալու համար

Դուք նաև կարող եք օգտագործել բջիջների տիրույթը մնացորդը ստանալու համար՝ օգտագործելով VBA Mod :

VBA խմբագիրը բացելու համար հետևեք 1-ին բաժնում նկարագրված քայլերին:

Այնուհետև մուտքագրեք հետևյալ կոդը Մոդուլ ։

5013

Այստեղ, Get_Reminder_UsingVBA ենթակարգում, Ես հայտարարեցի n փոփոխականը։ որպես Ամբողջ թիվ :

Այնուհետև ես օգտագործեցի For հանգույցը, որտեղ ես պահեցի այն արժեքը, որը հայտարարել էի բջիջի հղման միջոցով: Օղակը կաշխատի 4 -ից 9 տողերի արժեքների համար:

Այնուհետև օգտագործեց MsgBox մնացորդը<2 ցույց տալու համար:>.

Այժմ, Պահեք կոդը և վերադարձեք աշխատաթերթ:

Կոճակը տեղադրելու համար հետևեք 1-ին բաժնում նկարագրված քայլերին: .

➤ Ես անվանել եմ կոճակը Dynamic Cell Reference :

Դրանից հետո սեղմեք Button VBA<2 գործարկելու համար:> կոդը:

Այդ պատճառով, դուք կստանաք մնացորդը բոլոր օգտագործված արժեքների համար մեկմեկով:

Առաջինը նախատեսված է թվի համար 29 որտեղ բաժանարարը 3 է:

2-րդը նախատեսված է թվի համար -47 որտեղ բաժանարարը 5 է: .

Օղակը կաշխատի այնքան ժամանակ, մինչև հասնի 9 տողին: Հինգերորդը նախատեսված է թվի համար 59 որտեղ բաժանարարը 6 է:

Առնչվող բովանդակություն. Ինչպես օգտագործել VBA Randomize ֆունկցիան Excel-ում (5 օրինակ)

Տարբերությունը Excel MOD & VBA Mod

Չնայած շատ դեպքերում վերադարձի արժեքները նույնն են MOD ֆունկցիայի և VBA Mod օպերատորի համար, սակայն որոշ դեպքերում արդյունքը տարբերվում են միմյանցից. Թույլ տվեք ցույց տալ նրանց միջև եղած տարբերությունը:

Հիշելու բաներ

🔺 Օպերատորը կկլորացնի տասնորդական/լողացող կետերը։

Պրակտիկա բաժին

Ես պրակտիկայի թերթիկ եմ տրամադրել աշխատանքային գրքույկում այս բացատրված օրինակները կիրառելու համար:

Եզրակացություն

Այս հոդվածում ես ցույց եմ տվել Excel VBA Mod օպերատորի 9 օրինակ։ Փորձեցի նաև լուսաբանել սխալները հաճախակի ցույց տալու պատճառները։ Այն բաների հետ մեկտեղ, որոնք դուք պետք է հիշեք օպերատորից օգտվելիս: Ազատորեն մեկնաբանեք ստորև ցանկացած տեսակի հարցումների և առաջարկների համար:

9 Excel-ում VBA Mod ֆունկցիայի օգտագործման օրինակներ

1. Օգտագործելով VBA Mod մնացորդ ստանալու համար

Եթե ցանկանում եք, կարող եք ստանալ մնացորդը ՝ օգտագործելով VBA Mod օպերատորը:

Թույլ տվեք բացատրել ձեզ ընթացակարգը,

Սկզբից բացեք Developer ներդիր >> ընտրեք Visual Basic :

➤ Այժմ կհայտնվի Microsoft Visual Basic հավելվածների նոր պատուհանը:

Հաջորդը՝ Տեղադրել >> ընտրեք Մոդուլ

Այժմ մուտքագրեք հետևյալ կոդը Մոդուլ :

3646

Այստեղ, Get_Reminder ենթակարգում ես n փոփոխականը հայտարարեցի որպես Ամբողջական և օգտագործեցի <1-ի վերադարձված արժեքը պահելու համար։>Mod օպերատոր:

Այնուհետև օգտագործեց MsgBox մնացորդը ցուցադրելու համար:

Այժմ, Պահպանեք կոդը և վերադարձեք աշխատաթերթ:

Կրկին բացեք Developer ներդիրը >> Տեղադրել -ից >> ընտրել Կոճակը Ձևի վերահսկումներից

Այժմ Քաշեք Կոճակը դեպի Տեղադրեք այն այնտեղ, որտեղ ցանկանում եք մակագրել:

Հաջորդը, դուք կարող եք անուն տալ կոճակին:

➤ Ես այն անվանել եմ Ստացեք հիշեցում :

⏩ Այժմ մկնիկի վրա աջ սեղմեք կհայտնվի Նշանակել Macro համատեքստային ընտրացանկը:

Այնտեղից ընտրեք Նշանակել մակրո :

⏩ Կհայտնվի երկխոսության տուփ Նշանակել մակրո -ից: .

Այնուհետև,ընտրեք Մակրո անունը և Մակրոները -ում:

⏩ Ես ընտրել եմ Get_Reminder Մակրո անունից և ընտրել եմ VBA Mod.xlsm Մակրոներից -ից:

Վերջապես սեղմեք OK :

Այնուհետև սեղմեք Get_Reminder անունով կոճակը:

Այսպիսով, այն կցուցադրի msg տուփ մնացորդով :

Դուք կարող եք դա անել բոլոր թվերի համար , որպեսզի ստանաք մնացորդը :

Կարդալ ավելին. VBA ֆորմատի ֆունկցիան Excel-ում (8 օգտագործում օրինակներով)

2. Օգտագործելով բջջային հղումը VBA Mod-ում մնացորդ ստանալու համար

Օգտագործելով Cell Reference Excel թերթից, դուք կարող եք ստանալ մնացորդը VBA Mod -ից:

Բացել VBA խմբագիր, հետևեք 1-ին բաժնում նկարագրված քայլերին:

Այնուհետև մուտքագրեք հետևյալ կոդը Module -ում:

7037

Այստեղ, Reminder_Using_CellReference -ում ես n փոփոխականը հայտարարեցի որպես Ամբողջական և օգտագործեցի այն Mod <-ի վերադարձված արժեքը պահպանելու համար: 2>օպերատոր:

Հաջորդ , օգտագործեց բջիջի հղումը B4 որպես համար1 և C4 որպես համար2 (բաժանարար)

Այնուհետև օգտագործեց MsgBox մնացորդը ցուցադրելու համար:

Այժմ Պահպանեք կոդը և վերադարձեք աշխատաթերթ:

Տեղադրեք Կոճակ , հետևեք 1-ին բաժնում նկարագրված քայլերին:

➤ Ես անվանել եմ կոճակը Cell Reference :

Դրանից հետո սեղմեք Կոճակ VBA գործարկելու համարկոդը:

Հետևաբար, դուք կստանաք մնացորդը օգտագործված բջջային տեղեկանքի համար:

Առնչվող բովանդակություն. Ինչպես Վերադարձեք արժեք VBA ֆունկցիայի մեջ (և զանգվածային և ոչ զանգվածային արժեքներ)

3. Օգտագործելով VBA Mod՝ բացասական թվից մնացորդ ստանալու համար

The VBA Mod -ը նաև աջակցում է բացասական թվերը մնացորդը հաշվարկելիս:

VBA <2 բացելու համար>խմբագիր, հետևեք 1-ին բաժնում նկարագրված քայլերին:

Այնուհետև մուտքագրեք հետևյալ կոդը Module -ում:

3170

Այստեղ , Reminder_From_NegativeNumber-ում, ես հայտարարեցի n փոփոխականը որպես Ամբողջական և օգտագործեցի այն պահելու Mod օպերատորի վերադարձված արժեքը։

Այնուհետև օգտագործվեց բջիջի հղումը B5 որպես համար1 և C5 որպես համար2 (բաժանարար)

Այնուհետև օգտագործեց MsgBox մնացորդը ցուցադրելու համար:

Այժմ, Պահեք կոդը և վերադարձեք աշխատաթերթ:

> Կոճակը տեղադրելու համար հետևեք 1-ին բաժնում նկարագրված քայլերին:

➤ Ես անվանել եմ th e կոճակ Հիշեցում բացասական համարից :

Դրանից հետո սեղմեք Կոճակը VBA կոդը գործարկելու համար:

Հետևաբար, դուք կստանաք մնացորդը բացասական համարի համար :

Կարդալ ավելին` Ինչպես օգտագործել VBA IsNumeric ֆունկցիան (9 օրինակ)

4. Օգտագործելով VBA Mod` մնացորդը բջջայինում ստանալու համար

մնացորդը ցույց տալու փոխարեն միջոցով msg վանդակ կարող եք տեղադրել այն բջիջում՝ օգտագործելով VBA MOD գործառույթը:

VBA բացելու համար: խմբագիր, հետևեք 1-ին բաժնում նկարագրված քայլերին:

Այնուհետև մուտքագրեք հետևյալ կոդը Մոդուլում :

8489

Այստեղ, s ub-procedure Reminder_in_Cell , ես օգտագործել եմ ActiveCell.FormulaR1C1 ձևաչափը՝ ActiveCell դիրքը ստանալու համար:

Այնուհետև օգտագործեց MOD ֆունկցիան մնացորդը ստանալու համար:

Նաև օգտագործեց Ընտրել մեթոդը:

Այժմ , Պահպանեք կոդը և վերադարձեք աշխատաթերթ:

Button և նշանակել VBA կոդը տեղադրելու համար: հետևեք 1-ին բաժնում նկարագրված քայլերին:

➤ Ես անվանել եմ կոճակը Հիշեցում բջիջում :

Հաջորդում ընտրեք D4 բջիջը:

Այնուհետև սեղմեք կոճակը VBA կոդը գործարկելու համար:

Արդյունքում դուք կստանաք մնացորդը ընտրված բջիջում:

Հետևելով նույն գործընթացին, դուք կստանաք մնացորդը մնացածի համար: թվեր.

Կարդալ ավելին. Ինչպես օգտագործել MsgBox ֆունկցիան Excel VBA-ում (ամբողջական ուղեցույց)

5. Օգտագործելով VBA Mod-ը ամբողջ թվի բաժանարարով & AMP; Float Number

Եթե ձեր բաժանարարը ամբողջ տիպ է, բայց ձեր համարը float մուտքագրեք, ապա կարող եք օգտագործել VBA Mod օպերատորը:

VBA խմբագիրը բացելու համար հետևեք բաժնում նկարագրված քայլերին:1.

Այնուհետև մուտքագրեք հետևյալ կոդը Module -ում:

8665

Այստեղ, R eminder_From_Decimal_Number ենթակետում: -procedure, Ես հայտարարեցի n փոփոխականը որպես Ամբողջ թիվ և օգտագործեցի այն պահելու Mod օպերատորի վերադարձված արժեքը։

Այնուհետև օգտագործվեց բջիջի հղումը B5 որպես համար1 և C5 որպես համար2 (բաժանարար)

Այնուհետև օգտագործվեց 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 անջատիչ ֆունկցիան (6 հարմար օրինակ)
• Օգտագործեք VBA Len ֆունկցիան Excel-ում (4 օրինակ)
• Ինչպես հեռացնել կրկնօրինակները Excel թերթում (7 մեթոդ)

6. Օգտագործելով VBA Mod Երբ Divisor & AMP; Համարը երկուսն էլ տասնորդական է

Եթե ձեր բաժանարարը և համարը երկուսն էլ տասնորդական/լողացող տիպի են, ապա կարող եք նաև օգտագործել VBA Mod օպերատոր:

VBA խմբագիրը բացելու համար հետևեք 1-ին բաժնում նկարագրված քայլերին:

Այնուհետև մուտքագրեք հետևյալ կոդը Մոդուլ .

9845

Այստեղ, ենթակարգում Decimal_Both_Divisor_Number, Ես հայտարարեցի n փոփոխականը: որպես Ամբողջ թիվ և այն օգտագործեց Mod օպերատորի վերադարձված արժեքը պահելու համար։

Հաջորդը օգտագործեց բջիջի հղումը B5 որպես համարը1 և C5 որպես թիվ2 (բաժանարար)

Այնուհետև օգտագործեց MsgBox մնացորդը ցույց տալու համար:

Այժմ, Պահպանեք կոդը և վերադարձեք աշխատաթերթ:

Կոճակը տեղադրելու համար հետևեք 1-ին բաժնում նկարագրված քայլերին:

➤ Ես անվանել եմ կոճակը Ստանալ Հիշեցում Երբ բաժանարար է & Թիվ տասնորդական ։

Դրանից հետո սեղմեք կոճակը VBA կոդը գործարկելու համար։

Հետևաբար, դուք կստանաք մնացորդ և տասնորդական բաժանարար և թվերի համար ։

Բայց կա մի խնդիր, որ VBA կլորացնում է տասնորդականը : Այստեղ արդյունքը պետք է լիներ 1.75 , սակայն VBA Mod-ը կլորացրեց այն 2 :

Առնչվող բովանդակություն. VBA EXP ֆունկցիան Excel-ում (5 օրինակ)

7. VBA Mod՝ 0.5-ից մեծ տասնորդական թիվը կլորացնելու համար

Այստեղ ես կկատարեմ ցույց տալ ձեզ, թե ինչպես է վերամշակել աշխատում VBA Mod -ում:

Ձեզ տասնորդական կետ խնդիրը ցույց տալու համար, նախ կհաշվարկեմ մնացորդը օգտագործելով Excel MOD ֆունկցիան:

D4 բջիջում մուտքագրեք հետևյալ բանաձևը,

Այստեղ ես օգտագործել եմ B6 որպես համար C6 որպես բաժանարար ։

Այնուհետև, սեղմեք ENTER մնացորդը ստանալու համար, և դուք կստանաք մնացորդը որը կլինի 7.7 :

Այժմ եկեք հաշվարկենք VBA Mod -ի միջոցով, VBA խմբագիրը բացելու համար հետևեք 1-ին բաժնում նկարագրված քայլերին:

Այնուհետև մուտքագրեք հետևյալ կոդը Մոդուլում :

5977

Այստեղ, ենթակարգում Decimal_Both_Divisor_Number, Ես հայտարարեցի. փոփոխականը e n որպես Ամբողջ թիվ և այն օգտագործեց Mod օպերատորի վերադարձված արժեքը պահելու համար:

Հաջորդը օգտագործեց բջիջի հղումը B6 որպես թիվ1 և C6 որպես թիվ2 (բաժանարար)

Այնուհետև օգտագործեց MsgBox ցուցադրելու համար մնացորդը ։

Այժմ, Պահպանեք կոդը և վերադարձեք աշխատաթերթ։

Կոճակը տեղադրելու համար հետևեք որ1-ին բաժնում բացատրված քայլերը:

➤ Ես անվանել եմ կոճակը RoundsUp տասնորդական թիվ :

Դրանից հետո սեղմեք Button գործարկելու համար VBA կոդը:

Հետևաբար, դուք կստանաք մնացորդը օգտագործված բջջային հղումի համար:

Ուշադիր նայեք մնացորդում որ VBA Mod վերադարձավ: Նույն արժեքների MOD ֆունկցիան վերադարձրեց 7.7 բայց VBA Mod օպերատորը վերադարձրեց 0 : Քանի որ VBA կլորացրեց արժեքները:

Կարդալ ավելին. Ինչպես օգտագործել VBA Round ֆունկցիան Excel-ում (6 Արագ օգտագործում)

8. Որոշեք զույգ կամ կենտ թիվը

VBA Mod որոշում է նաև Զույգ կամ Կենտ թիվը տրված միջակայքից:

VBA խմբագիրը բացելու համար հետևեք 1-ին բաժնում նկարագրված քայլերին:

Այնուհետև մուտքագրեք հետևյալ կոդը Module .

6947

Այստեղ, Determine_Even_Or_Odd ենթակարգում, Ես հայտարարեցի n փոփոխականը որպես Ամբողջ թիվ: .

Այնուհետև ես օգտագործեցի For հանգույցը, որտեղ ես պահեցի այն արժեքը, որը հայտարարել էի բջջային հղումի միջոցով:

Այնուհետև ես օգտագործեցի IF գործառույթը, որտեղ ես չափանիշները սահմանել եմ որպես n Mod 2 = 0 , եթե արժեքը ճշմարիտ է, ապա այն կվերադարձնի Զույգ հայտարարություն հակառակ դեպքում Կենտ :

Այնուհետև օգտագործեց MsgBox հայտարարությունները ցուցադրելու համար:

Այժմ, Պահեք կոդը և վերադարձեք աշխատաթերթ:

Կոճակը տեղադրելու համար հետևեք քայլերին