HTML, Excel, Word, SEOÎñíîâû VBA ⇒ Ôóíêöèè VBA

Îñíîâû VBA

Ñàìîó÷èòåëü vba: Òåîðèÿ
..Ïåðâûé ìàêðîñ â Word
..Ýòàïû çàïèñè ìàêðîñà
..Çàïèñü ìàêðîñà â Word
..Çàïèñü ìàêðîñà â Excel
..Êîä ìàêðîñà
..Âûïîëíåíèå ìàêðîñà
..Òèïû äàííûõ VBA
..Ïåðåìåííûå VBA
..Êîíñòàíòû VBA
..Ñîâìåñòèìîñòü òèïîâ äàííûõ
..Àðèôìåòè÷åñêèå îïåðàòîðû
..Ëîãè÷åñêèå îïåðàòîðû
..Ñòðîêîâûå îïåðàòîðû
..Ôóíêöèè VBA ÷.1
..Ôóíêöèè VBA ÷.2
..Ïðèìåðû èñïîëüçîâàíèÿ ôóíêöèé
..Ôóíêöèè host-ïðèëîæåíèé
..Ôóíêöèè-ïðîöåäóðû
..Ïîëüçîâàòåëüñêèå ôóíêöèè â Excel
..Îïåðàòîðû âåòâëåíèÿ: ïðîñòîé âûáîð
..Îïåðàòîðû âåòâëåíèÿ: ñëîæíûé âûáîð
..Èñïîëüçîâàíèå MsgBox
..Ïðåðûâàíèå ïðîöåäóð è ôóíêöèé
..Íåîáÿçàòåëüíûå àðãóìåíòû ôóíêöèé
..Öèêëû VBA ÷.1
..Öèêëû ÷.2
..Öèêëû ÷.3
..Ìàññèâû VBA ÷.1
..Ìàññèâû ÷.2
..Ìàññèâû ÷.3
..Óïðàâëåíèå ôàéëàìè ñ ïîìîùüþ VBA
Ñàìîó÷èòåëü vba: Ïðàêòèêà
Èãðà: Öåïíàÿ ðåàêöèÿ
Ïðèëîæåíèÿ
..Ñóììàòîð
..Íàêëåéêè
..Âîñüìåðêà
..Ìåíåäæåð ïî÷òû
Íàäñòðîéêè
..DEF
..SortSheets
..HideSheet

Ïîäáîðêà vps ñåðâåðîâ â Ñèíãàïóðå ñ îòçûâàìè ïîëüçîâàòåëåé è àíàëèçîì òàðèôîâ çäåñü

Ôóíêöèè VBA (÷.2).


Íèæå ïðåäñòàâëåíû òàáëèöû ñ êðàòêèì îïèñàíèåì íàèáîëåå ÷àñòî èñïîëüçóåìûõ ôóíêöèé VBA.

Ìàòåìàòè÷åñêèå ôóíêöèè

N - îçíà÷àåò ëþáîå ÷èñëåííîå âûðàæåíèå. Âñå àðãóìåíòû ôóíêöèé ÿâëÿþòñÿ îáÿçàòåëüíûìè, åñëè íå óêàçàíî èíà÷å.

Ôóíêöèÿ(àðãóìåíò) Äåéñòâèå
Abs(N) Âîçâðàùàåò àáñîëþòíîå çíà÷åíèå àðãóìåíòà N
Atn(N) Âîçâðàùàåò àðêòàíãåíñ N (ðàäèàí)
Cos(N) Âîçâðàùàåò êîñèíóñ N (ðàäèàí)
Exp(N) Âîçâðàùàåò êîíñòàíòó å (íàòóðàëüíûé ëîãàðèôì = 2.718282...), âîçâåäåííóþ â ñòåïåíü N
Fix(N) Âîçâðàùàåò öåëóþ ÷àñòü N. Íå îêðóãëÿåò ÷èñëî, à îòáðàñûâàåò ëþáóþ äðîáíóþ ÷àñòü. Åñëè N îòðèöàòåëüíîå ÷èñëî, òî âîçâðàùàåòñÿ áëèæàéøåå îòðèöàòåëüíîå öåëîå áîëüøåå, ÷åì èëè ðàâíîå N
Int(N) Âîçâðàùàåò öåëóþ ÷àñòü N. Íå îêðóãëÿåò ÷èñëî, à îòáðàñûâàåò ëþáóþ äðîáíóþ ÷àñòü. Åñëè N îòðèöàòåëüíîå ÷èñëî, òî âîçâðàùàåòñÿ áëèæàéøåå îòðèöàòåëüíîå öåëîå ìåíüøåå, ÷åì èëè ðàâíîå N
Log(N) Âîçâðàùàåò íàòóðàëüíûé ëîãàðèôì N
Rnd(N) Âîçâðàùàåò ñëó÷àéíîå ÷èñëî: àðãóìåíò ÿâëÿåòñÿ íåîáÿçàòåëüíûì. Èñïîëüçóåòñÿ òîëüêî ïîñëå èíèöèàëèçàöèè ãåíåðàòîðà ñëó÷àéíûõ ÷èñåë (îïåðàòîð Randomize)
Sgn(N) Âîçâðàùàåò çíàê ÷èñëà: -1, åñëè N - îòðèöàòåëüíîå; 1, åñëè N - ïîëîæèòåëüíîå; 0, åñëè N ðàâíî 0
Sin(N) Âîçâðàùàåò ñèíóñ N (ðàäèàí)
Sqr(N) Âîçâðàùàåò êîðåíü êâàäðàòíûé èç N. Åñëè N ÿâëÿåòñÿ îòðèöàòåëüíûì ÷èñëîì - âîçâðàùàåòñÿ îøèáêà âðåìåíè èñïîëíåíèÿ
Tan(N) Âîçâðàùàåò òàíãåíñ N (ðàäèàí)

