ComboBox.List mit Daten aus Tabellenblatt veryHidden

[Primo Centurio]

Hallo zusammen,

ist es möglich, eine ComboBox in einem Userform mit Daten (Dropdown) aus einem ausgeblendetem Tabellenblatt (VeryHidden) zu füllen, ohne das Tabellenblatt einblenden und aktivieren/auswählen zu müssen.

Als Ansatz habe ich folgenden Code:

Code:

Private Sub CheckBox1_Click()

Dim rngFunktion As Range
Dim letzteZeile As Integer

With Worksheets("Verantwortliche")
letzteZeile = .Range("A:A").End(xlDown).Row
Set rngFunktion = Worksheets("Verantwortliche").Range(Cells(2, 1), Cells(letzteZeile, 1))
End With

If CheckBox1.Value = True Then
With ComboBox8
    .Locked = False
    .List = rngFunktion.Value
End With
Else
With ComboBox8
    .Locked = True
    .Value = ""
End With
End If
End Sub

Momentan funktioniert dies nur wenn das Tabellenblatt, aus dem die erforderlichen Daten kommen ausgewählt ist.
Im oberen Code wird die List Funktion erst aktiv, wenn die CheckBox ausgewählt wird.

Herzlichen Dank und viele Grüße

Primo

[EarlFred]

Hatten wir doch gerade erst:
https://www.clever-excel-forum.de/Thread...definieren


Analog umsetzen:

Code:

With Worksheets("Stammdaten")
   Set rnglist = .Range(.Cells(1, 1), .Cells(3, 3))
End With

Beschreibe zukünftig bitte genau, was nicht funktioniert. Dazu gehört mindestens die Angabe der Fehlerzeile, -nummer und -meldung.

[snb]

Einszeiler reicht:

Code:

combobox1.List= sheets("Verantwortliche").cells(1).currentregion.offset(1).columns(1).specialcells(2).value

[Primo Centurio]

Danke euch und entschuldigt den doppelten Thread, ich hatte dies echt nicht mehr auf den Schirm.

Werde ab jetzt immer eine Fehlermeldung hinzufügen.

VG Primo