Office: Dropdown erstellen und füllen

Hallo liebe Community,

bin relativ neu im VBA Geschäft. Ich muss für meine Weiterbildung ein Programm schreiben bei dem in einer Zelle eine Dropdown Liste erscheint und die Daten nicht aus einer Tabelle aus Exel gefüttert werden soll, sondern man die im Programm eingibt.

Kann mir da jemand weiterhelfen?

Beispiel für die ersten 3 Punkte der Liste sind
C8/10
C12/15
C16/20

Von diesen Dropdown Listen soll es dann ca 5 Stück geben aus denen dann die Werte entnommen werden sollen und mit denen dann weitergerechnet werden soll.

Oder ist es eventuell sogar einfacher die Daten auf ein anderes Tabellenblatt zu packen und sie dann von dort einfach einzulesen?

VG*Smilie

:)

 

"C8/10" ist Text damit kann nicht gerechnet werden. Oder mit welcher Zahl soll gerechnet werden.






Meine Homepage Homeseite - Hajo's Excelseiten

 

Mit "C8/10" ist Text gemeint.
Das sollten dann die Optionen im Dropdown Menü sein

Gedacht war das im Dropdown zb. "C8/10" ausgewählt werden soll und dann im Programm für diesen Text zb ein Wert von 8 hinterlegt ist.
Dies soll bei allen Dropdownlisten passieren und am Ende soll aus den verschiedenen hinterlegten Werten eine Rechnung ausgeführt werden.

VG

 

Hi,
kannst Du das mal ein einer kleinen Beispielmappe verdeutlichen, was wo passieren soll? So recht kann ich mir da noch keine Reim drauf machen.

 

Hier einmal ein kleines beispiel wie es aussehen könnte

Da die die Daten sind hier in Tafel 1-3 zu sehen
Dieses sollen dann per Hand in VBA eingefügt werden oder auf einem Zweiten Tabellenblatt angelegt werden

https://www.beton.org/fileadmin/beto...A4tter/B20.pdf

 

also spontan würde ich sagen:
Zweites Tabellenblatt (kann man später ausblenden), Deine Tafeln dahin übertragen, dann Dropdowns über "Datenüberprüfung" basierend auf der ersten Spalte der jeweiligen Tafel aufbauen und in den Berechnungen mit Sverweis den korrekten Wert aus dem Hilfstabellenblatt ziehen.
Ich würde keine festen Werte im VBA-Code verankern, das erschwert später massiv die Pflege, falls sich mal was ändert.

Ansonsten kann man natürlich die Werte auch in der Datenüberprüfung manuell eingeben, dann den Zellwert des Dropdowns in VBA auslesen und dann in VBA mit den zugehörigen Werten rechnen, aber warun der Aufwand?

 

Das Problem ist das ich nichts außerhalb von VBA machen darf. VBA ist aktuell unser "Schulfach"
Deshalb muss vieles darin passieren (auslese, dropdown, berechnung und Co)
Ich darf deshalb zb den Dropdown nicht in Exel erstellen.
Heißt ich muss den Dropdown in VBA programmieren und dann die Auslese aus einem anderen Tabellenblatt vollziehen.

Ich hatte jetzt einmal ein Dropdown mit dem Makrorecorder erstellt.

Sub neuertest()
'
' neuertest Makro
'

'
Range("A3").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=$B$6:$B$8"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
End Sub

Gibt es eventuell dafür eine einfachere Variante? Konnte bisher keine passenden Beispiele finden. und wenn nicht was müsste ich aus der Formel ändern um die auslesung von einem anderen tabellenblatt zu vollziehen.

VG

 

ok, es geht also nicht darum, etwas mit wenige Aufwand sinnvoll aufzubauen, sondern um eine gestellte Aufgabe. Da liegt dann einiges an Arbeit vor Dir. Der Makrorekorder ist dabei ein guter Ansatz, zeichnet aber oft zu viel auf und benutzt Selections. So würde der abgespeckte Code aussehen, wenn das Dropdown in Zelle "A1" auf dem aktuellen Tabellenblatt entstehen soll und die Liste auf Tabelle2 in den Zellen A1 bis A3 steht.

Code:

Alternativ, wenn die Liste nicht auf einem Tabellenblatt stehen soll, kann das Dropdown auch so aufgebaut werden:

Formula1:="A;B;C"

Wenn Du die gesamte Aufgabenstellung in VBA lösen willst, wirst Du aber nicht darum herum kommen, Dich in VBA einzuarbeiten. Der Makrorekorder kann dabei nur ein Einstieg sein.

 

Also ich habe jetzt ebend mal alle Dropdowns eingearbeitet.
Allerdings funktionieren sie nur nach dem Knopfdrücken.
Dh wenn sich was auf dem Tabellenblatt ändert muss erst das Makro neu ausgeführt werden damit die richtigen Zahlen erscheinen.

Gibt es eine Möglichkeit das sich das Blatt immer selbst aktualisiert?

VG und einen schönen Abend *Smilie

 

Hi,
dann forsch doch mal nach dem Worksheet_Change-Ereignis.