Ôóíêöèè ïðåîáðàçîâàíèÿ äàííûõ

N - ëþáîå ÷èñëåííîå çíà÷åíèå; S - ëþáîå ñòðîêîâîå çíà÷åíèå; E - âûðàæåíèå ëþáîãî òèïà. Àðãóìåíòû êàæäîé ôóíêöèè ÿâëÿþòñÿ îáÿçàòåëüíûìè, åñëè íå óêàçàíî èíà÷å.

Ôóíêöèÿ(àðãóìåíò) Äåéñòâèå
Asc(S) Âîçâðàùàåò ÷èñëî êîäà ñèìâîëà, ñîîòâåòñòâóþùåå ïåðâîé áóêâå ñòðîêè S
Chr(N) Âîçâðàùàåò ñòðîêó èç îäíîãî ñèìâîëà, ñîîòâåòñòâóþùåãî êîäó ñèìâîëà N, êîòîðûé äîëæåí áûòü ÷èñëîì ìåæäó 0 è 255 (îáðàòíà ïðåäûäóùåé)
Format(E,S) Âîçâðàùàåò ñòðîêó, ñîäåðæàùóþ çíà÷åíèå, ïðåäñòàâëåííîå âûðàæåíèåì Å, â ôîðìàòå â ñîîòâåòñòâèè ñ èíñòðóêöèÿìè, ñîäåðæàùèìñÿ â S
Hex(N) Âîçâðàùàåò ñòðîêó, ñîäåðæàùóþ øåñòíàäöàòèðè÷íîå ïðåäñòàâëåíèå N
Oct(N) Âîçâðàùàåò ñòðîêó, ñîäåðæàùóþ âîñüìèðè÷íîå ïðåäñòàâëåíèå N
RGB(N,N,N) Âîçâðàùàåò öåëîå òèïà Long, ïðåäñòàâëÿþùåå çíà÷åíèå îñíîâíûõ öâåòîâ èçîáðàæåíèÿ. N äëÿ êàæäîãî àðãóìåíòà äîëæíî áûòü öåëûì è ëåæàòü â ïðåäåëàõ îò 0 äî 255
Str(N) Âîçâðàùàåò ñòðîêó, ýêâèâàëåíòíóþ ÷èñëåííîìó âûðàæåíèþ N
Val(S) Âîçâðàùàåò ÷èñëåííîå çíà÷åíèå, ñîîòâåòñòâóþùåå ÷èñëó, ïðåäñòàâëåííîìó ñòðîêîé S, êîòîðàÿ äîëæíà ñîäåðæàòü òîëüêî öèôðû è îäíó äåñÿòè÷íóþ òî÷êó, èíà÷å âîçâðàùàåòñÿ 0
CBool(N) Âîçâðàùàåò Boolean-ýêâèâàëåíò ÷èñëåííîãî âûðàæåíèÿ N
CByte(E) Âîçâðàùàåò ÷èñëåííîå çíà÷åíèå òèïà Byte (îò 0 äî 255). Å - ëþáîå äîïóñòèìîå ÷èñëåííîå èëè ñòðîêîâîå âûðàæåíèå, êîòîðîå ìîæåò áûòü ïðåîáðàçîâàíî â ÷èñëî
CCur(E) Âîçâðàùàåò ÷èñëåííîå çíà÷åíèå òèïà Currency. Å - ëþáîå äîïóñòèìîå ÷èñëåííîå èëè ñòðîêîâîå âûðàæåíèå, êîòîðîå ìîæåò áûòü ïðåîáðàçîâàíî â ÷èñëî
CDate(E) Âîçâðàùàåò çíà÷åíèå òèïà Date. E ìîæåò áûòü ëþáûì äîïóñòèìûì âûðàæåíèåì (ñòðîêîé èëè ÷èñëîì), ïðåäñòàâëÿþùèì äàòó â äèàïàçîíå 1/1/100 - 12/31/9999
CDbl(E) Âîçâðàùàåò ÷èñëåííîå çíà÷åíèå òèïà Double. Å - ëþáîå äîïóñòèìîå ÷èñëåííîå èëè ñòðîêîâîå âûðàæåíèå, êîòîðîå ìîæåò áûòü ïðåîáðàçîâàíî â ÷èñëî
CInt(E) Âîçâðàùàåò ÷èñëåííîå çíà÷åíèå òèïà Integer. Å - ëþáîå äîïóñòèìîå ÷èñëåííîå èëè ñòðîêîâîå âûðàæåíèå, êîòîðîå ìîæåò áûòü ïðåîáðàçîâàíî â ÷èñëî
CLng(E) Âîçâðàùàåò ÷èñëåííîå çíà÷åíèå òèïà Long. Å - ëþáîå äîïóñòèìîå ÷èñëåííîå èëè ñòðîêîâîå âûðàæåíèå, êîòîðîå ìîæåò áûòü ïðåîáðàçîâàíî â ÷èñëî
CSng(E) Âîçâðàùàåò ÷èñëåííîå çíà÷åíèå òèïà Single. Å - ëþáîå äîïóñòèìîå ÷èñëåííîå èëè ñòðîêîâîå âûðàæåíèå, êîòîðîå ìîæåò áûòü ïðåîáðàçîâàíî â ÷èñëî
CStr(E) Âîçâðàùàåò ÷èñëåííîå çíà÷åíèå òèïà String. Å - ëþáîå äîïóñòèìîå ÷èñëåííîå èëè ñòðîêîâîå âûðàæåíèå, êîòîðîå ìîæåò áûòü ïðåîáðàçîâàíî â ÷èñëî
CVar(E) Âîçâðàùàåò ÷èñëåííîå çíà÷åíèå òèïà Variant. Å - ëþáîå äîïóñòèìîå ÷èñëåííîå èëè ñòðîêîâîå âûðàæåíèå, êîòîðîå ìîæåò áûòü ïðåîáðàçîâàíî â ÷èñëî

