Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
280to284
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
280to284
280to284
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ComboBox1.RowSource =

ComboBox1.RowSource =
21.07.2003 16:27:01
EL
Hallo uns guttenTag!
Frage?
Wie kann ich mit ComboBox listen C2:C200 in andere Arbeitsmappe?

Private Sub UserForm_Initialize()
ComboBox1.RowSource = ' C:\Temp\Test.xls.Tabelle1! "c2: c200"
End Sub

MGF
EL

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ComboBox1.RowSource =
21.07.2003 17:00:07
Nepumuk
Hallo EL,
RowSource geht nur in der Mappe in der die Userform ist. Ansonsten folgendes:

Option Explicit
Private Sub UserForm_Initialize()
Dim feld As Variant
GetObject "C:\Temp\Test.xls"
feld = Workbooks("Test.xls").Worksheets("Tabelle1").Range("C2:C200")
Workbooks("Test.xls").Close False
ComboBox1.List = feld
End Sub

Code eingefügt mit: Excel Code Jeanie
Gruß
Nepumuk

Anzeige
AW: ComboBox1.RowSource =
22.07.2003 10:02:19
EL
Hallo Nepumuk,
RowSource geht nur in der Mappe in der die Userform ist.
Das habe ich vermuttet weil ich alles peobiert, Vielen Dank!
Frage ?
In meine Tabelle1 sind nicht alle Zeilen besitzt sondern manche sind leer.
Kann ich nur die Besetzte Zeilen auslisten und dabei
ComboBox1.listIndex richtig funktioniert.
Ich habe folgendes noch:

Private Sub ComboBox1_AfterUpdate()
Dim PR As String
Dim TR As String
PR = Range("B3").Value
TR = Range("B4").Value
Workbooks("Produkt" & PR & ".xls").Sheets(TR).Rows(ComboBox1.ListIndex + 1).Copy _
Workbooks("ECSB.xls").Sheets("ecs").Rows(31)
Unload Me
Call ROHSTOFF
End Sub

MFG
EL

Anzeige
AW: ComboBox1.RowSource =
22.07.2003 10:26:02
Nepumuk
Hallo EL,
dann mach es so:

Option Explicit
Private Sub UserForm_Initialize()
Dim Zeile As Integer
GetObject "C:\Temp\Test.xls"
For Zeile = 2 To 200
If Trim(Workbooks("Test.xls").Worksheets("Tabelle1").Cells(Zeile, 2)) <> "" Then ComboBox1.AddItem Trim(Workbooks("Test.xls").Worksheets("Tabelle1").Cells(Zeile, 2))
Next
Workbooks("Test.xls").Close False
End Sub

Code eingefügt mit: Excel Code Jeanie
Gruß
Nepumuk

Anzeige
AW: ComboBox1.RowSource =
23.07.2003 08:19:39
EL
Hallo Nepumuk!
Ich habe das deaktiviert.
'Workbooks("Test.xls").Close False
Und habe Folgendes:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Sperren Then
Application.DisplayAlerts = False: Application.Quit
End If
End Sub

Bei Programm ende Bekomme ich error meldung:
Microsoft Visual Basic
Can't quit at this time
Ich vermutte das wenn Combobox1 listet und bei Application.Quit liegt der grund.
MFG
EL

AW: ComboBox1.RowSource =
23.07.2003 09:28:20
Nepumuk
Hallo EL,
das liegt daran, dass die Datei Test.xls nicht als Excelmappe sondern als Objekt geladen wurde.
Gruß
Nepumuk

Anzeige
AW: ComboBox1.RowSource =
23.07.2003 09:38:13
EL
Hallo Nepumuk!
Programm wird normall geschlossen, nun nun am Bildschirm bleibt diese Meldung .
Mann muß OK klicken mehr nicht.
Gibt da für ein Lössung?
Es ist nicht so Tragisch !
MFG
EL

AW: ComboBox1.RowSource =
23.07.2003 09:58:53
Nepumuk
Hallo EL,
kann ich nicht sagen, da ich den Rest des Programms nicht kenne.
Gruß
Nepumuk

