[收集互助]在office7中,在求解中我翻开了宏,在vb中代码下,老是语法错误
若某公司有 M 个消费地点 A 1 ,A 2 ,A 3 ,A 4 , … , A m , 有 n 个销售市场 B 1 , B 2 , B 3 , B 4 , … , B n 。
A i 地的消费量为 a i ,B j 市场的销量为 b j 。由 A i 送向 B j 的货物记为 X ij , 运费记为 C ij , 在产量等于销量的情状下若何调配才气使运费更低 ?
现成立模子如下 :
当 Σa i =Σb j 时 ,最小运费 S=ΣΣC ij X ij
约束前提 :
每个厂发出量 = 消费量 ;
每个销售地承受量等于 = 需求量 ;
每个厂发出量大于等于零。
假设有一个石油企业2个炼油厂消费情状如下 :
炼油厂 A 1 A 2
月产量 ( 万公升 ) 35 25
那炼油厂有3个销地需求情状如下 :
销地 B 1 B 2 B 3
月需求 ( 万公升 ) 30 20 10
第 i 个消费地运向销售地 j 的运费 C ij (千元)如下 :
运费 B 1 B 2 B 3
A 1 10 15 18
A 2 12 16 15
在 EXCEL 输进数据如下:
此中单位格 B13 是总运费 =sumproduct(B7:D8,B10:D11);
B12=SUM ( B10 : B11 )表达销地 B 1 接到的货物;
C12=SUM ( C10 : C11 )表达销地 B 2 接到的货物;
D12=SUM ( D10 : D11 )表达销地 B 3 接到的货物;
E10=SUM ( B10 : D10 )表达产地 A 1 发出的货物;
E11=SUM ( B11 : D11 )表达产地 A 2 发出的货物;
经规划求解的成果如下表:
求解的成果如下 :
炼油厂 A 1 给销地 B 1 发 30 ,给销地 B 2 发 5 ,不给销地 B 3 发;
炼油厂 A 2 不给销地 B 1 发货,给销地 B 2 发 15 ,给销地 B 3 发 10 。
总运价为 765 ;此时既称心要求且运价更低;为更优计划。
怎么样规划求解,在求解中我翻开了宏,在vb中代码如下:
Sub 求运费()
此中单位格 B13 是总运费 =sumproduct(B7:D8,B10:D11);
B12=SUM ( B10 : B11 )表达销地 B 1 接到的货物;
C12=SUM ( C10 : C11 )表达销地 B 2 接到的货物;
D12=SUM ( D10 : D11 )表达销地 B 3 接到的货物;
E10=SUM ( B10 : D10 )表达产地 A 1 发出的货物;
E11=SUM ( B11 : D11 )表达产地 A 2 发出的货物;
End Sub
运行的时候,老是语法错误 ,不晓得。为什么,谢谢帮手解答
谢谢