Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
968to972
968to972
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zählen wenn Command Button gedrückt wird

Forumthread: Zählen wenn Command Button gedrückt wird

Zählen wenn Command Button gedrückt wird
24.04.2008 08:54:00
raphael
Guten Morgen zusammen,
ich habe ein Problem! und ich hoffe ihr könnt mir bei der Lösung behilflich sein.
Ich benötige ein VBA Code der mir anzeigt wie oft ich auf den Command Button gedrückt habe.
Das bedeutet jedes mal wen ich auf meinen Command Button drücke soll die Hinterlegte Zahl um 1 steigen.
Kann mir jemand mit dem Code weiterhlefen?
Danke
Raphael

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zählen wenn Command Button gedrückt wird
24.04.2008 08:57:39
selli
hallo raphael,
da gibt es ja viele möglichkeiten.
eine die mir spontan einfällt ist, du könntest den gezählten wert auch auf dem button selbst anzeigen lassen.
wie soll er denn beschriftet sein?
gruß selli

AW: Zählen wenn Command Button gedrückt wird
24.04.2008 09:01:49
Matthias
Hallo
Lege ein Modul an mit folgendem Code:

Option Explicit
Public zLong As Long


Unter den CommandButton dann diesen Code (Doppelklick auf den Button, dann Code schreiben[Kopieren])


Option Explicit
Private Sub CommandButton1_Click()
zLong = zLong + 1
MsgBox zLong ' oder auch Range("A1") = zLong
End Sub


Gruß Matthias

Anzeige
AW: Zählen wenn Command Button gedrückt wird
24.04.2008 09:16:03
raphael
Coole Sache
Danke Matthias
MFG
raphael
;
Anzeige
Anzeige

Infobox / Tutorial

Zählen bei Button-Klick in Excel

Schritt-für-Schritt-Anleitung

Um die Anzahl der Klicks auf einen Command Button in Excel zu zählen, kannst Du folgende Schritte durchführen:

  1. VBA-Entwicklungsumgebung öffnen:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Modul erstellen:

    • Klicke im Menü auf Einfügen und wähle Modul.

  3. Code für die Zählvariable eingeben:

    • Füge folgenden Code in das Modul ein: 
      Option Explicit
Public zLong As Long

  4. Code für den Command Button hinzufügen:

    • Gehe zurück zu Deinem Arbeitsblatt und klicke mit der rechten Maustaste auf den Command Button. Wähle Code anzeigen.
    • Füge diesen Code in das sich öffnende Fenster ein: 
      Option Explicit
Private Sub CommandButton1_Click()
 zLong = zLong + 1
 MsgBox zLong ' oder auch Range("A1") = zLong
End Sub

  5. Speichern und Testen:

    • Speichere Deine Änderungen und kehre zu Excel zurück. Klicke auf den Command Button und Du solltest die Anzahl der Klicks in einer Nachricht sehen.

Häufige Fehler und Lösungen

  • Fehler: "Variable nicht definiert"
    Lösung: Stelle sicher, dass Du Option Explicit am Anfang Deines Moduls verwendet hast.

  • Fehler: Button reagiert nicht
    Lösung: Überprüfe, ob der Code im richtigen Bereich (Click-Ereignis des Buttons) eingefügt wurde.

  • Fehler: Zählung wird nicht gespeichert
    Lösung: Die Zählvariable wird beim Schließen der Datei zurückgesetzt. Um dies zu vermeiden, musst Du die Variable in einer Datenbank oder einer Zelle speichern.

Alternative Methoden

Wenn Du die Zählung nicht mit VBA durchführen möchtest, kannst Du auch folgende Methode verwenden:

  1. Formel zur Zählung:

    • Lege in einer Zelle eine Formel fest, die die Anzahl der Klicks zählt, indem Du jede Interaktion mit dem Button in eine Zelle schreibst und dann die Zelle mit einer Zählformel zusammenfasst.

  2. Formularsteuerelemente nutzen:

    • Verwende Formularsteuerelemente anstelle von ActiveX-Steuerelementen, um einfachere Interaktionen zu ermöglichen.

Praktische Beispiele

Angenommen, Du hast einen Command Button auf Deinem Excel-Arbeitsblatt:

  1. Zähler in Zelle A1 anzeigen: Ändere den Code im CommandButton1_Click-Ereignis zu:

    Range("A1").Value = zLong

  2. Zähler zurücksetzen: Füge einen weiteren Button hinzu, um die Zählung zurückzusetzen:

    Private Sub CommandButton2_Click()
   zLong = 0
   MsgBox "Zähler zurückgesetzt."
End Sub

Tipps für Profis

  • Zählung in einer Tabelle speichern:
    Du kannst die Zählungen in einer Excel-Tabelle speichern, um eine Historie der Klicks zu führen.

  • Fehlerbehandlung einbauen:
    Implementiere eine Fehlerbehandlung im VBA-Code, um unerwartete Probleme abzufangen.

  • Design anpassen:
    Gestalte Deinen Command Button ansprechend, um die Benutzererfahrung zu verbessern.

FAQ: Häufige Fragen

1. Wie kann ich den Zählerwert dauerhaft speichern?
Um den Zählerwert dauerhaft zu speichern, kannst Du ihn in eine Zelle schreiben, wie im Beispiel oben gezeigt.

2. Gibt es eine Möglichkeit, die Zählung nur in bestimmten Intervallen zu speichern?
Ja, Du kannst einen Timer oder ein zusätzliches Button-Element hinzufügen, das die Zählung in bestimmten Abständen speichert.

3. Funktioniert dieser Code in Excel 2016 und später?
Ja, der Code sollte in Excel 2016 und neueren Versionen problemlos funktionieren.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige