Anzeige
Archiv - Navigation
1856to1860
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
Optionbutton Index variabel gestalten
30.11.2021 17:31:49
Michael
Hallo zusammen,
da ich leider nicht fündig geworden bin eröffne ich hier mal eine Frage:
Wie kann ich ich in einer Schleife den Index eine Optionbuttons variabel aufsetzen.
Die Optionbuttons liegen in einem Worksheet und nicht in einer Userform.
Mein bisheriger Code:

Sub Auswerten()
i = 1
j = 3
For m = 1 To 7
OptionAuswahl1 = i
OptionAuswahl1 = i + 1
OptionAuswahl1 = i + 2
If OLEObjects("OptionButton" & OptionAuswahl1).Value = True Then
Worksheets("Tabelle1").Cells(j, 1).Value = 1
ElseIf OLEObjects("OptionButton" & OptionAuswahl2).Value = True Then
Worksheets("Tabelle1").Cells(j, 1).Value = 2
ElseIf OLEObjects("OptionButton" & OptionAuswahl3).Value = True Then
Worksheets("Tabelle1").Cells(j, 1).Value = 3
Else
Worksheets("Tabelle1").Cells(j, 1).Value = 0
End If
i = i + 3
j = j + 1
Next m
End Sub
Ich habe schon verschiedene Sachen ausprobiert, leider immer mit dem gleichen Ergebnis:
"Laufzeitfehler 438 : Objekt unterstützt diese Eigenschaft oder Methode nicht"
Ich hänge mal die Test-Datei dazu an.
https://www.herber.de/bbs/user/149489.xlsm
Wäre cool wenn ihr mir da ne einfache Lösung dazu hättet:-)
Ich dachte eig ich bin ganz fit in VBA, aber es zeigt mir doch immer wieder meine Grenzen auf..
Vielen Dank und viele Grüße
Michael

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Optionbutton Index variabel gestalten
30.11.2021 17:48:35
Nepumuk
Hallo Michael,
deine Mappe war ein bisschen zerschossen. Ich habe sie dir neu aufgesetzt: https://www.herber.de/bbs/user/149490.xlsm
Gruß
Nepumuk
AW: Optionbutton Index variabel gestalten
30.11.2021 21:05:05
Michael
Hei Nepumuk,
das ging ja fix.
Danke dir.
Option explicit und die Variablendeklaration sind so Dinge die ich gerne vergesse;-)
Auf den Rest wäre ich aber nicht gekommen...
Vielen Dank nochmals.
Grüße
Michael
Anzeige

82 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige