Čo je to maximálna funkcia vo VBA?

Funkcia Max Function sa používa na výpočet najväčšieho počtu. Existuje niekoľko numerických funkcií v Exceli, ktoré sa dajú použiť na spočítanie rozsahu, sčítanie dávky alebo na nájdenie minimálnej alebo maximálnej hodnoty z rozsahu čísel. Funkcia Max sa používa na nájdenie maximálnej hodnoty z rozsahu hodnôt. Je to vstavaná funkcia v Exceli a je klasifikovaná ako funkcia Max. Vo VBA však neexistuje žiadna vstavaná funkcia ako Max na získanie maximálnej hodnoty. Maximálnu funkciu je možné použiť aj vo formáte VBA Excel. V prípade argumentu funkcie (pole, rozsah atď.) Ho možno zadať priamo do funkcie alebo ho definovať ako premenné a použiť namiesto neho.

syntaxe:

=application.WorksheetFunction.max(arg1, arg2, arg3……………arg30)

Parameter alebo argumenty použité vo funkcii Max sú:

arg1 …… arg30: číslo 1 až číslo 30, z ktorých sa má odvodiť maximálny počet. Môže to byť číslo, pomenované rozsahy, polia alebo odkaz na čísla.

Poznámka:

  • Ak argumenty neobsahujú žiadne čísla, MAX vráti 0 (nula).
  • Argumenty, ktoré majú chybové hodnoty alebo text a nemôžu byť preložené do čísel, vyvolávajú chyby.
  • Funkcia Max vráti číselnú hodnotu.

Ako povoliť kartu Vývojári?

Na páse programu Excel je na spustenie a zapísanie makra VBA povinná karta vývojára. Ak chcete povoliť kartu vývojára v programe Excel, postupujte podľa nasledujúcich krokov.

Krok 1: Prejdite do súboru .

Krok 2: Kliknite na Možnosti .

Krok 3: V okne, ktoré sa otvorí s názvom Možnosti programu Excel, kliknite na Prispôsobiť pásku a získajte prístup k možnostiam prispôsobenia pásu.

Krok 4: Tu v možnostiach prispôsobenia sa zobrazuje možnosť Vývojár (vlastné) . Zaškrtnite ho, aby sa aktivovalo na hlavnom páse Excelu a bolo ľahko prístupné. Po kontrole možnosti Vývojár kliknite na tlačidlo OK .

Krok 5: Kliknite na kartu Vývojár a potom na ikonu Visual Basic (ALT + F11).

Zobrazí sa editor VBA.

Ako používať maximálnu funkciu v Excel VBA?

Nižšie sú uvedené rôzne príklady použitia funkcie Max v programe Excel VBA:

Túto šablónu VBA Max Excel si môžete stiahnuť tu - šablónu VBA Max Excel

VBA Max - príklad č. 1

Vezmite štyri čísla 12, 25, 36, 45. Pomocou funkcie max zistite Maxovo číslo.

kód:

 Sub AA () Dim A ako celé číslo Dim B ako celé číslo Dim C ako celé číslo Dim D ako celé číslo Dim výsledok ako celé číslo A = 12 B = 25 C = 36 D = 45 výsledok = pracovný listFunkcia.Max (A, B, C, D) Výsledok MsgBox End Sub

Poznámka:

  • Uveďte údajový typ premenných pomocou dim .
  • Priradiť čísla premenným.

Spustite kód stlačením klávesu F5 alebo kliknutím na tlačidlo Prehrať. Výsledok sa zobrazí v okne so správou.

VBA Max - príklad č. 2

Vezmite štyri čísla 15, 34, 50, 62. Pomocou funkcie Max zistite maximálny počet.

kód:

 Sub AA1 () A = 15 B = 34 C = 50 D = 62 výsledok = WorksheetFunction.Max (A, B, C, D) MsgBox výsledok End Sub

Poznámka:

  • Tu sme priamo priradili čísla štyrom rôznym premenným bez uvedenia ich typu údajov. Program automaticky rozhodne o type údajov.
  • Tieto premenné sa použili vo vzorci a výsledok sa dostal do správ.

Spustite kód stlačením klávesu F5 alebo kliknutím na tlačidlo Prehrať. Výsledok sa zobrazí v okne so správou.

VBA Max - príklad č. 3

Pomocou funkcie Max vyhľadajte maximálnu hodnotu z rozsahu.

kód:

 Funkcia getmaxvalue (Maximum_range As Range) Dim i Double pre každú bunku In Maximum_range If cell.Value> i Then i = cell.Value End If Next getmaxvalue = i End Function

Poznámka:

  • Procedúra funkcie v kóde VBA vykonáva výpočty a vracia výsledok.
  • Môže mať voliteľný návratový príkaz. Je potrebné vrátiť hodnotu z funkcie.
  • Pred použitím funkcie musíme túto konkrétnu funkciu definovať.

syntaxe:

Function functionname(parameter_list)
Statement 1
Statement 2
Statement 3
:
End Function

Za týmto kľúčovým slovom funkcie nasleduje jedinečné meno funkcie, napríklad getmaxvalue (args_1, … args_n) a môže alebo nemusí obsahovať zoznam parametrov s typom údajov, napríklad Maximum_range As Range. Končí sa funkciou End, ktorá označuje koniec funkcie. Uveďte údajový typ premenných pomocou dim .

Volanie funkcie:

Na vyvolanie funkcie zavolajte funkciu pomocou názvu funkcie, napr. Getmaxvalue (args_1, … args_n) .

Výsledok bude uvedený nižšie.

VBA Max - príklad č. 4

Pomocou funkcie Max vyhľadajte maximálnu hodnotu z rozsahu.

kód:

 Funkcia getmaxvalue (Maximum_range As Range) Dim i Double pre každú bunku In Maximum_range If cell.Value> i Then i = cell.Value End If Next getmaxvalue = i End Function

Poznámka:

  • Maximum_range predstavuje rozsah buniek odovzdaných z hárku Excel ako parameter.
  • Premenná i sa deklaruje ako dvojitá.
  • Slučka For je iterovaná. Pri každej iterácii podmienka, ak kontroluje, či hodnota načítaná z príslušnej bunky je väčšia ako i. Ak stav vyhodnotí true, hodnota bunky sa priradí i .
  • Keď boli iterované všetky bunky v Maximum_range, maximum medzi bunkami bude priradené k i .
  • Nakoniec je i pridelené getmaxvalue a vrátené do volajúcej bunky.

Výsledok bude uvedený nižšie.

záver

Funkcia VBA max sa používa na nájdenie maximálnej hodnoty z rozsahu čísel. Na vykonanie výpočtov sa vyžaduje funkčný postup. Dim sa používa na definovanie premenných. Funkcia End sa používa na ukončenie funkcie. Vykonáva úlohu veľmi rýchlo a presne. Aj keď nejde o zabudovanú funkciu vo VBA excel, pomocou funkčnej procedúry však môžeme vykonať funkciu max vo VBA excel.

Odporúčaný článok

Toto je sprievodca VBA MAX. Tu diskutujeme o tom, ako používať funkciu MAX v Excel VBA spolu s praktickými príkladmi a stiahnuteľnou šablónou Excel. Môžete si tiež prečítať naše ďalšie navrhované články -

  1. Vytvorenie objektu kolekcie v aplikácii Excel VBA
  2. Výkazy VBA IF | Šablóny programu Excel
  3. Ako používať funkciu zoradenia Excel VBA?
  4. VBA počas slučky (príklady so šablónou programu Excel)

Kategórie:

VBA