Danke!
22.07.2003 15:25:49
El
Danke!
EL

42 Forumthreads zu ähnlichen Themen

RowSource über 2 Tabellen -VBA
Wolfgang

Hallo,
mit cbbKriterium1.RowSource = "Grunddaten!a3:a6000" "bediene" ich in einem UF insgesamt 15 Comboboxes. Gibt es die Möglichkeit, nachdem ich einen weiteren Code für "Altdaten" habe, RowSource so umzustellen, dass sowohl "Grunddaten", als auch "Altdaten" zusammen abgefragt werden könne...
09.11.2008 13:49:00
Thread-ID: 1023061
9 Beiträge
Anzeige
Hilfe! - Combobox, Scollbar + 2 RowSource-Bereiche
k

Hi,
komme seit Tagen hier nicht richtig weiter - BRAUCHE HILFE !!!
Habe wie in der Musterdatei eine Userform mit einer Combobox, Feldern sowie einer Scrollbar.
Die Daten sollen wenn in Tabelle 1 nicht zu finden in Tabelle 2 nachgeschlagen werden...
Musterdatei zum anschauen und...
29.07.2009 02:51:48
Thread-ID: 1092026
2 Beiträge
ComboBox RowSource + manueller Eintrag
chrissey

Hallo Leut,
brächte Eure Hilfe bitte. Lade den Inhalt einer ComboBox über
M.ComboBox2.RowSource = "Test!A2:A" & LE
Das passt alles so weit, jetz würde ich jedoch gerne einen manuellen Wert
miteinfügen: "Zusatzeintrag"
Ist das möglich?
Danke Euch schon mal und Grüße
07.07.2010 11:40:34
Thread-ID: 1165911
4 Beiträge
Anzeige
VBA Find Value and Delete Row
Marc

Hi VBA team,
I have following problem.
I field B3 I have a text/value and this text/value should be searched in column A. When it finds the text/value ( for example A10 ) it should delete the Row.
For any help thanks in advance!
Marc
30.06.2011 04:11:51
Thread-ID: 1220246
5 Beiträge
ComboBox und RowSource
Marco

Hallo Excel-User,
habe momentan ein kleines Problem, und hoffe Ihr könnt mir helfen.
Ich möchte, wenn in cboKategorie ( ComboBox1 ) ein Wert ausgewählt ist,die dazu gehörigen Unterkategorien in cboUnterkategorie (ComboBox2)anzeigen und auswählen können.
Das Formular dazu wird auf de...
21.04.2013 00:09:53
Thread-ID: 1309667
8 Beiträge
Rowsource einer Combobox
Jürgen

Guten Morgen,
ich bin gerade dabei für eine Organisation ein Dienstplan-Programm mit Excel2007 zu erstellen. Dabei spielt eine Combobox in einem Userform eine Rolle, über die die einzelnen Dienste der Mitarbeiter aufgerufen werden können. Die RowSource ist ein Range, der so ausssieht:
"...
23.07.2014 09:57:22
Thread-ID: 1371741
4 Beiträge
VBA: getopenfilename in pt-sourcedata einfügen
Peter

Hallo.
Ich möchte per Makro für ein pt mittels Öffnen-Methode eine andere Excel-Datei (mit Bereich "data") als Datenquelle zuordnen. Mit dem ua VBA-Code sind die Datentypen nicht verträglich.
Bitte und Danke. lg. Sub OPEN_PROGNOSE() Dim Fname As Variant Dim srcdata As String ' Change dr...
06.10.2015 18:39:19
Thread-ID: 1451092
2 Beiträge
ComboBox RowSource-Referenz mit Name
Mike

Hallo,
ich habe eine UserForm mit einer ComboBox (CmbCountries).
Bisher habe ich bei RowSource in den Properties folgendes stehen: Settings!A2:A30.
Wie kann ich hier statt auf einen fixen Zellbereich auf eine per Namen definierte Liste verweisen (der Name der Liste ist "Countries...
14.11.2015 11:10:08
Thread-ID: 1458286
12 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
8
8
1
3
2
4
7
3
1
11
2
3
2
4
2
7
2
8
4
9
3
2
2
1
1