|
Hi,
Ist in Excel recht einfach mit Formeln zu lösen:
Qualität;W6;;
Länge;50;;
+ Breite;50;;
;;;
= Größe;=B2+B3;;
> Grundpreis;"=SVERWEIS($B$5;$A$12:$B$59;2;WAHR)";;
* Qualitätmultiplikator;"=SVERWEIS(B1;C12:D35;2;FALSCH)";;
= Endpreis;=B6*B7;;
"=WENN(B5>190;""Chassis verstrebt ""&B2&"" x ""&B3;""Chassis ""&B2&"" x ""&B3) & "" cm""";;;
Größe;Preis;Qualität;Multiplikator
65;17,5;W0;1
70;18,5;W1;1,1
75;19,5;W2;1,2
80;20,5;W3;1,3
85;21,5;W4;1,4
90;22,5;W5;1,5
95;23,5;W6;1,6
100;25;W7;1,7
105;27,5;W8;1,8
110;30;W9;1,9
115;34;W10;2
120;38;W11;2,1
125;42;W12;2,2
130;46;W13;2,3
135;48;W14;2,4
140;50;W15;2,5
145;52;W16;2,6
150;55;W17;2,7
155;57,5;W18;2,8
160;60;W19;2,9
165;65;W20;3
170;70;W21;3,1
175;73;W22;3,2
180;76;W23;3,3
185;78;;
190;80;;
195;83;;
200;86;;
205;89;;
210;92;;
215;95;;
220;98;;
225;101;;
230;104;;
235;107;;
240;110;;
245;114;;
250;118
255;122
260;128
265;131
270;132
275;140
280;145
285;150
290;155
295;160
300;165
Sollte in etwas das Gleiche machen, wie dein Makro. Auch wenn sich mir nicht unbedingt erschließt warum der Preis aus "Länge + Breite" und nicht "Länge * Breite" (also Preis pro Fläche) errechnet wird.
(Du kannst die Daten in eine Textdatei packen und als .CSV mit Excel öffnen und bearbeiten ...)
Gruß
Till
|