Thema Datum  Von Nutzer Rating
Antwort
16.09.2008 11:47:19 Lhoem_C
NotSolved
17.09.2008 12:31:25 jh
NotSolved
18.09.2008 10:28:47 Lhoem_C
NotSolved
Blau Aw:Aw:Aw:CommandButton_Click
 18.09.2008 11:57:18 jh
NotSolved
25.09.2008 11:33:41 Lhoem_C
NotSolved

Ansicht des Beitrags:
Von:
jh		 Datum:
18.09.2008 11:57:18		 Views:
1057		 Rating:
     
Antwort:
  Ja
Thema:
Aw:Aw:Aw:CommandButton_Click
Hallo,

das ist ja normal, weil immer nur der zuletzt erstellte Button mit der
Objektvariablen verbunden ist. Wenn du mehrere Buttons hast, musst du
ein dynamisches Array erstellen. Diese Buttons haben dann alle dieselbe
Click-Eventprocedur. Welcher Button angeklickt wurde, kannst du in dieser
Procedur mit CBut.Name (oder CBut.Caption) feststellen. Folgende Änderungen:

Public c() As New clsBtn ' beachte die leeren Klammern!

Wenn du das Array nur im Codebereich der Form benutzt, kannst du es auch
dort auf Modulebene (NICHT innerhalb einer Procedur!) mit Dim deklarieren.

Vor dem Einfügen des ersten Buttons muss das Array mit ReDim auf die
vorläufige Mindestgröße festgelegt werden:

ReDim c(0)

Das Einfügen eines Buttons geschieht dann folgendermaßen:

n = UBound(c) + 1
ReDim Preserve c(n)
Set c(n).CBut = UserForm1.Controls.Add("Forms.CommandButton.1")

Gruß


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
16.09.2008 11:47:19 Lhoem_C
NotSolved
17.09.2008 12:31:25 jh
NotSolved
18.09.2008 10:28:47 Lhoem_C
NotSolved
Blau Aw:Aw:Aw:CommandButton_Click
 18.09.2008 11:57:18 jh
NotSolved
25.09.2008 11:33:41 Lhoem_C
NotSolved