利用excell计算桥梁支座垫石顶面标高
Excel表格制作标高计算程序
Excel表格制作标高计算程序新建一个Excel文件，把Sheet1表重命名为“竖曲线”，把Sheet2表重命名为“设计标高”。
（1）在竖曲线表中的A1-E1（合并）单元格输入线路名称，在A2-E2单元格中分别输入“变坡点编号”、“变坡点里程”、“变坡点标高”、“曲线半径”和“切线长”,从第三行开始输入对应数据，（2）打开VB编辑器（Alt+F11），双击工程资源管理器中“设计标高”表图标，复制以下程序到界面上，保存后返回Excel窗口，在“设计标高”表中的第一列，从第二行开始输入要计算的里程桩号，完成后，在任一单元格中双击单元格，即可看见输入结果（在第二列），本程序默认遇到桩号列空单元格时不再向下计算。
Dim K As DoubleDim H As DoubleDim P1 As Double, P2 As Double, P3 As DoubleDim H1 As Double, H2 As DoubleDim R1 As Double, R2 As DoubleDim T1 As Double, T2 As DoubleDim D1 As Double, D2 As DoubleDim G1 As Long, G2 As LongPrivate Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) On Error Resume NextDim i As LongDim hang As LongDim celln = 0For Each cell In Sheets("竖曲线").Range("a3:a65536")If cell.Value <> "" Thenn = n + 1ElseExit ForEnd IfNexti = 2flag:P2 = 0P3 = 0hang = 3If Sheets("设计标高").Cells(i, 1) <> "" ThenK = Val(Cells(i, 1))canshu:P1 = P2D1 = Val(Sheets("竖曲线").Cells(hang + 1, 2))D2 = Val(Sheets("竖曲线").Cells(hang + 2, 2))H1 = Val(Sheets("竖曲线").Cells(hang + 1, 3))H2 = Val(Sheets("竖曲线").Cells(hang + 2, 3))P3 = (H2 - H1) / (D2 - D1)D1 = Val(Sheets("竖曲线").Cells(hang, 2))D2 = Val(Sheets("竖曲线").Cells(hang + 1, 2))H1 = Val(Sheets("竖曲线").Cells(hang, 3))H2 = Val(Sheets("竖曲线").Cells(hang + 1, 3))R1 = Val(Sheets("竖曲线").Cells(hang, 4))R2 = Val(Sheets("竖曲线").Cells(hang + 1, 4))T1 = Val(Sheets("竖曲线").Cells(hang, 5))T2 = Val(Sheets("竖曲线").Cells(hang + 1, 5))P2 = (H2 - H1) / (D2 - D1)If K < D1 Then Sheets("设计标高").Cells(i, 3) = "超出": i = i + 1: GoTo flag If K > D2 And hang < n + 3 Thenhang = hang + 1GoTo canshuElseCall biaogaoSheets("设计标高").Cells(i, 2) = Round(H, 3)End IfElseEndEnd Ifi = i + 1GoTo flagEnd SubFunction biaogao() As DoubleOn Error Resume NextG1 = -1If P2 - P1 > 0 Then G1 = 1G2 = -1If P3 - P2 > 0 Then G2 = 1H = 0If K < D1 + T1 ThenH = H1 + (K - D1) * P2 + G1 * (D1 + T1 - K) ^ 2 / (2 * R1)ElseIf K <= D2 - T2 ThenH = H1 + (K - D1) * P2ElseIf R2 <> 0 ThenH = H2 - (D2 - K) * P2 + G2 * (K - (D2 - T2)) ^ 2 / (2 * R2)ElseH = H2 - (D2 - K) * P2End IfEnd IfEnd Function本程序只计算单一线路的中桩标高，若想把多个线路的参数放在同一个表中时，只需对以上程序稍加改动即可。
Excel在桥梁施工测量中的应用
Ｅ ｃｌ ｘ ｅ在桥梁施工 测量中的应用
彭兆宏 许芝勇 中铁大桥局集团第四工程有限公司
Ｘ ’ ＝Ｌ Ｌ ／（ ０ Ｒ ＬＳ ） Ｙ ’ ：Ｌ ／ ４ ｛
的施工坐标一致 ，说明计算无误 ，起 到检核的
作用。
３ 、结束语 Ｅ ｃｌ ｘｅ 软件有强大的函数计算功能 ，本次讨
３８９ ３ ９ ８３ ９ ４５８ １ ９ ０ ８ｌ ３ ７７７２４ ｎ
至Ｊ ６线路方位角。 Ｄ７ 缓和曲线范 围内根据下列公式计算
对比仪表统计 给出的话单总数 和软交换系统给 计 算结 果 看 出 ，从 Ｚ Ｈ点到 ＹＨ点计 算 出 出的 话单 总 数 ，检查 软 交换 有无 掉话 单 的现 ＹＨ 点的施工坐标 与Ｈ 点￣ ＹＨ Ｚ Ｉ 点计算 出ＹＨ点 象。一般要求话单差错率不能超过万分之一 。 Ｊ
＿ ６４ 。 ７
４ ３ ０ ６
３ ９１６６ ７ ４５５ ８ ０ ８７ ３ ７７８９３
３ ８ ２ ４９ ４７ ７ １ ８ ９ 。９ ３ ２ ０ ５ ８ ９ 。
承台３ Ｄ ２６ ４ ３ ２ ６４ ７ Ｋ６＋７ ８ ６ ７６８２ ６
ｌ ， Ｈ ２６ ４ ８ ６ ＋７ ３ ０５
１ 引言 、
简单应用。利９Ｅ ｃｌ １ ｘｅ软件的计算功能，经过一些 （ Ｒ Ｌ） Ｌ／ ３６ Ｒ ｝ ）① ６ ＊ ＿（３ ＇ ｋ ＊ 一 』 简单的操作主要点按计算公 式输 入到表格 中，计 在圆曲线范 围内根据下列公式计算
ｆ】 、许金 良、邓 云潮 ，公路 施工测量手 ｌ聂让
得 出：ｄ１ ．０ ３ ８９ ＝３ ２ ９ ０８ ， ｄ２＝３ ３０ ６ ９ 弧度 ）， ．６５ ６ ９（
ＺＨ （ ０ ７ ８ ． ｌ ，４ ５ ３ ．４ ） ，ＨＺ ３９９ ７０ ６ ７ ８ ００ ２
EXCEL电子表格在公路测量施工中的应用——海滨大道路基、桥梁中桩坐标计算及放样
为ｉ 点
求 出 ｉ 的路 线 坐 标 后 ，根 据 ｏ 在 线 路 坐 标 系 中 的 方 点 轴 位角 Ｔ 和 Ｚ 。 Ｙ点 的坐 标 对 、ｙ进 行 平 移 、旋 转 ， 即 ： ）ｉＸ ＋ ｉ ｏ Ｔ ＋ｙ ×ｓｎ ０ （ 转取 上 面 符号 ） ； （ 。 ｘ Ｘｃ ｓ ｏ ｉ ｉＴ 右 ＝ Ｙ＝ ｏｘ ｉＴ ±ｙ ×ｃ ｓ ０ （ 转 取 下 面符 号 ） 。 ｉＹ ＋ ｉ ｓｎ ｏ Ｘ ｉ ｏｔ 左
徐 刚 ， 王 继 刚
（ 中交 一航 局 第 一 工 程 有 限 公 司 ， 天 津 ３ ０ ５ ０ ４ ６）
摘
要：以海滨大道路基 、桥梁施工为范例 ，通过计算机的应用简化施 工放样计 算的方法 。
文献 标 识 码 ：Ａ 文章 编 号 ： １０ — ９ ３ （ ０ ２ ４ ０ ２— ２ ０ ６ ７ ７ ２ １ ）０ — ２ ３ ０ 方 法 二 ：用 积 分 坐 标 方 程直 接 求 圆 曲线 上 任 意 ｉ点 的 线 路坐标 ，即：
ｘ＝ｉ １／ Ｒ ）＋ （ １ ０ ｉｌ ｉ ６ 。 一（３ １ ／ Ｒ ）； ｉ ２
Ｙ＝ （２ ２ ｉ １／ Ｒ）一 （ ２ Ｒ ） ＋ （ｉ ７ ０ ５ ； ｉ １／ ４ ３ ｉ １／ ２ Ｒ ） ６
坐标 系下 的坐标 ，转换公式与 圆曲线类 同。
缓 和 曲线 上任 意 一 点 ｉ 的切 线 方 位 角 可 用 下 式 求 得 ： Ｔ＝ ０ （ ／ ＲＬ ） × （ ８ ） ， ｉＴ ＋ １ ２ ｏ ２ １ Ｏ／
式中：， ＿ 特定坐标系 ｘ轴 的方 位角。 ｒ＿ ０一
同 上 ，可 根 据 Ｔ 求 得 任 意 一 点 ｉ的法 线 方 向上 的 距 离 点 ｉ 的坐 标 。
EXCEL计算坐标方法
计算坐标需要"桥型布置图"、"桥台结构图"、"桥墩结构图"、"点位图"、"纵断面".
先点开"桥型布置图","纵断面",找出台帽前墙位置与纵断线上已知一点的距离,例：
量取已知点距台帽前墙距离,如：1.978m
再点开"点位图",找到已知点投影到拟定桥梁中线的位置.
再在该位置向路线方向移动1.978m.
以该点为基点,并在CAD中点出该点的坐标,记录下来.
但是注意CAD的坐标和测量的坐标X、Y是相反的.记下坐标X:6645.8554 ;Y:4103.3546.
再查看桥型布置图,查看两台帽前墙间的距离,13.04m
再在点位图中把之前的基点移动13.04m,并记录下在CAD中的坐标.
如：X:6658.8019,Y:4101.7962
再打开设计完的"桥台结构图",算出台帽至基础前点的平面距离2.7m,并记录下来.
再查看基础的侧面长度,如6.7m,和基础的横向宽度7.0m,并记录下来.
OK有这些记录下来的数据就可以通过EXCEL计算基础坐标了.
方法:
打开excel并把记录下的数据填如表中：
黄色的框是要填入的数据.
注意：EXCEL计算1#台填入的"间距"等于13.04减去1#台台帽前墙距基础前点的平面距离. 如果是斜交的桥梁,输入的交角是路线方向逆时针旋转至桥台前墙的角度.如图中斜交60度,就输入60度.
1 / 1。
垫石标高计算(l)
3#墩
陶家河大桥
K130+105.787 237.207 237.198 237.203 2.14% -1.70% 1.7 0.19 0.206 1.45 235.204 3.80 235.152 6.15 235.100 8.50 235.048 10.85 234.996 13.20 234.944 15.55 234.892
陶家河大桥 6#墩 K130+180.000 238.119 238.115 238.123 2.34% -1.51% 1.7 0.19 0.196 1.45 236.110 3.80 236.053 6.15 235.996 8.50 235.939 10.85 235.882 13.20 235.825 15.55 235.769
陶家河大桥
K130+104.607 237.197 237.198 237.203 2.14% -1.70% 2.5 0.19 0.196 1.45 234.394 3.80 234.342 6.15 234.290 8.50 234.238 10.85 234.186 13.20 234.134 15.55 234.082
陶家河大桥 1#墩 K130+025.000 236.840 236.840 236.841 1.94% -1.91% 2.5 0.19 0.175 1.45 234.016 3.80 233.969 6.15 233.922 8.50 233.874 10.85 233.827 13.20 233.780 15.55 233.733
-0.030 0.031
1.45 238.824 3.80 238.795 6.15 238.765 8.50 238.735 10.85 238.706 13.20 238.676 15.55 238.646
EXCEL在海河大桥主塔及斜拉索测量数据计算中的应用
EXCEL 在海河大桥主塔及斜拉索测量数据计算中的应用姜金星中交一公局厦门工程有限公司摘要:介绍EXCEL 在海河大桥主塔及斜拉索测量数据计算中的应用，化繁为简，为类似工程测量的计算提供参考经验。
关键词:EXCEL;测量计算;计算公式1工程概况天津海河大桥主塔为“钻石型”，直接坐落在承台顶面上。
承台以上全高为164.798米，主塔由塔靴、下塔柱、中塔柱、上塔柱、下横梁及上横梁组成。
塔顶的高程为166.635米，承台顶面高程1.837米，下横梁的标高36.055米，下塔柱顺桥向宽8.0米，横桥向宽为4.7米～6.8米，上塔柱和中塔柱顺桥向宽6.0米～8.0米从塔顶线性过渡到下横梁顶面的位置，下横梁以下的宽度为8米。
天津海河大桥主塔为“钻石型”，直接坐落在承台顶面上，承台以上全高为164.798米。
索道管布置在上塔柱部分，斜拉索共74根，采用空间扇形布置，索面竖直方向在主塔上交点间距为1.5～2.5米，斜拉索锚点位于塔壁中心线。
主梁上主跨侧的水平方向索距为16米，横桥向斜拉索线10.719米，竖直方向斜拉索锚固点距梁顶（最高点）1米，斜拉索通过钢锚箱边跨侧索距为8米～10米，横桥方向斜拉索锚点距道路中心线10.7米，竖直方向（最高点）2米。
(见图1)2坐标系情况图156海河大桥主塔结构复杂，高度大，根据施工方案共分41节段进行施工混凝土浇筑，为了减化计算，方便构件埋设及调整，把大地坐标系转化为主塔的施工独立坐标系；定义坐标原点（0,0,0）为塔对称中心线高程+0.00m 处，大地坐标为（285437.654，144541.321，0），独立坐标系的X 轴在大地坐标系中的坐标方位角为25°18′36″，X 轴正方向指向大桩号方向，Z 轴正向指向塔顶。
如平面图所示：大地坐标转换为独立坐标的公式为：X=（X′-X0）*COSα+（Y′-Y0）*SINαY=-（X′-X0）*SINα+（Y′-Y0）*COSα其中：X 、Y 为大桥独立坐标；X′、Y′为大地坐标；α为独立坐标X 轴正方向在大地坐标系中的方位角。
垫石顶标高计算
垫石顶高程 (即支座底高 程） （m） 17.179 17.187 16.971 16.979 16.739 16.747 16.499 16.507
垫石高度 （含后 灌浆垫石高度） （mm） 140.6 149.4 140.6 149.4 140.6 149.4 140.6 149.4
简支梁垫石顶高程计算 垫石顶高程=盖梁顶高程+0.3m(梁底距离盖梁顶距 连续梁位置支座高度不同，
第一次垫 石浇筑高 度（mm） 115.6 124.4 115.6 124.4 115.6 124.4 115.6 124.4
第一次浇 筑后垫石 顶高程 （m） 17.154 17.162 16.946 16.954 16.714 16.722 16.474 16.482
高程+0.3m(梁底距离盖梁顶距离)-0.155m（支座高度）+0.55*i%(线路纵坡影响)
墩号 AYxx AYxx AYxx AYxx
盖梁顶高 线路纵坡 程（m） 17.038 16.83 16.598 16.358 0.80% 0.80% 0.80% 0.80%
Байду номын сангаас
垫石编号 小里程（4个垫石编号1,2,5,6） 大里程（4个垫石编号3,4,7,8） 小里程（4个垫石编号1,2,5,6） 大里程（4个垫石编号3,4,7,8） 小里程（4个垫石编号1,2,5,6） 大里程（4个垫石编号3,4,7,8） 小里程（4个垫石编号1,2,5,6） 大里程（4个垫石编号3,4,7,8）
小白自学ExcelVBA道路坐标高程计算程序流程
小白自学ExcelVBA道路坐标高程计算程序流程1声明1.1 本人是个工作时间不长测量施工员。
1.2听说想轻松愉快的干好测量得学门编程，又听说ExcelVBA是个简单的可视化的常用的……1.3 本人很懒，面对厚厚的全是“昏天暗地”代码的ExcelVBA教科书籍，实在是没心没力。
其实俺还是懂点儿VB编程的（学校学过“=”是赋值，if、while、end的意思，嘿嘿，还有画窗体图框，其他的就都还给老师了）。
1.4 谷歌、度娘，是咱的好帮手。
1.5 仰望的存在，神一般的存在，无私的化身！道路中边桩坐标计算程序120424.xls（王中伟”教授”QQ：595077）曲线坐标计算程序VBA 4.6.xls（陈超”中铁”QQ：295188316）陈师傅的VBA代码乍一看感觉比王老师的让人头痛，怎么说咱们也是个有理想有目标的人，要啃就啃硬骨头！就选~~~嘿嘿~~~王老师的程序吧！1.6 道路中边桩坐标计算程序120424.xls代码获取。
王老师、陈师傅担心不懂编程的人，不小心修改代码导致程序错误，设置了vba密码（个人认为），其次我跟他们不熟，没有正大光明的要的密码，于是求助谷歌度娘，这个关于VBA 密码破解，于是很不厚道的得到了密码，为了方便本次学习，又很不厚道的把道路中边桩坐标计算程序120424.xls的密码贴出来（df750726），神人勿怪呀！2 代码理解ing…我们通过密码打开vba代码窗口，大家可以先把每个表格打开浏览一下代码，是不是感觉很短呀，感觉应该是超级链接的意思，嘿嘿，主要的代码在模块“lx”里，打开下，代码多吧，这就是咱们要肯的骨头。
现在咱们冲呀！2.1 第一段代码理解貌似第一段代码是定义的意思“定义π值”、'定义桩号点”、“'定义坡段”、“'定义基本曲线”①Public Const PI As Double = 3.14159265358979谷歌翻译：Public Const PI As Double公共常量PI 作为双精度浮点型百度百科：双精度浮点数双精度浮点数（Double）用来表示带有小数部分的实数，一般用于科学计算，用8个字节（64位）存储空间，其数值范围为1.7E-308～1.7E+308，双精度浮点数最多有15或16位十进制有效数字，双精度浮点数的指数用“D”或“d”表示。