Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Otvorte Editor VBA stlačením tlačidla " ALT + F11 " , zatiaľ čo v programe Excel 
 2 
 zadajte nasledujúci kód : . 
 
 Dim bunku ako objekt 
 
 Dim počet As Integer 
 
 count = 0 
 
 pre každú bunku v výber 
 
 count = počet + 1 
 
 Ďalšie buniek 
 
 To je typický slučka v jazyku VBA . To spočíta počet buniek vo výbere 
 3 
Pre opustenie slučky , upraviť kód takto : . ClipArt
 pre každú bunku v výber 
 
 count = počet + 1 
 
 Ďalšie cell 
 
 Exit For počet = 6 
 
 Tento kód ukončí slučku , ak počet sa rovná 6.