Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1724to1728
1724to1728
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA, Mehrere ComboBoxen mit gleichem Inhalt

Forumthread: VBA, Mehrere ComboBoxen mit gleichem Inhalt

VBA, Mehrere ComboBoxen mit gleichem Inhalt
01.12.2019 08:59:25
Wolfgang
Hallo,
in meiner Userform habe ich mehrere (nicht alle!) ComboBoxen mit gleichem Inhalt. Nun wäre es sicher am einfachsten, immer nur copy and paste und die Bezeichnung anpassen. Aber dies würde ja den Code doch etwas aufblähen und ist bestimmt nicht nötig. Gibt es Alternativen, wenn z. B. Combobox 1, 3, 7, identisch sind?
VG Wolfgang
Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA, Mehrere ComboBoxen mit gleichem Inhalt
01.12.2019 09:11:14
EtoPHG
Hallo Wolfgang,
Ich verstehe dein Problem nicht.
Es fragt sich wieso können diese z.B. 3 Comboboxen den gleichen Inhalt haben?
Wozu dient der Inhalt der Comboboxen?
Was wird wie weiterverarbeitet?
Ohne Kentnisse des Kontexts kann man auf deine Frage nur mit vielleicht antworten!
Gruess Hansueli
Anzeige
AW: VBA, Mehrere ComboBoxen mit gleichem Inhalt
01.12.2019 11:53:28
Wolfgang
Hallo Hansueli,
in den verschiedenen ComboBoxen soll der Anwender jeweils Monat und Jahr auswählen können. Dabei wird er nicht zwingend die gleichen Monate/Jahre auswählen. Es ist aber auch vorgesehen, dass die Felder frei bleiben können. Die Auswahl (Monat/Jahr) soll - wenn denn etwas ausgewählt wird - in ein Worddokument ausgegeben werden; Berechnungen etc. mit den Eingaben sind nicht vorgesehen.
VG Wolfgang
Anzeige
AW: VBA, Mehrere ComboBoxen mit gleichem Inhalt
01.12.2019 12:29:06
onur
Pack den Inhalt in ein Array und übergebe sie mit List: 
ComboBox1.List = arr
ComboBox2.List = arr
ComboBox3.List = arr

AW: VBA, Mehrere ComboBoxen mit gleichem Inhalt
01.12.2019 13:12:23
snb
z.B.
Private Sub Userform_Initialize()
combobox1.list=[transpose(today()+row(1:365))]
for j = 3  to 7 step 4
Me("combobox" & j).list = combobox1.list
next
End Sub

Anzeige
AW: VBA, Mehrere ComboBoxen mit gleichem Inhalt
01.12.2019 19:38:33
Wolfgang
Hallo zusammen,
vielen Dank für eure Mühen. Leider fehlen mir die Kenntnisse, eure Vorschläge umzusetzen. Wie packe ich etwas in ein Array?
Was soll eigentlich drin stehen: jeweils die Monatsnamen von Januar bis Dezember (Box 1, 3, 7 und vielleicht noch ein paar mehr), Box 2, 4, 8 und ggf. mehr, sollen dann mit Jahreszahlen (2018 bis 2030) gefüllt werden.
VG Wolfgang
Anzeige
AW: VBA, Mehrere ComboBoxen mit gleichem Inhalt
01.12.2019 19:40:21
onur
Wie füllst du denn sonst die Comboboxen ?
AW: VBA, Mehrere ComboBoxen mit gleichem Inhalt
02.12.2019 05:45:13
Wolfgang
Hallo onur,
bislang so: 
With cbo_1
.AddItem "123"
.AddItem "456"
.ListStyle = fmListStyleOption
.MultiSelect = fmMultiSelectMulti
End With
VG Wolfgang
AW: VBA, Mehrere ComboBoxen mit gleichem Inhalt
05.12.2019 06:26:16
Wolfgang
Hallo zusammen,
es ist ja nicht so, dass ich keine Lösung für mein Problem hätte. Ich dachte mir einfach nur, es muss auch anders gehen als copy & paste.
VG Marcus
Anzeige
AW: VBA, Mehrere ComboBoxen mit gleichem Inhalt
05.12.2019 18:24:40
Oberschlumpf
Hi Wolfgang,
ich habs nicht getestet, ich frag einfach mal:
Wie ist es bei einer ComboBox möglich, mehr als nur eine Auswahl zu treffen?
Oder meinst du die ganze Zeit Listboxen?...bei denen Mehrfachauswahl durchaus möglich ist
Ciao
Thorsten
AW: VBA, Mehrere ComboBoxen mit gleichem Inhalt
05.12.2019 18:35:28
Oberschlumpf
Hi Wolfgang,
anhand deiner Vorgaben ist auch das hier eine Möglichkeit: 

