ComboBox greift aufs Falsche Sheet zu

Forumthread: ComboBox greift aufs Falsche Sheet zu
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: ComboBox greift aufs Falsche Sheet zu

31.05.2007 19:38:53

Raphael

Hallo Excelianer
Ich hoffe ihr könnt mir mit einem Problem weiterhelfen.
Ich habe in einer UF eine Combobox diese Greift aber immer auf das sheet zu, in dem ich bin, wie bekomme ich es hin, das diese Combobox immer auf ein bestimtes Sheet zugreift?
Hier mal meine Version:
Private Sub UserForm_Initialize()
UserForm1.ComboBox2.RowSource = _
Sheets("Sheet1").Range("A1:A" & _
ActiveSheet.Rows.Count).Address
Aber wenn ich auf sheet2 bin, findet er keine Einträge!
Ich hoffe ihr könnt mir weiter helfen!
Danke
MFG
Raphael

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: ComboBox greift aufs Falsche Sheet zu

31.05.2007 19:50:28

Felix
DANKE

31.05.2007 20:10:49

Raphael

AW: ComboBox greift aufs Falsche Sheet zu

31.05.2007 19:50:28

Felix

Hallo,
drück mal im VBA-Editor Strg+G, um die Direkteingabe zu öffnen und gebe dort
? Sheets("Sheet1").Range("A1:A" & ActiveSheet.Rows.Count).Address
ein. Du siehst, dass .adress keine Infos über das Sheet ausgibt.
So dürfte es gehen:
UserForm1.ComboBox2.RowSource = _
Sheets("Sheet1").name & "!" & _
Sheets("Sheet1").Range("A1:A" & _
ActiveSheet.Rows.Count).Address
Dein ActiveSheet.Rows.Count solltest du noch wie folgt ändern:
UserForm1.ComboBox2.RowSource = _
Sheets("Sheet1").name & "!" & _
Sheets("Sheet1").Range("A1:A" & _
Sheets("Sheet1").Range("A1").currentregion.Rows.Count).Address
Gruß,
Felix

DANKE

31.05.2007 20:10:49

Raphael

Danke so geht es!
MFG
Raphael