c.以上基本资料工作表以JD7所对应行做例子,JD8至JD13所对应行输入公式采用电子表格中的编辑栏中的向下填充功能,向下填充公式。
⑶.然后利用源程序开始在工作表JD7、JD8、JD9、JD10、JD11、JD12、JD13中进行编单元格。现在以JD7所对应的工作表进行实例叙述。工作表在计算过程中只能上一个交点的HZ点到本交点的HZ点间的数据进行计算。
a、例如表4,在工作表的第一个单元格输入数字7(与JD7所对应的数字7一致),然后把JHZH、JDX、JDY、R、I、P、E、F、G、N、M、BC所对单元格参数与基本资料所对应的单元格参数链接起来,加宽值输入设计加宽值,常数输入为从路肩开始横向增加的宽度。
表4
b、例如表5,桩号(ZH-HZ)所对应的单元格中分别输入公式VLOOKUP(A1,基本资料!$A$3:$AQ$32,38,)、VLOOKUP(A1,基本资料!$A$3:$AQ$32,39,)、VLOOKUP(A1,基本资料!$A$3:$AQ$32,40,)、VLOOKUP(A1,基本资料!$A$3:$AQ$32,41,)、VLOOKUP(A1,基本资料!$A$3:$AQ$32,42,)。在ZH所对应的参数单元格输入公式IF(AND(A8>=A$7,A8<=A$8),A$3-A8,IF(AND(A8>=A$8,A8<=A$9),A8-A$8,IF(AND(A8>=A$9,A8<=A$11),(A8-A$8-E$3/2),IF(AND(A8>=A$11,A8<=A$12),A$12-A8,"")))),利用编辑工具栏中向下填充公式。在ZH点与HZ点对应的X、Y单元格中分别输入公式B3+F3*COS(A5+PI())、C3+F3*SIN(A5+PI())、B3+F3*COS(A5+B5*C5)、C3+F3*SIN(A5+B5*C5),首先计算出ZH点与HZ点所对应的X、Y坐标。在ZH点所对应的切线方位角单元格IF(A8<=A$8,A$5,IF(AND(A8>=A$8,A8<=A$9),0.5*B8^2/D$3/E$3*B$5+A$5,IF(AND(A8>=A$9,A8<=A$11),B8/D$3*B$5+A$5,IF(AND(A8>=A$11,A8<=A$12),0.5*B8^2/D$3/E$3*(-B$5)+A$5+B$5*C$5,IF(A8>=A$12,A$5+B$5*C$5))))),然后利用向下填充功能把公式向下填充,计算相对应的桩号在切线方向的方位角。在HY点所对应的X、Y单元格中输入相应公式IF(AND(A9>=A$7,A9<=A$8),ROUND(B9*COS(A$5+PI())+B$3,3),IF(AND(A9>=A$8,A9<=A$9),ROUND(C$8+COS(A$5)*(B9-B9^5/40/D$3^2/E$3^2+B9^9/3469/D$3^4/E$3^4)+COS(A$5+PI()/2*B$5)*(B9^3/6/D$3/E$3-B9^7/336/D$3^3/E$3^3+B9^11/42240/D$3^5/E$3^5),3),IF(AND(A9>=A$9,A9<=A$11),ROUND(C$8+COS(A$5)*(B9-B9^3/6/D$3^2+B9^5/120/D$3^4+D$5)+COS(A$5+PI()/2*B$5)*(B9^2/2/D$3-B9^4/D$3^3/24+B9^6/720/D$3^5+I$3),3),IF(AND(A9>=A$11,A9<=A$12),ROUND(C$12+COS(A$5+B$5*C$5+PI())*(B9-B9^5/40/D$3^2/E$3^2+B9^9/3469/D$3^4/E$3^4)+COS(A$5+PI()+B$5*C$5-PI()/2*B$5)*(B9^3/6/D$3/E$3-B9^7/336/D$3^3/E$3^3+B9^11/42240/D$3^5/E$3^5),3)," "))))与IF(AND(A9>=A$7,A9<=A$8),ROUND(B9*SIN(A$5+PI())+C$3,3),IF(AND(A9>=A$8,A9<=A$9),ROUND(D$8+SIN(A$5)*(B9-B9^5/40/D$3^2/E$3^2+B9^9/3469/D$3^4/E$3^4)+SIN(A$5+PI()/2*B$5)*(B9^3/6/D$3/E$3-B9^7/336/D$3^3/E$3^3+B9^11/42240/D$3^5/E$3^5),3),IF(AND(A9>=A$9,A9<=A$11),ROUND(D$8+SIN(A$5)*(B9-B9^3/6/D$3^2+B9^5/120/D$3^4+D$5)+SIN(A$5+PI()/2*B$5)*(B9^2/2/D$3-B9^4/D$3^3/24+B9^6/720/D$3^5+I$3),3),IF(AND(A9>=A$11,A9<=A$12),ROUND(D$12+SIN(A$5+B$5*C$5+PI())*(B9-B9^5/40/D$3^2/E$3^2+B9^9/3469/D$3^4/E$3^4)+SIN(A$5+PI()+B$5*C$5-PI()/2*B$5)*(B9^3/6/D$3/E$3-B9^7/336/D$3^3/E$3^3+B9^11/42240/D$3^5/E$3^5),3)," "))))。在公路中桩HY、QZ、YH及ZH点以下所对应的X、Y单元格填充以上公式,利用以公式计算出中桩坐标。ZH点以下所对桩号内输入上一个交点处HZ点桩号,在与其相邻的递增桩号取5的倍数,例如在表5中桩号1100以下的桩号中输入公式A14+E$5,E$5所表示的步长为5。在左、右侧任意值分别输入宽度所对公式IF(B$5>0,5,IF(A8<=A$8,5,IF(AND(A8>=A$8,A8<A$9),(A8-A$8)/E$3*F$5+5,IF(AND(A8>=A$9,A8<A$11),5+F$5,IF(AND(A8>=A$11,A8<A$12),ABS(A8-A$12)/E$3*F$5+5,IF(A8>=A$12,5))))))+I$5、IF(B$5<0,5,IF(A8<=A$8,5,IF(AND(A8>=A$8,A8<A$9),(A8-A$8)/E$3*F$5+5,IF(AND(A8>=A$9,A8<A$11),5+F$5,IF(AND(A8>=A$11,A8<A$12),ABS(A8-A$12)/E$3*F$5+5,IF(A8>=A$12,5))))))+I$5,利用EXCEL的相下填充功能,向下填充公式,计算左、右侧的任意宽度。在ZH所对应左侧任侧任意值X、Y单元格内分别输入公式C8+I8*COS(F8-PI()/2)与公式D8+I8*SIN(F8-PI()/2),在ZH所对应右侧任意值X、Y单元格内分别输入公式C8+T8*COS(F8+PI()/2)与D8+T8*SIN(F8+PI()/2),同样利用向下填充功能复制单元格公式。
表5
c.利用上述方式,在工作表JD8-JD13编辑公式。
⑷工作表成果得出所有在K1+100-K2+100段的中桩及左右侧任意点坐标。参数栏所对应值为从路肩横向增加值(变换常数)。例如在桩号1100所对应行,左侧任意值X、Y单元格输入公式IF(AND(B4>=1100,B4<=1250),VLOOKUP(B4,JD7!A:V,10,FALSE),IF(AND(B4>=1255,B4<=1360),VLOOKUP(B4,JD8!A:V,10,FALSE),IF(AND(B4>=1365,B4<=1585),VLOOKUP(B4,JD9!A:V,10,FALSE),IF(AND(B4>=1590,B4<=1760),VLOOKUP(B4,JD10!A:V,10,FALSE),IF(AND(B4>=1765,B4<=1875),VLOOKUP(B4,JD11!A:V,10,FALSE),IF(AND(B4>=1880,B4<=2030),VLOOKUP(B4,JD12!A:V,10,FALSE),IF(AND(B4>=2035,B4<=2105),VLOOKUP(B4,JD13!A:V,10,FALSE),"")))))))与IF(AND(B4>=1100,B4<=1250),VLOOKUP(B4,JD7!A:V,11,FALSE),IF(AND(B4>=1255,B4<=1360),VLOOKUP(B4,JD8!A:V,11,FALSE),IF(AND(B4>=1365,B4<=1585),VLOOKUP(B4,JD9!A:V,11,FALSE),IF(AND(B4>=1590,B4<=1760),VLOOKUP(B4,JD10!A:V,11,FALSE),IF(AND(B4>=1765,B4<=1875),VLOOKUP(B4,JD11!A:V,11,FALSE),IF(AND(B4>=1880,B4<=2030),VLOOKUP(B4,JD12!A:V,11,FALSE),IF(AND(B4>=2035,B4<=2105),VLOOKUP(B4,JD13!A:V,11,FALSE),""))))))),在中桩坐标所对应的X、Y单元格输入公式IF(AND(B4>=1100,B4<=1250),VLOOKUP(B4,JD7!A:V,3,FALSE),IF(AND(B4>=1255,B4<=1360),VLOOKUP(B4,JD8!A:V,3,FALSE),IF(AND(B4>=1365,B4<=1585),VLOOKUP(B4,JD9!A:V,3,FALSE),IF(AND(B4>=1590,B4<=1760),VLOOKUP(B4,JD10!A:V,3,FALSE),IF(AND(B4>=1765,B4<=1875),VLOOKUP(B4,JD11!A:V,3,FALSE),IF(AND(B4>=1880,B4<=2030),VLOOKUP(B4,JD12!A:V,3,FALSE),IF(AND(B4>=2035,B4<=2105),VLOOKUP(B4,JD13!A:V,3,FALSE),"")))))))与IF(AND(B4>=1100,B4<=1250),VLOOKUP(B4,JD7!A:V,4,FALSE),IF(AND(B4>=1255,B4<=1360),VLOOKUP(B4,JD8!A:V,4,FALSE),IF(AND(B4>=1365,B4<=1585),VLOOKUP(B4,JD9!A:V,4,FALSE),IF(AND(B4>=1590,B4<=1760),VLOOKUP(B4,JD10!A:V,4,FALSE),IF(AND(B4>=1765,B4<=1875),VLOOKUP(B4,JD11!A:V,4,FALSE),IF(AND(B4>=1880,B4<=2030),VLOOKUP(B4,JD12!A:V,4,FALSE),IF(AND(B4>=2035,B4<=2105),VLOOKUP(B4,JD13!A:V,4,FALSE),""))))))),在右侧任意值所对应的X、Y单元格中输入公式IF(AND(B4>=1100,B4<=1250),VLOOKUP(B4,JD7!A:V,21,FALSE),IF(AND(B4>=1255,B4<=1360),VLOOKUP(B4,JD8!A:V,21,FALSE),IF(AND(B4>=1365,B4<=1585),VLOOKUP(B4,JD9!A:V,21,FALSE),IF(AND(B4>=1590,B4<=1760),VLOOKUP(B4,JD10!A:V,21,FALSE),IF(AND(B4>=1765,B4<=1875),VLOOKUP(B4,JD11!A:V,21,FALSE),IF(AND(B4>=1880,B4<=2030),VLOOKUP(B4,JD12!A:V,21,FALSE),IF(AND(B4>=2035,B4<=2105),VLOOKUP(B4,JD13!A:V,21,FALSE),"")))))))与IF(AND(B4>=1100,B4<=1250),VLOOKUP(B4,JD7!A:V,22,FALSE),IF(AND(B4>=1255,B4<=1360),VLOOKUP(B4,JD8!A:V,22,FALSE),IF(AND(B4>=1365,B4<=1585),VLOOKUP(B4,JD9!A:V,22,FALSE),IF(AND(B4>=1590,B4<=1760),VLOOKUP(B4,JD10!A:V,22,FALSE),IF(AND(B4>=1765,B4<=1875),VLOOKUP(B4,JD11!A:V,22,FALSE),IF(AND(B4>=1880,B4<=2030),VLOOKUP(B4,JD12!A:V,22,FALSE),IF(AND(B4>=2035,B4<=2105),VLOOKUP(B4,JD13!A:V,22,FALSE),""))))))),在切线方位角所对应的单元格中输入公式IF(AND(B4>=1100,B4<=1250),VLOOKUP(B4,JD7!A:V,8,FALSE),IF(AND(B4>=1255,B4<=1360),VLOOKUP(B4,JD8!A:V,8,FALSE),IF(AND(B4>=1365,B4<=1585),VLOOKUP(B4,JD9!A:V,8,FALSE),IF(AND(B4>=1590,B4<=1760),VLOOKUP(B4,JD10!A:V,8,FALSE),IF(AND(B4>=1765,B4<=1875),VLOOKUP(B4,JD11!A:V,8,FALSE),IF(AND(B4>=1880,B4<=2030),VLOOKUP(B4,JD12!A:V,8,FALSE),IF(AND(B4>=2035,B4<=2105),VLOOKUP(B4,JD13!A:V,8,FALSE),""))))))),利用向下填充功能就得出桩号5米递增的坐标与方位角。