Private Sub UserForm_Initialize()
Dim liVal As Integer
'füllt die ComboBoxen1,3+7 mit allen Monatsnamen
For liVal = 1 To 12
ComboBox1.AddItem Format("01." & liVal & "." & Year(Date), "MMMM")
ComboBox3.AddItem Format("01." & liVal & "." & Year(Date), "MMMM")
ComboBox7.AddItem Format("01." & liVal & "." & Year(Date), "MMMM")
Next
'füllt die ComboBoxen2,4+8 mit den Zahlen 2018 bis 2030
For liVal = 2018 To 2030
ComboBox2.AddItem liVal
ComboBox4.AddItem liVal
ComboBox8.AddItem liVal
Next
End Sub
Anstelle von ComboBox1 usw musst du den richtigen Namen der entsprechenden ComboBox eintragen.
Hilfts?
Ciao
Thorsten
Anzeige
AW: VBA, Mehrere ComboBoxen mit gleichem Inhalt
07.12.2019 07:12:23
Wolfgang
Hallo Thorsten,
es hilft ungemein. Viel kürzer als x-mal meine bisherigen Einträge zu wiederholen. Ich verstehe den Code zwar nicht (vielleicht kommt das mal noch), aber er funktioniert.
VG Wolfgang
;

Forumthreads zu verwandten Themen

ComboBox1.AddItem automatisch
Vera

Hallo liebe Excelfreunde
ich möchte die ComboBox einer Userform mit den letzten 20 unterschiedlichen Bemerkungen füllen.
Vieleicht hat jemand ein Beispiel rumliegen welches:
- die Bemerkungsspalte von unten nach oben durchgeht
- 20 unterschiedlich!! Bemerkungen findet
- die...
12.09.2008 09:28:00
Thread-ID: 1009278
3 Beiträge
VBA-Werte aus Spalte in ComboBox
andreas

Hallo zusammen,
habe ein Formular da möchte ich die Daten nach den Werten in Spalte D Filtern. Dazu sollen die Daten ab Zeile 11 alphabetisch geordnet und jeder Eintrag nur einmal angezeigt in die Combobox eingelesen werden. Der ausgesuchte Wert wird dann als Criterium für die Filterfunktio...
25.09.2008 08:47:11
Thread-ID: 1012218
7 Beiträge
Anzeige
VBA, ComboBox, Listbox, Drucken
Angela


Ich habe eine Listbox in der mehrere Einträge ausgewählt werden können.
Solbald der Anwender einen Eintrag auswählt, sollte eine Prozedur ausgeführt werden.
Zum einen wird automatisch über sverweis ein paar Zellen gefüllt, zum anderen sollte gleich ein DinA 4 Seite gedruckt werden....
28.11.2008 18:08:00
Thread-ID: 1028760
13 Beiträge
Combobox - additem oder so ?
k

Hallo,
habe ein Combobox in einer Userform, die dem User helfen soll "Standard-Einträge" zu verwenden.
Der Bereich der Daten enthält aber ca. 1500 Datensätze mit ca. 800 Einträgen und viele sind doppelt, bzw. enthalten eben keinen Eintrag.
Wie kann ich nun die Combobox so füllen, d...
11.08.2009 12:15:53
Thread-ID: 1094970
11 Beiträge
ComboBox verliert AddItem nach Speichern
Björn

