Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: modul und mehrere commandbuttons

modul und mehrere commandbuttons
29.11.2004 14:29:41
Hans
hallo spezialisten,
ich habe eine recht umfangreiches prozedur in einem modul programmiert. diese prozedur möchte ich auf verschiedenen blättern mit unterschiedlichen commandbutton aufrufen, verkürzt sieht das etwa so aus:
For Each C In Selection.Cells
C.value=?
next
die fragezeichen sind nun mein problem, denn dort soll nun der anfangsbuchstabe des buttons erscheinen, mit dem ich die prozedur aufrufe.
grüße hans
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: modul und mehrere commandbuttons
Udo
Sind das Commandbutton oder Schaltflächen aus "Formular"?
Udo
AW: modul und mehrere commandbuttons
hans
hi, es sind commandbuttons.
grüße hans
hier noch genauer
hans
Hi, hier nochml was klappt und was nicht klappt
For Each C In Selection.Cells
C.Value = Mid(CommandButton1.Caption, 1, 1)
Next
dies klappt wunderbar, aber nur für commandbutton1, es soll aber der anfangsbuchstabe des aktivierten buttons in alle zellen eingefügt werden
tschö hans
Anzeige
AW: hier noch genauer
Udo

Private Sub CommandButton1_Click()
call mach_es(left(commandbutton1.caption,1))
End Sub

Sub mach_es(z as string)
For Each C In Selection.Cells
C.Value = z
Next
End Sub
Udo
klappt wunderbar, thanks
hans
oki, ich bedanke mich
grüße hans
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
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