Office: Combobox füllen

Servus beinander,
Ich fülle eine Combobox mit
Code:

Das Script in der Tabelle (nicht Userform) liest mir dann Werte ein, die in einer Spalte stehen:
...
19,25 kg
19,50 kg
19,75 kg
20,00 kg
20,25 kg
20,50 kg
20,75 kg
21,00 kg
21,25 kg
21,50 kg
21,75 kg
22,00 kg
22,25 kg
22,50 kg
22,75 kg
23,00 kg
23,25 kg
23,50 kg
23,75 kg
24,00 kg
24,25 kg
24,50 kg
24,75 kg
25,00 kg
25,25 kg
25,50 kg
25,75 kg
26,00 kg
26,25 kg
...
Die Liste geht in dem Viertel-Kilo-Stil von 9 bis 139.
Jetzt brauche ich aber nur die ganzzahligen Werte. Wie kriege ich das in mein Script-Schnipsel?

Danke und Grüße,
Zellner

:)

 

a) Erstelle eine Liste von 9 bis 138
b) Gib diesem Bereich einen Namen
c) Verwende den bereits gezeigten Code; nur mit neuem Namen eben

zu a)
i. Schreibe 9 in eine Zelle
ii. Start -> Bearbeiten-> Ausfüllen -> Datenreihe
Reihe: Reihe in Spalten
Typ: Linear
Inkrement: 1
Endwert: 139

zu b)
Markiere Start bis Endzelle
Klicke in Zelle mit der 9
STRG+SHIFT+NACH_UNTEN
Dann links oben wo die Zelladresse steht einen Namen eintragen un mit ok bestätigen

zu c)
Verwenden diesen Namen in dem gezeigten Code

 

Moin!
Oder etwas einfacher:
Code:

Gruß Ralf

 

Gruß Ralf

Guten Morgen, Du Fuchs...
Warum einfach wenns auch kompliziert geht?

 

Moin,

wo, zum Geier, findest Du sowas? Und wie kommst Du auf die eckigen Klammern?

 

= Evaluate()

 

Zum Beispiel bei snb:
https://www.snb-vba.eu/VBA_Fill_comb...istbox_en.html

Unter 4.10 habe ich es mittlerweile auch die Site geschafft. *tongue.gif*

Gruß Ralf

 

Gruß Ralf

Danke! Das tut es. Allerdings ist dann der Bezug zum dynamischen Bereich gekappt und Änderungen werden nicht übernommen. Aber vielleicht fällt ja jemanden noch etwas ein. Die Zelle mit dem Wert 139 heißt "max_load". Kann man das irgendwie in [Row(9:....)] mit einbinden?

Danke und Grüße,
Zellner

 

Ja!
Aber dann nur mit der Alternative Evaluate(), weil die einen String verarbeitet, der durchaus mit einer Variable verkettet werden darf.
Zusätzliches Stichwort: Ganzzahldivision mittels Operator Backslash \

Das tut es dann auch!

Nur am Rande:
Ich schreibe bewusst kryptisch, weil das ja nicht mehr viel mit der Threaderöffnung zu tun hat.

 

Heißen Dank! Ich such grad den Sterndlwerfer.

 

Bei uns im Ruhrpott heißt der Sterndlwerfer Wunderkerze ™ *wink.gif*

 

Danke für den Tip. Hab allerdings damit keinen Ansatz.
Ich mach dann mal zu.

 

Moin,

die hält man bei uns im Oooschdallgei aber andersrum, brennt sonst leicht Löcher in die Pelle ;-)

 

OMG, wie kann man nur einen Link dahin setzen :kopfschüttel:

Ich habe obige Syntax bei mir gleich mal mit RTE 381 abgeschossen.

Und jetzt die Frage warum? Ich kenne die Antwort!

Das ist nur ein Hinweis, dass man Evaluate mit Vorsicht anwenden sollte und wissen sollte, was man tut.

 

Deshalb ja der Link. Du hast es schließlich auch mal kennengelernt, nicht wahr *wink.gif*