Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
680to684
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
680to684
680to684
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Optionsfelder in Schleife mit enabled versehen

Optionsfelder in Schleife mit enabled versehen
14.10.2005 15:10:34
harald
Hallo,
ich habe mal wieder ein Problem: Mit einem Button möchte ich erreichen, dass alle 4 Optionsfelder den Wert enabled bekommen. Dies soll in einer Schleife geschehen, aber irgendwie klappt meine Schleife nicht - es kommt immer ein Kompilierfehler. Wie muss die richtige Schreibweise in der Schleife für die Optionsfelder OptBtn1 ... OptBtn4 lauten?

Private Sub CmdButton1_Click()
' <<<<<<<<<< alle Auswahlmöglichkeiten aktivieren >>>>>>>>>>
Dim OptionAuswahl As Integer
For OptionAuswahl = 1 To 4
(OptBtn & OptionAuswahl).Enabled = True
Next OptionAuswahl
End Sub

mfg
harald

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

Betreff
Datum
Anwender
Anzeige
AW: Optionsfelder in Schleife mit enabled versehen
14.10.2005 15:33:40
Matthias
Hallo Harald,

Private Sub CmdButton1_Click()
' <<<<<<<<<< alle Auswahlmöglichkeiten aktivieren >>>>>>>>>>
Dim OptionAuswahl As Integer
For OptionAuswahl = 1 To 4
Me.Controls("OptionButton" & OptionAuswahl).Enabled = True
Next OptionAuswahl
End Sub

Gruß Matthias
AW: Optionsfelder in Schleife mit enabled versehen
14.10.2005 15:43:02
harald
Hallo Matthias,
vielen Dank - mit deinem Tip funktioniert es nun!
mfg
harald
AW: Optionsfelder in Schleife mit enabled versehen
14.10.2005 15:36:35
Nepumuk
Hi,
so:
Private Sub CmdButton1_Click()
    ' <<<<<<<<<< alle Auswahlmöglichkeiten aktivieren >>>>>>>>>>
    Dim OptionAuswahl As Integer
    For OptionAuswahl = 1 To 4
        Controls("OptBtn" & OptionAuswahl).Enabled = True
    Next OptionAuswahl
End Sub

Gruß
Nepumuk

Anzeige
AW: Optionsfelder in Schleife mit enabled versehen
14.10.2005 15:45:41
harald
Hallo Nepumuk,
das ging ja sehr schnell! Auch Matthias hat mir gerade geschrieben, und es funktioniert nun ausgezeichnet. Vielen Dank!
mfg
harald

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige