Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Spustite program Microsoft Excel , kliknite na kartu " Vývojár " a kliknite na " Visual Basic " pre spustenie okna VBA editora . 
 2 
 Double - kliknite na " ThisWorkbook " z tably Prieskumník objektov sa otvorí nový modul . Pridajte nasledujúci kód zvýšiť bunku A1 jeden, keď používateľ klikne na neho : 
 
 Private Sub Workbook_SheetSelectionChange ( ByVal Sh As Object , byval cieľ ako rozsah ) 
 
 Ak Target.Row = 1 A Target.Column = 1 Potom 
 
 Range ( " A1 " ) . Value = Range ( " A1 " ) . Hodnota + 1 
 
 End If 
 
 End Sub 
 
 3 
 Prepnite späť do programu Microsoft Excel a potom kliknite na tlačidlo A1 zvyšujete ju jeden . 
              
Copyright © počítačové znalosti Všetky práva vyhradené