Wie Sie eine Zelle in Excel zu erhöhen, indem Sie darauf klicken
Inkrementieren einer Zelle in Microsoft Excel, indem Sie darauf klicken kann leicht mit einer Arbeitsmappe-Ereignis erreicht werden. Das SheetSelectionChange-Ereignis tritt ein, wenn die Auswahl auf einem beliebigen Arbeitsblatt ändert. Sie können hinzufügen, den VBA-Code innerhalb dieses Ereignis, um den Wert einer bestimmten Zelle zu erhöhen. Dieses Verfahren ist nützlich, wenn die Benutzerzeit sparen, da nicht manuell einen Wert erhöht werden, wenn Ihre Excel-Anwendung verwendet werden soll.
Anweisungen
1 Microsoft Excel zu starten, klicken Sie auf die Registerkarte "Entwicklertools" und klicken Sie auf "Visual Basic", das VBA-Editor-Fenster zu starten.
2 Doppelklicken Sie im Bereich Objekt-Explorer, öffnen Sie ein neues Modul "ThisWorkbook". Fügen Sie den folgenden Code um Zelle A1 um eins erhöht, wenn der Benutzer darauf klickt:
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Row = 1 And Target.Column = 1 Then
Range("A1").Value = Range("A1").Value + 1
End If
EndSub
3 Wechseln Sie zurück zu Microsoft Excel, und klicken Sie auf A1 um es um eins erhöhen.