OptionButton will nicht...bitte um Hilfe

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo
Du hast überall diese Anweisungen in das Activate Ereignis gebaut
Worksheets(3).OptionButton1.Caption = Worksheets(8).Range("B3").Value
Worksheets(3).OptionButton2.Caption = Worksheets(8).Range("B4").Value
Worksheets(3).OptionButton3.Caption = Worksheets(8).Range("B5").Value
Worksheets(3).OptionButton4.Caption = Worksheets(8).Range("B6").Value
Worksheets(3).OptionButton5.Caption = Worksheets(8).Range("C3").Value
Damit werden völlig falsche Sheets befüllt.
Probier mal

Option Explicit

Sub demo()
    Dim i As Long
    Dim tmpStr As String
    For i = 1 To Worksheets.Count
        tmpStr = tmpStr & "Worksheets(" & i & ") hat den Namen & " & Worksheets(i).Name & vbCrLf
    Next i
    MsgBox tmpStr
End Sub

Ändere die Bezeichnung
Worksheets(3) in Worksheets("Kandidat5") usw. und das in allen Modulen.
Nur dann ist sichergestellt, dass auch das richtige Sheet befüllt wird.
Worksheets(3) bezeichnet das 3. Worksheet in der aktuellen Darstellung
Gruss Rainer

HI
ich weiß nicht, aber ich würde sowas nicht mit Steuerlementen aufbauen, sondern mit Formularfeldern und mit Formeln.
wenn du es unbedingt über Steuerlelemente regeln willst, dann sollteset du die Blätter absolut identisch aufbauen, so das du die Codes einfach von einem Blatt ins andere kopieren kannst.
dazu ist es hilfreich zu wissen, daß du, wenn der Code im Modul eines Tabellenblatts steht und du dieses Tabellenblatt referenzieren willst, du einfach ME. schreiben kannst und nicht das Tabellenblatt irgenwie benennen musst. (z.B. Me.OptionButton1.Value = True, Me.Cells(1,1).Value = Tabellenblatt(8).Cells(1,1).Value.
das Vereinfacht das Erstellen des Codes und ermöglicht es dir, den Code von einem Blatt ins andere zu kopieren (falls die Blätter und die Steuerelemente identisch aufgebaut sind)
desweitern ist es gefährlich, die Index-Nummern zu für die Blattreferenzierung zu verwenden, denn die bezieht sich einzig auf die Reihenfolge der Blätter, diese kann aber per Drag'n'Drop verändert werden.
Außerdem bekommst du dann nicht mal eine Fehlermeldung, wenn jemand die Blätter verschiebt.
Es ist zwar etwas aufwendiger, aber in diesem Fall wäre eine Referenzierung über den Blattnamen sicherer und im Code wäre schon erkennbar, welches Blatt gemeint ist.
zusätzlich würde ich jeden OptionButton mit einer LinkedCell versehen. Dann sind Einstellungen automatisch gesperichert und müssen nicht aufwenig per Makro bei Aktivierung des Blattes wieder hergestellt werden.
hier dürften auch die Fehler in deinem Makro stecken.
aber um es einzeln durchzutesteten, ist es zuviel (zumindest, wenn man nicht für die Arbeitszeit dafür bezahlt wird).
Gruß, Daniel

Beliebteste Forumthreads (12 Monate)

OptionButton will nicht...bitte um Hilfe

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

OptionButton will nicht...bitte um Hilfe

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

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread