Ich dachte immer, Blattname und Codename könnte gegeneinander ausgetauscht werden. Diese Zeile hier läuft problemlos: Tabelle104.Name = Tabelle31.Range("FGWahl").Value & "x"
Hier habe ich nach dem gleichen Muster den Ausdruck Worksheets("Speicher") durch den entspr. Codenamen Tabelle106 ersetzt, und prompt gieps Mecker:
uf_Ueb_Anzeige.Show
For i = 0 To 7
uf_Ueb_Anzeige.Controls("chbx_UebUf_" & i).Value = Tabelle106.Range("speich_chbx_UebUf_" & i).Value
Next i
For i = 11 To 23
uf_Ueb_Anzeige.Controls("chbx_UebUf_" & i).Value = Worksheets("Speicher").Range("speich_chbx_UebUf_" & i).Value
Next i
Warum ist das so, und was muß ich anders schreiben?
Grüße - Jörg