VBA Kombobox nach Auswahl Zeilen ausfüllen?

... komplette Frage anzeigen

2 Antworten

Was sehr verwirrend ist, ist dass in deinem Quelltext zweimal "End Sub" hintereinander steht.

Das sollte er eigentlich anmeckern.

Antwort bewerten Vielen Dank für Deine Bewertung
Kommentar von MPCKhome
25.01.2016, 12:03

upps,

gar nicht aufgefallen.
habe viel rumprobiert

1
Kommentar von Suboptimierer
25.01.2016, 12:45

Ich sehe gerade, dass du bei den Arbeitsgängen Zellverbunde hast. Bei Zellverbunden wird aber immer nur der Inhalt der linken oberen Zellen gespeichert und angezeigt.

Dein erster With-Block ergibt auch wenig Sinn aus meiner Sicht. Der Range bezieht sich auf das Arbeitsblatt, rechts vom Gleichheitszeichen steht eine Konstante.

1

Um auf die Auswahl zu reagieren, musst Du diese in der Combobox auch abfragen:

also bspw.

if UserForm1.ComboBox1.Value="Arbeitsgang 1" then
Range("A3").value="Arbeitsgang 1"
Range("A4").value="Maschine 1"
end if

Antwort bewerten Vielen Dank für Deine Bewertung

Was möchtest Du wissen?