Ôóíêöèè äàòû è âðåìåíè

N - ëþáîå äîïóñòèìîå ÷èñëåííîå çíà÷åíèå; D - ëþáîå äîïóñòèìîå âûðàæåíèå òèïà Date (ëèáî âûðàæåíèå, êîòîðîå ìîæåò áûòü ïðåîáðàçîâàíî ê òèïó Date). Àðãóìåíòû êàæäîé ôóíêöèè ÿâëÿþòñÿ îáÿçàòåëüíûìè, åñëè íå óêàçàíî èíà÷å.

Ôóíêöèÿ(àðãóìåíò) Äåéñòâèå
Date Âîçâðàùàåò ñèñòåìíóþ äàòó
Time Âîçâðàùàåò ñèñòåìíîå âðåìÿ
Now Âîçâðàùàåò ñèñòåìíûå äàòó è âðåìÿ
Year(D) Âîçâðàùàåò öåëîå, ÿâëÿþùååñÿ ÷àñòüþ âûðàæåíèÿ òèïà Date è ñîäåðæàùåå ãîä. Ãîä âîçâðàùàåòñÿ êàê ÷èñëî ìåæäó 100 è 9999
Month(D) Âîçâðàùàåò öåëîå, ÿâëÿþùååñÿ ÷àñòüþ âûðàæåíèÿ òèïà Date è ñîäåðæàùåå ìåñÿö. Ìåñÿö âîçâðàùàåòñÿ êàê ÷èñëî ìåæäó 1 è 12
Day(D) Âîçâðàùàåò öåëîå, ÿâëÿþùååñÿ ÷àñòüþ âûðàæåíèÿ òèïà Date è ñîäåðæàùåå äåíü. Äåíü âîçâðàùàåòñÿ êàê ÷èñëî ìåæäó 1 è 31
Weekday(D) Âîçâðàùàåò öåëîå, ÿâëÿþùååñÿ ÷àñòüþ âûðàæåíèÿ òèïà Date è ñîäåðæàùåå äåíü íåäåëè. Äåíü íåäåëè âîçâðàùàåòñÿ êàê ÷èñëî ìåæäó 1 è 7 (1 - âîñêðåñåíüå..)
Hour(D) Âîçâðàùàåò öåëîå, ñîäåðæàùåå ÷àñû êàê ÷àñòü âðåìåíè, ñîäåðæàùåãîñÿ â âûðàæåíèè òèïà Date. ×àñû âîçâðàùàþòñÿ êàê ÷èñëî ìåæäó 0 è 23. Åñëè àðãóìåíò íå ñîäåðæèò çíà÷åíèÿ âðåìåíè, òî âîçâðàùàåòñÿ 0
Minute(D) Âîçâðàùàåò öåëîå, ñîäåðæàùåå ìèíóòû êàê ÷àñòü âðåìåíè, ñîäåðæàùåãîñÿ â âûðàæåíèè òèïà Date. Ìèíóòû âîçâðàùàþòñÿ êàê ÷èñëî ìåæäó 0 è 59. Åñëè àðãóìåíò íå ñîäåðæèò çíà÷åíèÿ âðåìåíè, òî âîçâðàùàåòñÿ 0
Second(D) Âîçâðàùàåò öåëîå, ñîäåðæàùåå ñåêóíäû êàê ÷àñòü âðåìåíè, ñîäåðæàùåãîñÿ â âûðàæåíèè òèïà Date. Ñåêóíäû âîçâðàùàþòñÿ êàê ÷èñëî ìåæäó 0 è 59. Åñëè àðãóìåíò íå ñîäåðæèò çíà÷åíèÿ âðåìåíè, òî âîçâðàùàåòñÿ 0
DateSerial(N,N,N) Âîçâðàùàåò çíà÷åíèå ïîñëåäîâàòåëüíîé äàòû äëÿ çàäàííîé äàòû. Ñëåâà íàïðàâî àðãóìåíòû ïðåäñòàâëÿþò ãîä (öåëîå ÷èñëî îò 100 äî 9999), ìåñÿö (îò 1 äî 12) è äåíü (îò 1 äî 31)
TimeSerial(N,N,N) Âîçâðàùàåò çíà÷åíèå ïîñëåäîâàòåëüíîãî âðåìåíè. Ñëåâà íàïðàâî àðãóìåíòû ïðåäñòàâëÿþò ÷àñû (öåëîå ÷èñëî îò 0 äî 23), ìèíóòû (îò 0 äî 59) è ñåêóíäû (îò 0 äî 59)
DateValue(E) Âîçâðàùàåò çíà÷åíèå òèïà Date, ýêâèâàëåíòíîå äàòå, çàäàííîé àðãóìåíòîì Å, êîòîðûé ìîæåò áûòü ñòðîêîé, ÷èñëîì èëè êîíñòàíòîé, ïðåäñòàâëÿþùåé âðåìÿ
TimeValue(E) Âîçâðàùàåò çíà÷åíèå òèïà Date, ñîäåðæàùåå âðåìÿ, çàäàííîå àðãóìåíòîì Å, êîòîðûé ìîæåò áûòü ñòðîêîé, ÷èñëîì èëè êîíñòàíòîé, ïðåäñòàâëÿþùåé âðåìÿ
Timer Âîçâðàùàåò ÷èñëî, ïðåäñòàâëÿþùåå êîëè÷åñòâî ñåêóíä îò ïîëóíî÷è â ñîîòâåòñòâèè ñ ñèñòåìíûì âðåìåíåì êîìïüþòåðà

