Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1280to1284
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Parameter für Schleife einfügen

Parameter für Schleife einfügen
14.10.2012 23:10:01
Franz
Hallo Fachleute,
ich hab folgende Anweisungen in einem normalen Modul:
Worksheets("Liste").btnAuflisten0.Accelerator = 0
Worksheets("Liste").btnAuflisten1.Accelerator = 1
Worksheets("Liste").btnAuflisten2.Accelerator = 2
Worksheets("Liste").btnAuflisten3.Accelerator = 3
Worksheets("Liste").btnAuflisten4.Accelerator = 4
Das möchte ich jetzt gerne in einer Schleife schreiben:
For n = 0 to 4
Worksheets("Liste").btnAuflisten & n.Accelerator = n
next n
So klappt das aber leider nicht, da kommt ne Fehlermeldung beim Verlassen der Zeile: "Fehler beim Kompilieren". Wie muss ich das denn schreiben, bitte?
Danke schonmal und Grüße
Franz

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

Betreff
Datum
Anwender
Anzeige
Das hatten wir schon öfter, findest ...
15.10.2012 00:01:39
Luc:-?
…du also auch im Archiv, Franz;
Namen lassen sich nunmal so nicht variieren, aber es gibt 2 andere Möglichkeiten dafür…
1. mit deinem Ansatz → dann musst du die vbFkt CallByName verwenden,
2. ein Array aller Buttons bilden und das in einer For Each-Schleife abarbeiten.
Evtl weitere Möglichkeiten könnte es geben, Variante2 dürfte aber die idR verwendete sein.
Gruß Luc :-?

AW: Das hatten wir schon öfter, findest ...
15.10.2012 00:06:17
Franz
Hallo Luc,
danke, werd mich drüber machen. Geb Bescheid, wenn's geklappt hat. Oder wenn ich's nicht hinkrieg.
Danke erstmal und Grüße
Franz

Anzeige
Bitte sehr! Dito! owT
15.10.2012 00:19:57
Luc:-?
:-?

AW: Bitte sehr! Dito! owT
15.10.2012 00:54:15
Franz
Hallo Luc,
danke Dir, hab was gefunden:
ActiveSheet.OLEObjects("btnAuflisten" & n).Object.Accelerator = n
Vielen Dank und Grüße
Franz

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige