VBA Excel: lagin programak. Excel makroak

y = x1 + x1 ^ 2 + 3 * x1 ^ 3 - Cos (x1)

Pilak (i, 1) .Value = x1 (x1 balio memorian idatzitako koordenatuak (i, 1))

Pilak (i, 2) .Value = y (y balio zelula idatzita dago koordenadak (i, 2))

i = i + 1 (baliozko zenbaketa);

x1 = x1 + ubarroi (argumentu da urrats tamaina aldatu);

Loop

End Sub.

y to - run makro honen ondorioz "Excel" bi zutabe, lehenengo horren balioak ez dira grabatzen x, eta bigarrena lortzeko.

Ondoren antolatzeko horien gainean eraikitzeko, estandarra "Excel" egiteko gai.

3. adibidea

zikloak ezartzeko VBA Excel 2010, baita beste bertsio batean, dagoeneko murriztu Do batera erabili diseinu bitartean.

Demagun zutabe bat sortzen duen programa bat. zelula bakoitzean, bertan grabatu egingo lauki dagokion lerroa zenbakia. diseinua erabiltzeko da grabatzeko oso laburki, kontagailu bat erabili gabe uzten dira.

Lehen beharrezkoa da makro bat sortzeko, goian azaldu dugun bezala. Hurrengoa, idatzi kode bera. 10 zelulak balioak interesatzen zaigu uste dugu. kodea honako hau da.

I = 1, 10 Hurrengoa

Komandoa da "giza" hizkuntza transferitu, bezala "1-tik errepikatu eta 10 bat zatituko."

Zeregin plaza zutabean jaso nahi baduzu, adibidez, 1 eta 11 arteko zenbaki osoko bakoitiak guztiak, idatzi dugu:

i = 1, 10: 1. urratsa Next da.

Hemen, urrats - Urrats. Kasu honetan, bi berdina da. Berez, begizta batean hitzaren eza urrats bakar bat esan nahi du.

Emaitzek zelula kopurua (i, 1) gordeta egon behar. Gero, denbora guztietan balioaren gehikuntza batekin zikloa hasten zarenean of urratsez i automatikoki hazten da eta lerro zenbakia. Horrela, bada kode optimizazioa izango da.

Oro har, kodea itxurarik litzateke:

Sub programa ()

i = 1 To 10 Step 1 (idatziz baino ezin i For = 1 eta 10)

Pilak (i, 1) .Value = i ^ 2 (adibidez, balio karratuko ziegan sartu idatzita dago (i, 1) i)

Next (zentzu batean, kontra bitarteko eta beste ziklo hasieran papera egiten du)

End Sub.

Behar bezala egiten badu, grabaketa eta korrika makro (ikus. Argibideak goian) barne, ondoren, aldi bakoitzean tamaina jakin bat lortuko da zutabea (kasu honetan 10 zelula osatzen da) deitzen da.

4. adibidea

Eguneroko bizitzan, askotan beharrezkoa da hau edo erabakia hartzeko baldintza batzuk arabera. Ezin da horiek gabe VBA Excel. programen adibide non algoritmoa ikastaro gehiago ordez hautatu da hasiera batean, aldez aurretik, bada diseinuak gehien erabiltzen ... Gero (kasu zail jartzeko) Bada ... Orduan ... END bada.

Demagun kasu jakin. Demagun "Excel" makro bat sortzeko koordenadak zelula (1,1) grabatu nahi duzun:

1 argumentua positiboa bada;

0 argumentua zero bada;

1, argumentu negatiboa bada.

"Excel" besteak beste, makro bat sortzea modu estandar bat hasten da, "beroa" gakoak Alt eta F11 erabileraren bidez. Aurrerago idatzitako kode hau:

Sub programa ()

x = Cells (1, 1) .Value (Komando honek x zelula edukiak koordenadak balioa (1 ematean, 1))

x> 0 Gero Cells (1, 1) .Value = 1 bada

Bada x = 0 Orduan Cells (1, 1) .Value = 0

x <0 Gero Cells (1, 1) .Value = -1 bada

End Sub.

Makro bat nahi diren balio exekutatu eta in "Excel" lortu argudioa alde jarraitzen du.

VBA funtzio

konturatuko ahal izango dute bezala, ospetsuena programa Microsoft kalkulu orri aplikazioan ez da zaila. VBA funtzio erabiltzen ikasteko batez ere. Guztira, programazio hizkuntza hau sortu zehazki aplikazioetan idaztea "Excel" eta Hitza, funtzio 160 inguru da. hainbat talde handitan egon ziren banatu daiteke. Hauek dira:

• funtzio matematiko. aplikatuz kosinu balioaren argumentua to lortzen da, eta logaritmo naturala, eta hala parte osoa.
• Finantza funtzioak. Ondorioz, beren erabilgarritasuna eta erabilera Excel programazioa, tresna eraginkorrak kontabilitate eta finantza-likidazioak egiteko lortu ahal izango dituzu.
• Array prozesatzeko funtzioak. Horien artean, Array, IsArray; LBound; UBound.
• VBA Excel line egiteko funtzionatuko. Hau talde nahiko handi bat da. sartzen da, adibidez, Space funtzioa hutsuneak zenbaki oso argumentu edo Testu osoa transferentziak ikurrak ANSI kode berdina zenbaki batekin kate bat sortzeko. Guztiek asko erabiltzen dira, eta hemen "Excel" kateak aplikazio askoz errazagoa da taula hauek batera lan egiterako lan egiteko aukera ematen dute.
• Datu motak bihurtzeko funtzioak. Adibidez, CVar Adierazpen argumentu itzultzen, bihurtzeko Aldaera datu-mota da.
• Data funtzioak. asko zabaldu dira "Excel" ezaugarri estandarra. Beraz, WeekdayName funtzioa izena (osoa edo partziala) asteko egun bere zenbakia arabera itzultzen du. Are gehiago erabilgarria da tenporizadorea da. duten gauerdia igaro eguneko une jakin batean segundu kopurua ematen zuen.
• Funtzionatu zenbakizko argumentu bat bihurtzeko zenbaki-sistema desberdinetan. Adibidez, aza kopurua irudikapen octal to irteerak.
• formatu-funtzioak. Horien artean garrantzitsuena formatua da. Aldaera bat itzultzen ditu formatua deskribapena emandako argibideak arabera formateatuta adierazpen batekin.
• eta abar.

funtzio horiek eta beren aplikazio propietate azterketa egingo du nabarmen zabaldu "Excel" esparrua.

ADIBIDEA 5

Dezagun saiatu arazo konplexuagoak ebazteko. Adibidez:

Dan paper dokumentu enpresa txostenaren kostuak maila benetako. eskatzen du:

• garatzen du bere eredua zati spreadsheet "Excel" da;
• VBA programa bat da datu gordin hura betetzeko, beharrezko kalkuluak burutzeko eta dagokion zelula plantilla bete eskatu du egin.

Demagun honako soluzio bat.

txantiloi bat sortzea

Ekintza guztiak Excel orri estandar baten gainean egiten dira. Free zelulak datuak sartuz erreserbatuta hilabetea, urtea, izenburua-kontsumo enpresak, kostuen zenbatekoa, beren fakturazioaren maila. enpresei (enpresa), kopuruaren errespetu horren txostena ez da erregistratutako bezala, zelulak balio eta izen profesionala oinarria ez da aldez aurretik erreserbatuta on egin. Lan-izen berri bat esleitzen. Adibidez, "Օ txostena".

aldagai

programa automatikoki plantilla bete idazteko, hautatu idazkera. Dute aldagai erabiliko dira:

• NN- egungo mahai ilara-kopurua;
• TP eta TF - planifikatu eta benetako fakturazioa;
• SF eta SP - benetako eta aurreikusitako guztira kostuak;
• IP eta IF - planifikatu eta benetako kostuak maila.

adierazteko dugu gutunak beraren arabera, baina "zeinua» Itog metaketa zutabean horretarako osoz. Adibidez, ItogTP - zutabean dagokionez izenburupean, gisa "aurreikusitako fakturazioa."

Arazoa VBA programazio erabiliz Irtenbidea

idazkera hau erabiliz, bariantza formula lortuko dugu. Kalkulu burutzeko% nahi baduzu ditugu (F - P) / P * 100, eta zenbatekoa - (F - P).

Kalkulu horien emaitzak onena besterik "Excel" kalkulu-orriko egiteko zelula egokiak izan daitezke.

Emaitza eta pronostikoa izan ere formulak by ItogP = ItogP + P eta ItogF = ItogF + F. lortzen For

For desbideratzen erabili = (ItogF - ItogP) / ItogP * 100 kalkulua egiten bada ehuneko gisa, eta guztira balioa bada - (ItogF - ItogP).

Emaitzek berriro zelula egokia grabatu, beraz, ez dago haiek esleitzeko aldagai beharrik.

programa bat sortzeko hasi aurretik liburu gordetzeko, adibidez, izena "Otchet1.xls" atalean nahi duzun.

Prentsa "Sortu berri-mahai bat," denbora 1 bakarrik sakatu behar duzu goiburua informazioa sartu ondoren. Jakin behar duzu, eta beste arau. Bereziki, botoia "Gehitu lerro bat" sakatu behar den bakoitzean, jarduera bakoitzaren balioen taula sartu sartu ondoren. botoia "Amaitu" sakatu, eta ondoren "Excel" aldatzeko leihoan beharrezkoa datu guztiak sartu ondoren.

Orain nola arazoa konpontzeko Excel makro ezagutzen duzula. VBA erabiltzeko gaitasuna Excel (ikus lagin programak. Above) eta ezagunenetako ingurumena Oraingoz, testu editorea at lan egiteko behar izatea "Word". Bereziki,, grabaketa erakutsi artikulu honen hasieran bezala, edo kodea idatziz menu botoiak testua eragiketa asko horren bidez guardiako edo "Ikusi" ikonoa eta "Makroak" fitxa bitartez teklak egin daiteke sortzeko.