Ñòðîêîâûå ôóíêöèè

N - ëþáîå äîïóñòèìîå ÷èñëåííîå çíà÷åíèå; S - ëþáîå äîïóñòèìîå ñòðîêîâîå çíà÷åíèå. Àðãóìåíòû êàæäîé ôóíêöèè ÿâëÿþòñÿ îáÿçàòåëüíûìè, åñëè íå óêàçàíî èíà÷å.

Ôóíêöèÿ(àðãóìåíò) Äåéñòâèå
InStr(N1,S1,S2,N2) Âîçâðàùàåò ïîëîæåíèå S2 â S1. N1 - íà÷àëüíîå ïîëîæåíèå äëÿ ïîèñêà. N2 îïðåäåëÿåò, ñëåäóåò ëè âûïîëíÿòü ïîèñê ñ ó÷åòîì ðåãèñòðà. N1, N2 - íåîáÿçàòåëüíûå àðãóìåíòû
Lcase(S) Âîçâðàùàåò ñòðîêó (òèï String), ñîäåðæàùóþ êîïèþ S ñî âñåìè ñèìâîëàìè âåðõíåãî ðåãèñòðà, ïðåîáðàçîâàííûìè â ñèìâîëû íèæíåãî ðåãèñòðà
Left(S,N) Âîçâðàùàåò ñòðîêó: êîïèðóåò N ñèìâîëîâ èç S, íà÷èíàÿ ñ ëåâîãî êðàéíåãî ñèìâîëà S
Len(S) Âîçâðàùàåò ÷èñëî ñèìâîëîâ â S, âêëþ÷àÿ íà÷àëüíûå è êîíå÷íûå ïðîáåëû
Ltrim(S) Âîçâðàùàåò êîïèþ ñòðîêè S ïîñëå óäàëåíèÿ ñèìâîëîâ ïðîáåëà èç ëåâîé ÷àñòè ñòðîêè (íà÷àëüíûå ïðîáåëû)
Mid(S,N1,N2) Âîçâðàùàåò ñòðîêó: êîïèðóåò N2 ñèìâîëîâ èç S, íà÷èíàÿ ñ ïîçèöèè ñèìâîëà â S, çàäàííîé àðãóìåíòîì N1. N2 - íåîáÿçàòåëüíûé àðãóìåíò, åñëè îí îïóùåí, òî âîçâðàùàþòñÿ âñå ñèìâîëû â ñòðîêå S îò ïîçèöèè N1 äî êîíöà ñòðîêè
Right(S,N) Âîçâðàùàåò çíà÷åíèå òèïà String: êîïèðóåò N ñèìâîëîâ èç S, íà÷èíàÿ ñ ïðàâîãî êðàéíåãî ñèìâîëà S
Rtrim(S) Âîçâðàùàåò êîïèþ ñòðîêè S ïîñëå óäàëåíèÿ ñèìâîëîâ ïðîáåëà èç ïðàâîé ÷àñòè ñòðîêè (êîíå÷íûå ïðîáåëû)
Space(N) Âîçâðàùàåò ñòðîêó ïðîáåëîâ äëèíîé N ñèìâîëîâ
StrComp(S1,S2,N) Ñðàâíèâàåò S1 ñ S2 è âîçâðàùàåò ÷èñëî, îáîçíà÷àþùåå ðåçóëüòàò ñðàâíåíèÿ: -1, åñëè S1<S2; 0 - S1=S2; 1 - S1>S2. N ÿâëÿåòñÿ íåîáÿçàòåëüíûì àðãóìåíòîì è óêàçûâàåò ñëåäóåò ëè âûïîëíÿòü ñðàâíåíèå ñ ó÷åòîì ðåãèñòðà
StrConv(S,N) Âîçâðàùàåò ñòðîêó, ïðåîáðàçîâàííóþ â íîâóþ ôîðìó â çàâèñèìîñòè îò ÷èñëîâîãî êîäà, çàäàííîãî àðãóìåíòîì N. VBA ïðåäîñòàâëÿåò âíóòðåííèå êîíñòàíòû äëÿ èñïîëüçîâàíèÿ ñ ôóíêöèåé StrConv. Íàèáîëåå ïîëåçíûìè ÿâëÿþòñÿ: vbProperCase (ïðåîáðàçóåò ñòðîêó òàê, ÷òî êàæäàÿ áóêâà, íà÷èíàþùàÿ ñëîâî, ñòàíîâèòñÿ çàãëàâíîé), vbLowerCase (ïðåîáðàçóåò ñòðîêó â áóêâû íèæíåãî ðåãèñòðà) è vbUpperCase (ïðåîáðàçóåò ñòðîêó â áóêâû âåðõíåãî ðåãèñòðà)
String(N,S) Âîçâðàùàåò ñòðîêó äëèíîé N ñèìâîëîâ, ñîñòîÿùóþ èç ñèìâîëà, çàäàííîãî ïåðâûì ñèìâîëîì â S
Trim(S) Âîçâðàùàåò êîïèþ ñòðîêè S ïîñëå óäàëåíèÿ íà÷àëüíûõ è êîíå÷íûõ ñèìâîëîâ ïðîáåëà èç ýòîé ñòðîêè
Ucase(S) Âîçâðàùàåò S ñî âñåìè ñèìâîëàìè íèæíåãî ðåãèñòðà, ïðåîáðàçîâàííûìè â ñèìâîëû âåðõíåãî ðåãèñòðà



 íà÷àëî ñòðàíèöû



 íà÷àëî ñòðàíèöû