Hallo,
nun brauch ich auch mal Eure Hilfe.
Ich habe ein Berechnungsprogramm mit mehreren ComboBoxes.
Eine ComboBox wird in Abhängigkeit von der Auswahl in der ersten mit möglichen Einträgen über AddItem befüllt.
Beispiel:
In ComboBox1 ist als ListFillRange ein Bereich markie...
14.10.2009 10:27:17
Thread-ID: 1109519
9 Beiträge
AddItem bei ComboBox/Sortieren
Nick

Hallo,
ich versuche gerade folgendes zu realisieren:
Ichhabe eine TextBox1 in die ich Zahlen eingeben kann, welche in der ComboBox als Zehnfaches ausgegeben werden (siehe VBA-Code). Um jetzt aber Zahlen kleiner als Zehnerschritte in die ComboBox1 mit aufzunehmen habe ich mittels Doubl...
26.11.2009 05:56:48
Thread-ID: 1120137
9 Beiträge
VBA: Combobox behält Wert nicht
GTFuchs

Hallo,
ich versuche mit dem folgenden Code eine Combobox mit Werten zu füllen. Sie soll
1. beim Aufklappen sich eine Liste von Werten per SQL Abfrage holen
2. der User wählt einen Wert aus
3. die Zielzelle wird festgelegt
4. dort steht dann der ausgewählte Wert
1. bis 3...
16.09.2010 21:28:15
Thread-ID: 1178202
6 Beiträge
ComboBox3.AddItem
Heinz

Hallo Leute
Ich habe 18 Comboboxen 3-20
Üverall sollte der selbe Wert wie unten erscheinen. Gibt es eine Möglichkeit diese ComboBoxen vereinfacht zu füllen?
Gruß
Heinz
ComboBox3.AddItem "311" ComboBox3.AddItem "312" ComboBox3.AddItem "321" ComboBox3.AddItem "321" Combo...
16.10.2010 16:11:46
Thread-ID: 1182753
5 Beiträge
Anzeige
VBA-Code / Combobox
Thomas

Hallo zusammen,
ich benötige Hilfe beim Filtern mit zwei Comboxen.
In der Spalte A stehen Kategorien (fibu, klr usw).
In den Spalte J bis AE stehen Jahre (ss2006, ss2007, ss2008 usw.
Mit der Combobox1 soll die Spalte A gefiltert werden, dass heißt es sollen alle anderen Zeilen a...
02.02.2012 11:22:09
Thread-ID: 1248780
5 Beiträge
VBA: Alle Comboboxen einer Userform
PeTeR

Hallo VBA-Freaks,
ich möchte gerne in einer For-each-Schleife alle Comboboxen einer Userform abarbeiten. Im Prinzip:
For each c in userform.comboboxen
c.visible=true
next c
Wie lautet die Schleife korrekt?
Vielen Dank für euer Hilfe
PeTeR
13.05.2013 17:08:28
Thread-ID: 1312776
4 Beiträge
if - Funktion in VBA bei ComboBox
Josch

Hallo zusammen,
bin Neuling in VBA und komme nicht weiter
in UserForm 1 habe ich eine Combobox mit 5 verschiedenen Auswahlmöglichkeiten. In Abhängigkeit der ausgewählten Möglichkeit in der Combobox, soll sich dann entweder UserForm2 oder UserForm3 öffnen.
If Combobox = "Moeglichkei...
15.05.2013 12:28:45
Thread-ID: 1313158
2 Beiträge
VBA leere Combobox = Fehler
flacus

Hallo,
ich habe ein Problem mit meiner Userform bzw. die darin vorkommenden Kombinationsfelder. Ich möchte, dass alle Kombinationsfelder (Combobox) beim Aufruf leer ausgewählt sind. Die Kombinationsfelder werden für die Eingabe eines Datums genutzt. Das Problem bei der ganzen Sache ist, das...
08.11.2013 12:16:43
Thread-ID: 1337715
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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