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é