VBA Excel: izlases programmas. Makro Excel

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

Šūnas (i, 1) .Value = x1 (x1 vērtība rakstīts atmiņā ar koordinātēm (I, 1))

Šūnas (i, 2) .Value = y (y vērtība ir rakstīts šūnas ar koordinātēm (i, 2))

i = i + 1 (derīga skaits);

x1 = x1 + mahorka (arguments tiek mainīts uz soļa garums);

cilpa

End Sub.

Tā rezultātā šī palaist makro "Excel" iegūst divas kolonnas, no kuriem pirmais ir ierakstīti vērtības X, un otrais - uz y.

Tad grafiks varētu balstīties uz tām, tad standarts "Excel".

3. PIEMĒRS

Lai īstenotu ciklus VBA Excel 2010, kā arī citas versijas, kopā ar jau samazinātā darīt, kamēr dizains izmantots.

Apsveriet programmu, kas rada kolonnu. Katrā šūnā tiks ierakstīts kvadrāti atbilstošas līnijas numuru. Lai izmantotu dizaina ļaus ierakstīt ļoti īsi, neizmantojot letes.

Pirmkārt, ir nepieciešams izveidot makro, kā aprakstīts iepriekš. Tālāk, rakstīt kodu pats. Mēs uzskatām, ka mēs esam ieinteresēti vērtībām par 10 šūnām. Kods ir šāds.

I = 1 līdz 10 Next

Komanda tiek pārnests uz "cilvēku" valodā, kā "atkārtots no 1 līdz 10 ar soli viens."

Ja uzdevums saņemt kolonnu ar laukumiem, piemēram, visi nepāra veseli skaitļi starp 1 un 11, mēs rakstām:

Par i = 1 līdz 10 1 soli Next.

Lūk, soli - soli. Šajā gadījumā tas ir vienāds ar divi. Pēc noklusējuma trūkums vārda cilpa nozīmē to, ka ar vienu soli.

Rezultāti ir jāuzglabā šūnu skaita (i, 1). Tad katru reizi, kad sākat ciklu ar vērtības pieaugumu par i solis automātiski augt un līniju skaits. Tādējādi būs koda optimizāciju.

Kopumā kods varētu izskatīties šādi:

Sub programma ()

Par i = 1 līdz 10 Step 1 (var rakstīt tikai i = 1 līdz 10)

Šūnas (i, 1) .Value = i ^ 2 (t.i., kvadrātveida vērtība tiek rakstīts kivetē (i, 1) i)

Nākamais (savā ziņā spēlē lomu letei līdzekļu un citu cikla sākumā)

End Sub.

Ja izdarīts pareizi, tostarp reģistrācijas un darbības makro (skat. Iepriekš minētos norādījumus), tad to sauc katru reizi, kad, ņemot vērā lielumu, tiks iegūts kolonnu (šajā gadījumā, kas sastāv no 10 šūnām).

4. PIEMĒRS

Ikdienā bieži vien ir nepieciešams, lai šo vai šo lēmumu, atkarībā no dažiem nosacījumiem. Nevar iztikt bez tiem VBA Excel. Raidījumi ir, piemēram, kur turpmāka kurss algoritma tiek izvēlēti nevis sākotnēji iepriekš, visbiežāk izmanto dizainu, ja ... Tad (sarežģītos gadījumos) Ja ... Tad ... END Ja.

Aplūkosim konkrēto lietu. Pieņemsim, ka jūs vēlaties, lai izveidotu makro "Excel", lai šūnas ar koordinātēm (1,1) ir ierakstīts:

1, ja arguments ir pozitīvs;

0, ja arguments ir nulle;

1, ja arguments ir negatīvs.

Šādas makro "Excel" izveide sākas standarta veidā, izmantojot "karsto" atslēgas Alt un F11. Tālāk rakstīts šādu kodu:

Sub programma ()

x = šūnu skaits (1, 1) .Value (Šī komanda piešķir vērtību x koordinātēm šūnas saturu (1, 1))

Ja x> 0, tad šūnu skaits (1, 1) .Value = 1

Ja x = 0, tad šūnu skaits (1, 1) .Value = 0

Ja x <0, tad šūnu skaits (1, 1) .Value = -1

End Sub.

Tā joprojām ir, lai palaistu makro un saņemt "Excel" vēlamo vērtību argumentu.

VBA funkcijas

Kā Jums var būt ievērojuši, slavenākajā programmas Microsoft izklājlapu nav pārāk grūti. It īpaši, ja jūs uzzinātu, kā izmantot VBA funkcijas. Kopumā šis programmēšanas valoda, kas izveidota speciāli rakstīšanai lietojumprogrammas "Excel" un Word, apmēram 160 funkcijas. Tos var iedalīt vairākās lielās grupās. Tie ir:

• Matemātiskās funkcijas. Piemērojot tos argumentu kosinuss vērtību iegūst, naturāllogaritmēšanas, un tā visu daļu.
• Finanšu funkcijas. Sakarā ar to pieejamību un izmantošanu programmu Excel, jūs varat saņemt efektīvus rīkus grāmatvedības un finanšu norēķiniem.
• Array apstrādes funkcijas. Tie ietver masīvs, IsArray; LBound; UBound.
• VBA Excel funkcionēt līniju. Tas ir diezgan liela grupa. Tas ietver, piemēram, Space funkciju, lai izveidotu virkni ar vairākiem nepilnības ir vienāds ar skaitlim argumentu vai ASC pārvešanai simboliem ANSI kodu. Visi no tiem ir plaši lietots un ļauj jums strādāt ar stīgas ar "Excel", lai radītu pieteikumus daudz vieglāk strādāt ar šīm tabulām.
• Datu tipa konversijas funkcijas. Piemēram, CVar atgriežas Expression argumentu, pārveidojot to variants datu tipu.
• Datums funkcijas. Tie ievērojami paplašināt standarta funkcijas "Excel". Tātad, WeekdayName funkcija atgriež nosaukumu (pilnu vai daļēju) par nedēļas dienas pēc tā numura. Vēl vairāk noderīgs ir taimeris. Viņš dod sekunžu skaitu, kas pagājuši kopš pusnakts uz konkrētu brīdi dienas.
• Funkciju, lai pārvērstu ciparu argumentu dažādās numuru sistēmu. Piemēram, oktobris izvada uz oktālo pārstāvniecību skaitu.
• formatēšanas funkcijas. Svarīgākais no tiem ir formāts. Tā atgriež Variant ar izteiksmi formatēts saskaņā ar instrukcijām, kas dotas aprakstā formātā.
• un tā tālāk.

No īpašības šīm funkcijām un to piemērošanu pētījums ievērojami paplašināt "Excel".

Example 5

Mēģināsim atrisināt sarežģītākas problēmas. Piemēram:

Dan papīra dokumenta faktiskais līmenis izmaksu uzņēmuma ziņojumā. Nepieciešams:

• attīstīt savu modelis daļu izklājlapu "Excel";
• padarīt VBA programmu, kas lūgs izejas datus, lai aizpildītu to, lai veiktu nepieciešamos aprēķinus un aizpildīt veidni atbilstošās šūnas.

Aplūkosim vienu no šiem risinājumiem.

Izveidojot veidni

Visas darbības tiek veiktas uz standarta lapai Excel. Bezmaksas šūnas rezervētas ievadot datus par mēnesi, gadu, virsrakstdrošām patēriņa uzņēmumu, summu izmaksu, to līmenis apgrozījuma. Kā skaitam uzņēmumu (uzņēmējsabiedrību), attiecībā uz kuru ziņojums nav ierakstīts, tad šūnas, lai, balstoties uz vērtībām un profesionālu nosaukumu nav rezervēta iepriekš. Darblapas piešķirts jaunu nosaukumu. Piemēram, "Օ pārskats".

mainīgie

Lai rakstītu programma automātiski aizpildīt veidni, izvēlieties apzīmējumu. Tie tiks izmantoti mainīgajiem:

• NN- skaits no pašreizējās rindas tabulas;
• TP un TF - plānotais un faktiskais apgrozījums;
• SF un SP - faktiskās un plānotās kopējās izmaksas;
• IP un IF - plānoto un faktisko izmaksu līmenim.

Mēs apzīmē ar tādiem pašiem burtiem, bet ar "prefiksu» Itog uzkrāšanas kopsummu šajā slejā. Piemēram, ItogTP - Attiecībā uz kolonnas nosaukumu, kā "plānotā apgrozījuma."

Problēmas risinājums, izmantojot VBA programmēšanu

Izmantojot šo pierakstu, mēs iegūt formulu dispersiju. Ja vēlaties veikt aprēķinu% mums ir (F - P) / P * 100, un par summu - (F - P).

Šo aprēķinu rezultāti var būt labākais vienkārši veikt "Excel", izklājlapu attiecīgajās šūnās.

Par rezultātiem un prognozi patiesībā iegūts ar formulām ItogP = ItogP + P un ItogF = ItogF + F

Par novirzes izmantot = (ItogF - ItogP) / ItogP * 100, ja aprēķins tiek veikts procentos, un, ja to kopējā vērtība - (ItogF - ItogP).

Rezultāti atkal reģistrēti attiecīgajās šūnās, tāpēc nav nepieciešams, lai piešķirtu tiem mainīgajiem.

Pirms sākt, lai izveidotu programmu, kuru vēlaties saglabāt darbgrāmatu, piemēram, ar nosaukumu "Otchet1.xls".

Nospiediet "Izveidot ziņošanas tabulu", jānospiež tikai 1 reizi ievadot galvenes informāciju. Jums vajadzētu zināt, un citus noteikumus. Jo īpaši, poga "Pievienot līnija" ir nospiests katru reizi pēc stāšanās tabulā vērtību katrai darbībai. Pēc ievadīšanas visus datus, kas nepieciešami, lai nospiediet pogu "Finish", un pēc tam pāriet uz "Excel" logā.

Tagad, ka jūs zināt, kā atrisināt problēmu Excel ar makro. Spēja izmantot VBA Excel (skat programmu paraugus. Iepriekš), un jums var būt nepieciešams strādāt vidē populārākais brīdī, teksta redaktoru "Word". Jo īpaši, reģistrējot, kā norādīts sākumā šo rakstu, vai rakstot kodu, lai izveidotu izvēlnes pogas, ar kuru daudzi no darbībām ar tekstu var izdarīt spiežot taustiņus no akcīzes nodokļa vai ar "View" ikonu un "Makro" tab.