Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky

Domáce Hardware Siete Programovanie Softvér Otázka Systémy

Ako používať slučku zmeniť viac buniek v jazyku Visual Basic

najsilnejší vlastností počítača , je jeho schopnosť automatizovať , a ktorý je založený na jednoduchom programovacom koncepte tzv " slučka " . Či je jazyk je Visual Basic , Assembler , Fortran , C alebo Java , pohodlie práce na počítači je zo slučky . V podstate , môžete inštruovať počítač k opakovaniu určitej stovky úloh , tisíce alebo dokonca milióny časov . Je jednoduché naprogramovať jednoduchú slučku v jazyku Visual Basic zmeniť viac buniek v programe Excel . Veci , ktoré budete potrebovať
MS Excel s VB
Zobraziť ďalšie inštrukcie
Napíšte jednoduchý program s Loop
1

Podržte kláves a stlačte tlačidlo " Alt " tlačidlo " F11 " do nového pracovného hárka v programe Excel . Pozrite sa na editore jazyka Visual Basic , a keď vidíte tabuľku na obrazovke miesto , zvoľte " Nástroje " , vyberte " makro " , potom vyberte " Editor jazyka Visual Basic . "
2

Kliknite na " Vložiť " a vyberte možnosť " Module " . Zadajte nasledujúci kód , keď vidíte blikajúci kurzor pod slovom " ( General ) " :

Sub SimpleLoop ( )

Dim Aj ako IntegerWorksheets ( " Hárok1 " ) ActivateRange ( " A1 . . " ) Zvoľte
" Komentár : Tu je dodávaný slučky

i = 1 až 100ActiveCell.Value = IActiveCell.Offset ( 1 , 0 ) ActivateNext aj

. "

komentár : Loop končí na vyššie uvedenom vyhlásení

End Sub
3

Skontrolujte kód starostlivo za chyby - dva znaky sa za slovo " SimpleLoop " sú zátvorky . Uistite sa , že váš kód je presne ako vyššie uvedený kód
4

Spustite program : . " . Run Sub /UserForm " Zvoľte " Spustiť " , potom vyberte
5

Potvrdiť výsledky programu kliknutím na zelené " X " v pravom hornom rohu obrazovky . Všimnite si , že program napísaný čísla od 1 do 100 v prvých 100 buniek na obrazovke .
Zmena programu
6

podržte kláves a stlačte tlačidlo " Alt " " F11 " . Zmeňte svoj ​​program , aby sa 100 rýchle výpočty a ukladať výsledok : Presuňte kurzor na riadok , ktorý číta , " ActiveCell.Value = I" . Zmeňte ju takto :

ActiveCell.Value = 1,05 ^ ( I)
7

Spustite program . Kliknite na zelenú " X " znova a uistite sa , že program z 100 výpočty a uložili v tabuľke . Ručné výpočet 1,05 umocnené na 2 pochopiť výpočet .
8

Clear obrazovky podržaním klávesy " Ctrl " a stlačením tlačidla " A. " Uvoľnite obe tlačidlá a kliknúť na " Zmaž "
9

zmeniť svoj ​​program , napísať správu 200x : " . F11 " Držte kláves " Alt " a stlačte Presuňte kurzor na číslo " 100 " a nahradiť ju " 200 " . Presunutie kurzora o jeden riadok nadol a nahradiť " I" s " Milujem výpočtovej ! " Riadok kódu by mal vyzerať takto :

ActiveCell.Value = " Milujem výpočtovej ! "
10

Spustite program znovu . Kliknite na zelenú " X " znova a uistite sa , že program napísal " Milujem výpočtovej ! " 200 krát .

Najnovšie články

Copyright © počítačové znalosti Všetky práva vyhradené