![]() |
||
![]() |
ZΣhlknopf fⁿr Auswertungen anlegenFⁿr die Auswertung von Befragungen brauche ich einen ZΣhlknopf. Der soll beim Anklicken den Wert einer Zelle um eins erh÷hen. Bei meinen Versuchen entsteht immer ein Zirkelbezug. K÷nnen Sie mir weiterhelfen? Eine L÷sung mit einem Funktionsaufruf verursacht an dieser Stelle immer einen Zirkelbezug, weil sich der neue Wert der Zelle auf den bisherigen beziehen muss. Mit einem kurzen VBA-Makro k÷nnen Sie dieses Problem jedoch umgehen. Range ("C5").Select X=ActiveCell.Value ActiveCell.Value=X+1Der erste VBA-Befehl wΣhlt die gewⁿnschte Zelle im Tabellenblatt aus, in unserem Beispiel ist das C5. Anschlie▀end erhΣlt die Variable X den Wert der aktiven Zelle zugewiesen. Die letzte Zeile des Makros bestimmt den neuen Wert fⁿr die Zelle mit einer beliebigen Rechenoperation. Mit dem Befehl ╗Datei | Schlie▀en½ beenden Sie den VBA-Editor und gelangen wieder ins Tabellenblatt. Ihr ZΣhlknopf ist nun bereits funktionsfΣhig. Klicken Sie mit der rechten Maustaste darauf, um den angezeigten Text und das Aussehen nach Belieben zu verΣndern. |
![]() |