Excel Userform-Combobox-Eigenschaften-Datensatzherkunft-box Probleme?
Ich habe eine userform in Excel, das funktioniert wie ein Taschenrechner.
In dieser userform habe ich zwei ComboBoxs (1 & 2)
Im VBA-editor, mit ComboBox1 ausgewählt, In Eigenschaften unter Rowsourse habe ich: Tabelle1!a4:a5
In Tabelle1 A4 = Auckland und A5 = Christchurch
Dies ist in Ordnung und wenn ich das userform befindet sich eine drop-down-Pfeil mit den beiden Optionen (Auckland oder Christchurch).
Aber mein problem ist, dass beim öffnen dieser Arbeitsmappe habe ich ein VBA-Befehl, es zu verbergen, aus der Benutzer-Sicht, so dass Sie nur die userform, um die Arbeit mit denen ist, was gewünscht ist.
Das Problem ist, dass wenn man eine andere Arbeitsmappe öffnen öffnen Sie dann diese Rechner Arbeitsmappe, die automatisch ausgeblendet wird). Dann die combobox-Liste ist bevölkert von Tabelle1!a4:a5 auf der anderen Arbeitsmappe bereits geöffnet war, nicht die Arbeitsmappe, die enthält tatsächlich "Auckland" & "Christchurch", aus dem die userform aus.
Habe ich versucht, die Rowsource für die comboboxes spezifischer, indem Sie die folgenden in das Feld Datensatzherkunft in den Eigenschaften: [Mappe1.xlsm]Tabelle1!a4:a5 dieser kommt aber mit einem "Invalid Property Value" Fehlermeldung.
Habe ich auch versucht zu machen a:
Private Sub Userform1_Initialize()
ComboBox1.Additem "Auckland"
ComboBox1.Additem "Christchurch"
End Sub
Und auch so probiert:
Private Sub Userform1_Initialize()
ComboBox1.RowSource = Workbooks("book1.xlsm").Sheets("Sheet1").Range("a4:a5").Value
End Sub
Jedoch mit beiden codes, wenn es öffnet und läuft jetzt die comboboxes sind leer und es gibt keine Liste.
Ich denke, die einfachste Lösung wäre, irgendwie setzen Sie den vollständigen Pfad (einschließlich der Namen der Arbeitsmappe) in der Datensatzherkunft-Feld unter Eigenschaften. Aber ich muss fehlt etwas wie sein coming up mit, dass der Fehler bei mir?
Alle Hilfe würde sehr geschätzt werden.
Dank
InformationsquelleAutor Stildawn | 2013-06-18
Du musst angemeldet sein, um einen Kommentar abzugeben.
Legen Sie die Datensatzherkunft-Eigenschaft des combobox:
SheetName!$Col$Row:$Col$Row
, z.B.:Location!$A$1:$A$3
.InformationsquelleAutor user2641468
Ihnen fehlt
'
in Ihrem vollständigen Pfad Zeile source.Es sollte wie folgt sein:
Habe ich ähnliche Frage gefunden werden kann HIER.
InformationsquelleAutor L42
Können Sie versuchen Sie, diesen code auf der userform:
Private Sub UserForm_Initialize()
ComboBox1.list = Array("Auckland","Christchurch")
End Sub
Dann setzen Combobox die Eigenschaft "MatchEntry" auf "1".
InformationsquelleAutor Asthon John