Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Name von button

Forumthread: Name von button

Name von button
10.11.2003 14:57:30
fossy
Hi

Letzter Thread hat nichts gebracht..

Habe über die Symbolleiste "Formular" einige Buttons eingefügt.
Excel vergibt für jeden button einen Name z.B:( Button 1 )

Mein Problem ich muß im Makro wissen welchen Button der User betätigt hat

Irgendwie so


Sub test()
dim name as string,zeile as integer
name = Hier den befehl das ich den Name des betätigten button bekomme !!!!
damit kann ich "Button 6" durch eine Variable ersetzen.
zeile = ActiveSheet.DrawingObjects("Button 6").TopLeftCell.Row
nämlich so
zeile = ActiveSheet.DrawingObjects(name).TopLeftCell.Row
End Sub


vielleicht ist es auch so möglich


Sub test ( name as string )  Hier mit direkter Übergabe in die Funktion
dim zeile as Integer
zeile = ActiveSheet.DrawingObjects(name).TopLeftCell.Row
End Sub


danke
fossy
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Name von button
10.11.2003 15:18:19
Nayus
Hi,
da Du ja eine Aktion definierst (Click-Ereignis), die beim Klicken
eines Buttons ausgeführt wird, weißt Du doch auch welcher Button
geklickt wurde. Der Name des Buttons ist änderbar.
Wo ist das Problem?
Gruß,
Nayus
AW: Name von button
10.11.2003 15:24:26
Button
Hi

Es handelt sich um einen Formular-Button.
Ich möchte 10 Buttons an ein Makro binden und durch den namen des Buttons unterscheiden können.

nämlich so:

zeile = ActiveSheet.DrawingObjects(Hier die Variable des Names ,statt des STRINGS"Button1").TopLeftCell.Row

so bekomme ich von jedem Button die aktuelle zeilennummer
Anzeige
AW: Name von button
10.11.2003 15:25:46
Fossy
Hi

Es handelt sich um einen Formular-Button.
Ich möchte 10 Buttons an ein Makro binden und durch den namen des Buttons unterscheiden können.

nämlich so:

zeile = ActiveSheet.DrawingObjects(Hier die Variable des Names ,statt des STRINGS"Button1").TopLeftCell.Row

so bekomme ich von jedem Button die aktuelle zeilennummer
Anzeige
AW: Name von button
10.11.2003 15:58:08
Martin Bolleter
Hallo Fossy

das habe ich auch schon versucht, und bisher keine sehr schöne Lösung gefunden. Ich habe mir dann so beholfen:

Schreib für jeden Button eine eigene kleine Prozedur, welche die eigentliche Procedure "Test" aufruft und dabei einen Wert übergibt, anhand dem du dann den Button identifizieren kannst. ZB:

Proc für Button1:


Sub Button1()
Test(1)
End Sub


... dito für alle Buttons

Proc Test:


Sub Test(btn as integer)
MsgBox "Die Prozedur wurde vom Button " & btn & " aufgerufen"
End Sub


Gruss
Martin
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige