Kompyuta, Mapulogalamu
VBA kupambana: mapulogalamu nyemba. Macros mu kupambana
anthu ochepa chabe amene akudziwa kuti Baibulo loyamba la otchuka Microsoft kupambana mankhwala anaonekera mu 1985. Popeza ndiye kakusintha zosintha angapo n'kumuuza mamiliyoni ogwiritsa padziko lonse. Komabe, ambiri ntchito yekha ndi mphamvu pang'ono kwa spreadsheet ichi ndi sakudziwa nkomwe momwe iwo akanakhoza moyo mosavutikira luso mapulogalamu kupambana.
VBA Kodi
Mapulogalamu mu kupambana anachita ndi Zooneka Basic mupulogalamuyi chinenero mapulogalamu kuti poyamba inamangidwa mu spreadsheet wotchuka ku Microsoft.
Ubwino wake Akatswiri amanena omasuka wachibale wa chitukuko. Monga mmene kumapeto, VBA akhoza adziwe zinthu zofunika kwambiri, ngakhale owerenga amene alibe luso la ntchito mapulogalamu. Pakuti VBA mbali monga script kuphedwa chilengedwe ofesi ntchito.
The sangathe wa pulogalamuyi ndi mavuto kugwirizana ndi ngakhale Mabaibulo osiyanasiyana. Iwo amayamba ndi chakuti VBA malamulo a pulogalamu ankanena za magwiridwe kuti alipo mu Baibulo latsopano mankhwala, koma osati mu chimodzi. Palinso sangathe zazikulu ndi mopambanitsa omasukirana cha ndondomekozi kusintha nkhope ya mlendo. Komabe, Office Microsoft, ndi IBM zamaluwa Symphony zimathandiza owerenga ntchito kubisa kulowa malamulo ndi achinsinsi zoikamo kuwaona.
Zinthu, zopereka, katundu, ndi njira
Pali mfundo izi muyenera kudziwa amene akupita ku ntchito mu chilengedwe VBA. Choyamba, muyenera kumvetsetsa zimene chinthu chimene. Mu kupambana, mu kuchita izi monga pepala, bukhu, ndi selo zosiyanasiyana. zinthu izi ndi utsogoleri wolowezana wapadera, i.e. kumvera mzake.
Chief pakati pawo ndi ntchito, ofanana kupambana pulogalamu yokha. Adamtsata Workbooks, ma fomu ndi manambala. Mwachitsanzo, ponena kuti selo A1 pa pepala enieni ayenera akulozera njira, kutenga nkhani utsogoleri wolowezana.
Ponena za maganizo "zosonkhanitsira," gulu la zinthu m'kalasi lomwelo, limene kujambula wapatsidwa ChartObjects. zanyengo komanso ndi zinthu.
Chinthu chotsatira - katundu. Iwo ali mbali yofunika ya chinthu chilichonse. Mwachitsanzo, kwa manambala a - ndi Ubwino kapena chilinganizo.
Njira - ndilo lamulo kusonyeza kuti mukufuna. Polemba m'buku VBA iwo kuti asiyane ndi chinthu mfundo. Mwachitsanzo, ngati idzaonetsedwa Patapita nthawi pamene mapulogalamu mu "kupambana" ntchito Maselo lamulo (1,1) .Select. Zikutanthauza kuti m'pofunika kusankha khungu ndi ndondomeko (1,1), i.e. A1.
Komabe, amagwiritsidwa ntchito kawirikawiri Selection.ClearContents. kukhazikitsa ndi kuchotsa nkhani za selo anasankha.
Kodi kuyamba
Choyamba, mukufuna kulenga file ndi kuzisunga, perekani dzina ndi kusankha mtundu wa «Book kupambana zazikulu-chinathandiza."
Ndiye, kupita VB ntchito, zomwe yokwanira ntchito osakaniza «alt» ofunika «F11». chotsatira:
- menyu bala pamwamba pa zenera, dinani chizindikiro pafupi ndi chizindikiro cha kupambana;
- Mudule anasankha lamulo;
- kusunga kuwonekera pa mafano ndi litayamba floppy;
- kulemba, nkuti, kachidindo ndondomeko.
Izo zikuwoneka motere:
pulogalamu Sub ()
'Malamulo athu
mapeto Sub
Chonde dziwani kuti mzere " 'malamulo athu" adzakhala anatsindika mumtundu (obiriwira). Chifukwa apostrophe ichi, zimakambidwa pa chiyambi cha chingwe, zimene zikusonyeza kuti zimene ananena pambuyo ndemanga.
Tsopano mukhoza kulemba kachidindo aliyense ndi kulenga okha chida latsopano VBA kupambana (onani mapulogalamu chitsanzo zina.). N'zoona kuti anthu amene ali bwino ndizosowa Zooneka Basic, zidzakhala zosavuta. Komabe, ngakhale anthu amene alibe, ngati inu mukufuna kuti athe kupeza omasuka mofulumira ndithu.
Macros mu kupambana
Kumbuyo dzina ili amabisa mapulogalamu olembedwa zithunzi Basic chinenero Phunziro pankhaniyi. Choncho, mapulogalamu kuti kupambana - ndi kulenga zazikulu kwa malamulo akufuna. Ndi mphamvu izi, Microsoft spreadsheet kudziletsa akufotokozera, kusinthasintha zofunika za wosuta makamaka. Popeza anachitira ndi mmene kulenga zigawo kulemba macros, n'zotheka chitani zitsanzo konkire pulogalamu VBA kupambana. Ndi bwino kuyamba ndi zizindikiro kwambiri.
CHITSANZO 1
Ntchito Lembani dongosolo zimene kutengera mtengo wa nkhani za selo limodzi ndi kulemba kwa wina.
Kuchita izi:
- kutsegula tsamba "View";
- kusuntha chizindikiro "macros";
- kugwedeza kwa "zazikulu Record";
- lembani anatsegula mawonekedwe.
Pakuti kuphweka, mu "Dzina zazikulu" kusiya "Makros1" ndi "Simungachite chinsinsi" ndi anaikapo Mwachitsanzo, hh (izi zikutanthauza kuti mukhoza kuthamanga pulogalamu Mwachitsanzo adzakhala «Ctrl + H» blitz timu). Dinani Enter.
Tsopano inu anayamba kujambula zazikulu, amapanga nkhani za selo ndi mzake. Bwererani ku mafano pachiyambi. Dinani pa "zazikulu Record". Zimenezi zinasonyeza akamaliza applets.
chotsatira:
- kachiwiri kusamukira ku chingwe "Macros";
- amusankha mu mndandanda "zazikulu 1";
- dinani "Thamanga" (ofanana ntchito kumayamba anapezerapo makiyi Simungachite «Ctrl + hh»).
Motero, zochita omwe anachita pa kujambula zazikulu.
N'chinthu chanzeru kuona mmene malamulo zikuwonekera. Kuchita izi, kubwerera kachingwe "Macros" ndi kudina "Sinthani" kapena "Lowani". Chifukwa, iwo amapezeka mu chilengedwe VBA. Ndipotu, malamulo lokha lili pakati pa mizere zazikulu Makros1 Sub () ndi Kutha Sub.
Ngati kukopera wakhala anachita, mwachitsanzo, khungu A1 mu C1 selo, mmodzi wa mizere ya malamulo lidzaonekera manambala ( "C1"). Sankhani. Pomasulira, izo zimawoneka ngati "manambala (" C1 "). Sankhani", mwa kulankhula kwina, akupanga kusintha kwa VBA kupambana, mu C1 selo.
Mbali za ndondomekozi anamaliza timu ActiveSheet.Paste. Kumatanthauza kujambula nkhani anasankha maselo (mu nkhani iyi, A1) mu anasankha C1 selo.
CHITSANZO 2
VBA m'zinthu kuthandiza kulenga macros osiyana mu kupambana.
VBA m'zinthu kuthandiza kulenga macros osiyana. Kuganiza kuti pali ntchito Y = × + × 3 + 3x 2 - Ko (x). Mukufuna kulenga zazikulu kwa zithunzi zake. Izi zikhoza kuchitika kokha ndi ntchito VBA m'zinthu.
Mtengo koyamba ndi womaliza ntchito mkangano kutenga x1 = 0 ndipo x2 = 10. Komanso, m'pofunika kuti atchule nthawi zonse - phindu pa sitepe amasintha mtsutso ndi kufunika koyamba kwa kauntala.
Zitsanzo zonse VBA kupambana macros analengedwa ntchito Momwemo monga tafotokoza. Mu nkhani imeneyi, malamulo zikuwoneka ngati:
programm Sub ()
x1 = 1
x2 = 10
shag = 0.1
Ine = 1
Kodi Ngakhale x1
Y = x1 + x1 ^ 2 + 3 * x1 ^ 3 - Ko (x1)
Maselo (i 1) .Value = x1 (x1 mtengo olembedwa kukumbukira ndi ndondomeko ya (i 1))
Maselo (i, 2) .Value y n'zofanana (Y mtengo zinalembedwa selo ndi ndondomeko ya (i, 2))
Ine = ine + 1 (achiyesa chomveka);
x1 = x1 + shag (mtsutso lisinthike sitepe kukula);
kuzungulira
Mapeto Sub.
Chifukwa cha athamangadi izi zazikulu "kupambana" kupeza zipilala ziwiri, woyamba amene amapezeka makhalidwe a ×, ndipo chachiwiri - kuti Y.
Ndiye amakonza kupitiriza iwo, muyezo chifukwa "kupambana".
CHITSANZO 3
Kugwiritsa m'zinthu mu VBA kupambana 2010, komanso m'Mabaibulo ena, pamodzi ndi kale yafupika Kodi Ngakhale kuti kapangidwe ntchito.
Taganizirani pulogalamu kuti amalenga mzati. Mukachipinda izo ulembedwa mabwalo lolingana mzere chiwerengero. Ntchito kamangidwe adzalola kuti alembe mwachidule kwambiri, popanda kugwiritsa ntchito kauntala.
Choyamba m'pofunika kuti akonze zazikulu, monga tafotokozazi. Kenako, kulemba malamulo lokha. Timakhulupilira kuti timasamala ndi mfundo za maselo 10. Ndondomekozi ndi motere.
Pakuti ine = 1 10 Next
Lamulo ndi kunditumiza ku "anthu" chinenero, monga "mobwerezabwereza kuchokera 1 mpaka 10 increments wa munthu."
Ngati ntchito kulandira mzati ndi mabwalo Mwachitsanzo, integers onse wosamvetseka pakati pa 1 ndi 11, ife kulemba:
Pakuti ine = 1 10 1 Next.
Apa, mwatsatane - tsatane. Pankhaniyi, ndi wofanana ndi awiri. Ndi kusakhulupirika, pakalibe mawu mu kuzungulira zikutanthauza kuti phazi limodzi.
Zotsatira ayenera kusungidwa mu chiwerengero selo (i 1). Ndiye nthawi iliyonse mungayambe kayendedwe ka ndi kuwonjezeka mu mtengo wa ine mwatsatane adzakhala basi kukula ndi mzere chiwerengero. Choncho, kudzakhala malamulo kukhathamiritsa.
Ambiri, malamulo amaonekera:
pulogalamu Sub ()
Pakuti ine = 1 Kuti 10 1 (akhoza kulembedwa kokha kwa ine = 1 Kuti 10)
Maselo (i 1) .Value = i ^ 2 (i.e. phindu lalikulu kwalembedwa mu selo (i 1) i)
Kenako (m'lingaliro atenge mbali ya kauntala njira ndi wina chiyambi mkombero)
Mapeto Sub.
Ngati mwachita bwino, kuphatikizapo kujambula ndi kuthamanga macros (onani. The malangizo pamwamba), ndiye anazitcha nthawi kukula adzalandira analandira ndime (Pankhaniyi ongokhala maselo 10).
CHITSANZO 4
Tsiku ndi tsiku, nthawi m'pofunika kutenga lingaliro ili kapena kuti malingana ndi ena zinthu. Simungakhoze kuchita popanda iwo VBA kupambana. Zitsanzo za mapulogalamu kumene njira zina za aligorivimu ndi amusankha m'malo poyamba anakonzeratu, ambiri amangoti ntchito kamangidwe ka Ngati ... Ndiye (kwa milandu yovuta) Ngati ... Ndiye ... END Ngati.
Taganizirani makamaka. Yerekezerani kuti mukufuna kulenga zazikulu kwa "kupambana" kwa khungu ndi ndondomeko ya (1,1) lajambulidwa:
1 mkangano ndi zabwino;
0 mkangano ndi ziro;
1, mkangano ndi negative.
Kulenga ndi zazikulu ngati kuti "kupambana" akuyamba mu njira muyezo, pogwiritsa ntchito "otentha" makiyi alt ndi F11. Komanso olembedwa malamulo otsatirawa:
pulogalamu Sub ()
× = Maselo (1 1) .Value (Lamulo limeneli anapereka mtengo wa × ndondomeko ya nkhani selo (1 1))
Ngati ×> 0 Ndiye Maselo (1 1) .Value = 1
Ngati × = 0 Ndiye Maselo (1 1) .Value = 0
Ngati × <0 Ndiye Maselo (1 1) .Value = -1
Mapeto Sub.
Mpaka kuthamanga zazikulu ndi kulowa mu "kupambana" mtengo anafuna mkanganowo.
ntchito VBA
Monga inu mwina mwaona, mu wotchuka pulogalamu Microsoft spreadsheet ntchito si wovuta. Makamaka ngati inu muphunzire ntchito VBA ntchito. Okwana izi chinenero mapulogalamu polenga kulemba ntchito "kupambana" ndipo Mawu, m'ma 160 ntchito. Iwo akhoza kugawidwa m'magulu angapo lalikulu. Ali:
- ntchito masamu. Kugwiritsira ntchito kuti mtsutso wa ubwino ndi cosine analandira, ndi logarithm achilengedwe, ndi gawo lonse.
- ntchito zachuma. Chifukwa kupezeka ndi ntchito mapulogalamu mu kupambana, ndipo mukhoza kupeza zipangizo zothandiza mlandu ndi midzi ndalama.
- Zungulirani processing ntchito. Zikuphatikizapo Zungulirani, IsArray; LBound; UBound.
- VBA kupambana liziyenda kwa mzere. Izi ndi gulu mwachilungamo lalikulu. Pamafunikanso Mwachitsanzo, Space ntchito kulenga chingwe angapo mipata ofanana mfundo inteja kapena kusintha Asc zizindikiro kwa ANSI code. Onse a iwo ankagwiritsa ntchito n'kukupatsani ntchito ndi zingwe mu "kupambana" kulenga ntchito zambiri mosavuta ntchito ndi matebulo izi.
- Data mtundu kutembenuka ntchito. Mwachitsanzo, CVar akubwerera mkangano Kumasonyeza, akatembenuka kuti zosinthika mtundu deta.
- Date ntchito. Iwo kwambiri kukuza mbali oti "kupambana". Choncho, WeekdayName ntchito akubwerera dzina (zonse kapena tsankho) kwa tsiku la sabata ndi nambala yake. Ngakhale zothandiza kwambiri ndi powerengetsera. Iye amapereka chiwerengero cha masekondi kuti yadutsa kuyambira usiku kwa mphindi makamaka kwa tsiku.
- Liziyenda kutembenuza kukangana M'ndandanda m'magulu osiyana ambiri. Mwachitsanzo, Oct zotuluka kuti chifaniziro octal wa chiwerengero.
- masanjidwe ntchito. Ofunika kwambiri awa ndi Format. Limabwerera ndi zosinthika ndi mawu Onani m'magazini malinga ndi malangizo ku malongosoledwe a kake.
- ndi zina zotero.
Kuphunzira kwa katundu mwa ntchitozo ndi ntchito yawo zidzawachitira kwambiri kukuza kuchuluka kwa "kupambana".
CHITSANZO 5
Tiyeni yesetsani kuthetsa mavuto zovuta zambiri. Mwachitsanzo:
Dan pepala chikalata mlingo lenileni la ndalama za lipoti la ntchito. amafuna:
- kukhala chitsanzo gawo ake ndi spreadsheet "kupambana";
- kupanga dongosolo VBA kuti kupempha deta yaiwisi kudzaza izo, kuchita kuwerengetsera zofunika kudzaza Chinsinsi cha chipinda chogwirizana.
Taganizirani banja lina njira zotsatirazi.
Kupanga Chinsinsi ndi
zochitika zonse zimagwiridwa pa muyezo pepala mu kupambana. Free maselo zosungikira kulowa deta pa mwezi, chaka, makampani mutu-ogula kuchuluka kwa ndalama, msinkhu wawo zolowa. Chiwerengero cha makampani (makampani), mu ulemu umene lipoti sizinalembedwe, maselo kuti pa maziko a makhalidwe ndi dzina akatswiri odziwa palibiretu pasadakhale. Fomu anatumizidwa dzina latsopano. Mwachitsanzo, "Օ Report".
zosintha
Kulemba dongosolo basi lembani M'manja, kusankha ndi kalembedwe. Iwo ntchito zosintha ndi:
- NN- chiwerengero cha mzere panopa gome;
- TP ndi TF - zinakonzedwa ndi zolowa leni;
- SF ndi SP - leni ndi makonzedwe okwana ndalama;
- IP ndi NGATI - zinakonzedwa ndi ndalama leni mlingo.
Ife potanthauza ndi zilembo zofanana, koma ndi "manambala oyambirira» Itog kudzikundikira okwana kwa ndime zimenezo. Mwachitsanzo, ItogTP - Pankhani ndime yakuti, monga "zolowa anakonza."
Yothetsera vuto ntchito mapulogalamu VBA
Ntchito kalembedwe imeneyi timapeza chilinganizo cha masiyanidwe a. Ngati mukufuna kugwira mawerengedwe mu% tili (F - P) / P * 100, ndi kuchuluka kwa - (F - P).
Zotsatira za kuwerengetsera zimenezi zingakhale bwino basi kuti "kupambana" spreadsheet mu maselo yoyenera.
Chifukwa chowathandiza ndi madokotala ananena zawo Ndipotu akamagwira mitunduyi ItogP = ItogP + P ndi ItogF = ItogF + F.
Pakuti zolakwika ntchito = (ItogF - ItogP) / ItogP * 100 ngati mawerengedwe a ikuchitika monga kuchuluka, ndipo ngati mtengo okwana - (ItogF - ItogP).
Zotsatira kamodzinso analembedwa maselo yoyenera, choncho palibe imene iwo kuti zosintha.
Asanayambe kulenga pulogalamu mukufuna kupulumutsa lolembamo Mwachitsanzo, pansi pa dzina "Otchet1.xls".
Press "Pangani tebulo malipoti," muyenera akanikizire nthawi 1 pokhapokha kulowa mudziwe chamutu. Muyenera kudziwa ndi malamulo ena. Makamaka, batani "Add mzere" ikhoza kukhala iripo nthawi iliyonse atachita tebulo amatsogoza kwa ntchito iliyonse. Utatha deta onse chofunika kuti akanikizire batani "mapeto", ndipo kusinthana kwa "kupambana" zenera.
Tsopano mumadziwa kuthetsa ntchito za Excel pogwiritsa ntchito macros. Kukwanitsa kugwiritsa ntchito vba kwambiri (zitsanzo za mapulogalamu, onani pamwambapa) mungafunikire kugwira ntchito ku chilengedwe cha wotchuka kwambiri mkonzi wa "Vord". Makamaka, mukhoza kulemba, monga momwe tawonedwera kumayambiriro kwa nkhaniyi, kapena mwa kulembera makalata kupanga mapangidwe a menyu, chifukwa cha ntchito zambiri zomwe zingagwiritsidwe ntchito powonjezera makiyi kapena tabati "View" ndi "Macros" icon.
Similar articles
Trending Now