Excel测量坐标计算程序(附带计算器程序)
测量坐标计算EXCEL技巧（适用范围交通、建筑、水利、电力等土木工程专业）
测量坐标计算EXCEL技巧（适用范围交通、建筑、水利、电力等土木工程专业）测量坐标计算EXCEL技巧(适用范围交通、建筑、水利、电力等土木工程专业）内容摘要：[ft=#0000ff,,楷体_GB2312]结合公路工程实践，充分利用Excel电子表格中的公式与函数功能，使用简单易懂的嵌套公式的方法，制作公路工程中线逐桩坐标计算的文档模版，应用于公路中线一般线型的坐标计算。
关键词：Excel 公路中线坐标计算现阶段我国公路工程中已普遍使用大地坐标进行线型的控制及测设，在施工中经常要对中线坐标进行复核、加密，才能满足公路工程施工的需要。
本文是结合公路工程的实际需要，利用Exce电子表格制作的用于由直线、圆曲线、缓和曲线组成的一般公路线型中桩、边桩等计算的通用模版，用于减轻计算工作的劳动强度和提高计算结果的准确度。
一、采用公式1 直线段1.1 中桩坐标计算公式1.2 边桩坐标计算公式2 缓和曲线段2.1 中桩坐标计算公式当P点位于顺时针方向时,其方位角为αE→p=αA→B+90°；当P 点位于逆时针方向时,其方位角为αE→p=αA→B-90°。
2.2 边桩坐标计算公式3 圆曲线段3.1 中桩坐标计算公式当E点位于顺时针方向时取“+”,当E点位于逆时针方向时取“-”。
3.2 边桩坐标计算公式XP、YP——未知点P的坐标X1、Y1——各线型起点的坐标（第二曲线段为终点）XA、YA、XB、YB——P点边桩A点、B点的坐标（A为左侧、B 为右侧）α1→2——直线段起点的方位角αA→B——各线形起点的切线方位角（第二曲线段为终点）L——P点距各线形起点的长度LS——缓和曲线段缓和曲线长R——各曲线段的半径β——P点的切线角（曲线左转时取“-”、曲线右转时取“+”）T1、T2——P点至边桩A、B的距离（A为T1、B为T2）二、计算模板的建立步骤表1－1表1－21．新建一个工作薄，在其中输入如表1所示的内容；2. 选中工作表A列，打开格式菜单，选中“单元格”，在单元格菜单中选中“数字”栏，自定义单元格格式为“K000＋000.000”。
电子表格Excel VBA测量程序分享
电子表格Excel VBA测量程序分享2012-2-13 11:16阅读(6977)简介：Microsoft Excel是微软公司的办公软件Microsoft office的组件之一，Visual Basic forApplications（VBA）是一种VisualBasic的一种宏语言，是基于Visual Basic for Windows 发展而来的，主要能用来扩展Windows的应用程式功能，特别是Microsoft Office软件。
也可说是一种应用程式视觉化的Basic Script，VBA的使用可以达成执行特定功能或是重复性高的操作。
适用：Microsoft Office Excel办公软件NO.1：曲线坐标计算程序VBA说明：本程序适用于Office Excel运行，属于多交点坐标正算、反算程序，包括：多交点曲线要素、坐标正算、坐标反算、放样计算、竖曲线高程等。
下载：曲线坐标计算程序VBA 1.0（单交点坐标正算）曲线坐标计算程序VBA 2.0（单交点坐标正算、反算）曲线坐标计算程序VBA 2.3（单交点坐标正算、反算、自动化）曲线坐标计算程序VBA 3.0（多交点坐标正算、反算）曲线坐标计算程序VBA 4.0~4.9（交点法、线元法、竖曲线等一体化程序）2012-11-15 更新测量坐标计算程序 V5（交点法、线元法、直线、竖曲线等多种计算程序）2013-07-27 更新NO.2：测量计算程序集成VBA 1.6说明：本程序适用于Office Excel运行，通过VBA编写的测量集成程序，属于单交点曲线，包括：坐标正算、坐标反算、坐标放样、角度转弧度、任意切线方位角、坐标展点、边角后方交会、坐标面积计算、无定向平差、水准平差、竖曲线高程、导线观测手薄、线元法坐标正算、线元法坐标反算、直线坐标正反算等。
下载：点击下载NO.3：线元法坐标正反算VBA说明：本程序适用于Office Excel运行，是线元法坐标正算、反算一体程序，可以计算多线元数据，适用性广（包括：复曲线、S型曲线、匝道）等。
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。
Excel测量计算程序
6378140 6356755.288 1：298.257 0.006694385 0.006739502 6399596.652
6378137 6356752.314 1：298.257223563 0.00669438 0.006739497 6399593.626 °
f（扁率）
2 ，2
RA=N/(1+η2cosA2) 经度差（L) ′ 3 45 ″ 52.149
平均曲率半径 R=√MN=C/V
2
0.048744677 中间参数 t=tanB 1.355001026
1.001187317 中间参数 m=COSB*L 0.039014657
6376957.514 子午线弧长
6384528.983 子午线收敛角 γ 3°01′50.″
F
5938430.282
1980年西安坐标系
中间参数 η=e cosB
，
中间参数 V=√1+η
2
子午圈曲率半径 M=C/V
3
卯酉圈曲率半径 N=C/V 6392006.216 子午线收敛角 γ 3.030483554
平均曲率半径 R=√MN=C/V2 6384424.783 子午线收敛角 γ 3°01′50.″
0.048748208 中间参数 t=tanB 1.355001026
1.001187489 中间参数 m=COSBL 0.039014657
6376852.342 子午线弧长
F
5938328.871
输入处
大地纬度（B) 弧度 0.935015142 RA=N/(1+η2cosA2) 经度差（L) 弧度 0.065702672 3.764485833 L=经度-((经度)/3)*3 ((经度)/3)取整数*3 十进制（度） 53.57242139
教你如何通过ExcelVBA编写测量坐标计算程序
教你如何通过ExcelVBA编写测量坐标计算程序（入门篇）摘要：认识VBA、理解VBA，并利用Office Excel VBA编写测量坐标计算程序。
关键词：Excel VBA 程序坐标编写了解：VBA是什么？简单的说就是一种自动化语言，它可以使常用的程序自动化,可以创建自定义的解决方案。
可以用E xcel的宏语言来使E xcel自动化运行等……Microsoft让它开发出来的应用程序共享一种通用的自动化语言——Visual Basic For Application(VBA)，可以认为VBA是非常流行的应用程序开发语言Visual Basic的子集，事实上VBA是VB应用程序的版本，尽管存在有些不同VBA和VB在结构上仍然十分相似。
如果你已经了解VB会发现学习VBA非常快。
相应的学完VBA会给学习VB打下坚实的基础。
理由：选择Excel VBA编程的理由是因为它的计算功能非常强大，是现今任何编程计算器无法逾越的。
它运用范围广，计算速度快，计算精度高，合理化显示等。
或许很多测量人员对Excel VBA还有些陌生，主要是大家寄托于计算器、电脑、手机PDA等系列软件使用。
Excel VBA对于大多数测量人员而没有系统学过计算机语言程序设计的人群来讲有一定含糊，不过只要有基本数学知识、测量常识和逻辑理解的人，都能通过Excel VBA编写设计出称心如意的测量程序。
目标：基于Excel VBA的测量坐标计算程序的设计目标是将繁琐计算过程转入到计算机中，利用程序语言的重复性原理，在计算机中可将坐标计算得出更精确的结果，使坐标计算更加可靠。
最终目标是让用户可以通过Excel VBA自行完成坐标计算程序设计。
认识：学习VBA到底需要什么基础和了解些什么？学习VBA需要认识英文字母、一般的单词（如：函数所用的过程）、数学基础知识、测量常识、逻辑性思维即可。
在VBA中需要了解VBA的过程、变量、属性、方法、事件、语句等。
EXCEL测量程序
黄永地(Emil:daoqiaoyilang@)
测量计算程序集
序号 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
程序名 坐标-方位角 方位角-坐标 地形测量 坐标放样 导线测量记录 闭合导线平差 附合导线平差 度-度分秒 度分秒-度 插值计算 圆曲线要素 横断面测量 沉降观测 水准测量 测量成果 三、四等水准测量记录 挖填方量 地形图经纬仪测量记录 三角高程测量 编制：
小白自学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”表示。
用EXCEL完成GPS坐标转换的简易方法
一、用EXCEL进行高斯投影换算从经纬度BL换算到高斯平面直角坐标XY（高斯投影正算），或从XY换算成BL（高斯投影反算），一般需要专用计算机软件完成，在目前流行的换算软件中，存在一个共同的不足之处，就是灵活性较差，大都需要一个点一个点地进行，不能成批量地完成，给实际工作带来许多不便。
笔者发现，用EXCEL可以很直观、方便地完成坐标换算工作，不需要编制任何软件，只需要在EXCEL的相应单元格中输入相应的公式即可。
下面以54系为例，介绍具体的计算方法。
完成经纬度BL到平面直角坐标XY的换算，在EXCEL中大约需要占用21列，当然读者可以通过简化计算公式或考虑直观性，适当增加或减少所占列数。
在EXCEL中，输入公式的起始单元格不同，则反映出来的公式不同，以公式从第2行第1列（A2格）为起始单元格为例，各单元格的公式如下：单元格单元格内容说明A2输入中央子午线，以度.分秒形式输入，如115度30分则输入115.30 起算数据L0B2=INT(A2)+(INT(A2*100)-INT(A2)*100)/60+(A2*10000-INT(A2*100)*100)/3600把L0化成度C2以度小数形式输入纬度值，如38°14′20″则输入38.1420起算数据BD2以度小数形式输入经度值起算数据LE2=INT(C2)+(INT(C2*100)-INT(C2)*100)/60+(C2*10000-INT(C2*100) *100)/3600把B化成度F2=INT(D2)+(INT(D2*100)-INT(D2)*100)/60+(D2*10000-INT(D2*100 )*100)/3600把L化成度G2=F2-B2L-L0H2=G2/57.2957795130823 化作弧度I2=TAN(RADIANS(E2)) Tan(B)J2=COS(RADIANS(E2)) COS(B)K2=0.006738525415*J2*J2L2=I2*I2M2=1+K2N2=6399698.9018/SQRT(M2)O2=H2*H2*J2*J2P2=I2*J2Q2=P2*P2R2=(32005.78006+Q2*(133.92133+Q2*0.7031))S2=6367558.49686*E2/57.29577951308-P2*J2*R2+((((L2-58)*L2+61) *O2/30+(4*K2+5)*M2-L2)*O2/12+1)*N2*I2*O2/2计算结果XT2=((((L2-18)*L2-(58*L2-14)*K2+5)*O2/20+M2-L2)*O2/6+1)*N2*(H2 *J2)计算结果Y表中公式的来源及EXCEL软件的操作方法，请参阅有关资料，这里不再赘述。
EXCEL计算坐标
Excel在导线计算中的应用李海军摘要：目前在一些小地区的大比例尺测图中，做控制用的较多的是导线测量的方法。
由于全站仪的广泛应用给导线的外业测量带来不少方便，但导线的内业计算如采用手工计算工作量大，本文就介绍用Ecxcl进行导线计算的方法。
关键词：Excel 导线计算1前言Execl是目前最为流行的电子表格制作软件，它是微软公司开发的在Windows下运行的一个重要应用软件，一般也称Microsoft Execl。
它同MicrosoftWord、 Microsoft PowerPoint、Microsoft FrontPage等合称Microsoft office。
Execl具有强大的运算功能，它能按照用户的意图进行各种复杂的运算（包括编写公式、调用函数等）。
Execl同样具有强大的数据管理和处理功能，能够根据用户的要求将输入的数据生成各种各样的图表，可以对数据按照各种复杂的条件进行排序、查找、替换、编辑和筛选。
最后，Execl能把用户制作的文件保存起来，用户可以随时调出来进行补充和修改，也方便打印和复制。
2 Execl在导线计算中的应用目前，随着测绘技术的不断发展，在一些小地区的大比例尺测图中，做控制应用较多的依然是导线测量的方法。
在导线测量中，野外数据的采集用全站仪可以说方便快捷，但是其内业的计算用手工却比较麻烦，而且费时费力。
本文就着重介绍一下Excel在导线计算方面的应用。
3．实例现在就以某一测区测得一条附合导线为例，讲解用Excel对其进行计算的方法。
导线图如下所示：已知A,B,C,D四点的坐标，在测量时测出了导线的左转折角以及相邻导线点之间的水平距离。
现在我们就看如何用Excel快速计算出1，2，3，4点的坐标。
计算各导线点的坐标3.1.1输入首先我们在A列输入点号，然后在B列输入观测角（在这里我们观测的是左角），以度分秒的格式输入，度和分之间用小数点隔开，在S2T2单元格中输入B点的x，y坐标，S3T3单元格中输入A点的x，y坐标， S8T8单元格中输入C点的x，y坐标， S9T9单元格中输入D点的x，y坐标，最后在H列输入各条导线边的长度。
用EXCEL完成GPS坐标转换的简易方法
用EXCEL完成GPS坐标转换的简易方法.txt我们用一只眼睛看见现实的灰墙，却用另一只眼睛勇敢飞翔，接近梦想。
男人喜欢听话的女人，但男人若是喜欢一个女人，就会不知不觉听她的话。
用EXCEL完成GPS坐标转换的简易方法[摘要]对利用EXCEL电子表格进行高斯投影换算的方法进行了较详细的介绍，对如何进行GPS坐标系转换进行了分析，提出了一种简单实用的坐标改正转换方法，介绍了用EXCEL完成转换的思路。
[关键字]电子表格；GPS；坐标转换作为尖端技术GPS，能方便快捷性地测定出点位坐标，无论是操作上还是精度上，比全站仪等其他常规测量设备有明显的优越性。
随着我国各地GPS差分台站的不断建立以及美国SA 政策的取消，使得单机定位的精度大大提高，有的已经达到了亚米级精度，能够满足国土资源调查、土地利用更新、遥感监测、海域使用权清查等工作的应用。
在一般情况下，我们使用的是1954年北京坐标系或1980年西安坐标系（以下分别简称54系和80系），而GPS测定的坐标是WGS-84坐标系坐标，需要进行坐标系转换。
对于非测量专业的工作人员来说，虽然GPS定位操作非常容易，但坐标转换则难以掌握，EXCEL是比较普及的电子表格软件，能够处理较复杂的数学运算，用它来进行GPS坐标转换、面积计算会非常轻松自如。
要进行坐标系转换，离不开高斯投影换算，下面分别介绍用EXCEL进行换算的方法和GPS坐标转换方法。
一、用EXCEL进行高斯投影换算从经纬度BL换算到高斯平面直角坐标XY（高斯投影正算），或从XY换算成BL（高斯投影反算），一般需要专用计算机软件完成，在目前流行的换算软件中，存在一个共同的不足之处，就是灵活性较差，大都需要一个点一个点地进行，不能成批量地完成，给实际工作带来许多不便。
笔者发现，用EXCEL可以很直观、方便地完成坐标换算工作，不需要编制任何软件，只需要在EXCEL的相应单元格中输入相应的公式即可。
下面以54系为例，介绍具体的计算方法。
教你如何通过ExcelVBA编写测量坐标计算程序
教你如何通过Excel VBA编写测量坐标计算程序发布日期：2013-01-11来源：网络作者：未知浏览次数：1704摘要：认识VBA、理解VBA，并利用Office Excel VBA编写测量坐标计算程序。
关键词：Excel VBA程序坐标编写了解：VBA是什么？简单的说就是一种自动化语言，它可以使常用的程序自动化,可以创建自定义的解决方案。
可以用Excel的宏语言来使Excel自动化运行等……Microsoft让它开发出来的应用程序共享一种通用的自动化语言——Visual Basic For Application(VB A)，可以认为VBA是非常流行的应用程序开发语言Visual Basic的子集，事实上VBA是V B应用程序的版本，尽管存在有些不同VBA和VB在结构上仍然十分相似。
如果你已经了解VB会发现学习VBA非常快。
相应的学完VBA会给学习VB打下坚实的基础。
理由：选择Excel VBA编程的理由是因为它的计算功能非常强大，是现今任何编程计算器无法逾越的。
它运用范围广，计算速度快，计算精度高，合理化显示等。
或许很多测量人员对Excel VBA还有些陌生，主要是大家寄托于计算器、电脑、手机PDA等系列软件使用。
Excel VBA对于大多数测量人员而没有系统学过计算机语言程序设计的人群来讲有一定含糊，不过只要有基本数学知识、测量常识和逻辑理解的人，都能通过Excel VBA编写设计出称心如意的测量程序。
目标：基于Excel VBA的测量坐标计算程序的设计目标是将繁琐计算过程转入到计算机中，利用程序语言的重复性原理，在计算机中可将坐标计算得出更精确的结果，使坐标计算更加可靠。
最终目标是让用户可以通过Excel VBA自行完成坐标计算程序设计。
认识：学习VBA到底需要什么基础和了解些什么？学习VBA需要认识英文字母、一般的单词（如：函数所用的过程）、数学基础知识、测量常识、逻辑性思维即可。
测量excel编程
浅谈Excel测量编程摘要：本文论述的主要目的是使用最简单的工具，采用最简单的方法，解决最实际的问题。
以Excel 为编辑平台，适用与大多数的公路工程中线逐桩坐标计算。
可拷贝至掌上电脑中应用，部分智能手机支持Excel电子表格的浏览，携带方便，适用于公路工程施工测量的野外作业。
关键词：坐标计算编程简单野外作业引言为工程测量提供一种简便、计算精度高、速度快的编程方法，如有需要还可根据计算的数据生成线路图以便检查数据，满足于一般公路工程测量的需要。
适用性强，Excel电子表格为大多数计算机必备软件，通用性极强。
以供大家一起讨论研究。
表1-1Excel测量（直线坐标）编程步骤例子如下：1.在图纸中找到直线、曲线及转角表；2. 新建一个excel工作薄，在其中输入如表1-1所示的内容：2.1在直线、曲线及转角表中找到起点（QD）输入起点桩号（2875.987）；2.2在直线、曲线及转角表中找到QD的坐标X0，Y0（726906.498，502750.971）分别输入至A3，B3栏目内；2.3在直线、曲线及转角表中找到方位角（度）156.344输入至D3栏目内；2.4在切线方位角βI3栏目中输入公式：=D3，就会直接出现切线方位角β为156.344；2.4在对所求X下方“E3”栏目内输入公式：=A3+(C3-G3)*COS(D3*PI()/180)；2.5在对所求Y下方“F3”栏目内输入公式：=B3+(C3-G3)*SIN(D3*PI()/180)；2.6在图纸中找到逐桩坐标表，在求桩号C3栏目内输入要计算的桩号：2875.987；2.7当输入求桩号：2875.987时，excel已自动计算出该点的所求X，所求Y，在E3，F3栏目内分别显示为：（726906.498,502750.971）；3.当要求多点的所求X，所求Y值时，使用绝对引用$A$3（表示绝对引用A3里面的数字，往下拉数值不变），下拉鼠标；同理下拉方位角（度）、起点桩号、切线方位角β，因为直线坐标计算中方位角（度）、起点桩号、切线方位角β是固定值；4.对照casio输点进行验证，首先在casio5800里面计算2960的坐标，计算结果为：X,Y(726829.5445，502784.6807),下拉求桩号下光标或插入单元格再输入2960，得X,Y(726829.5445，502784.6808)，误差可以记为“0”；5. 点击“文件”菜单中的“另存为”选项，输入文件名为“直线坐标计算”在文件类型中选择为“文档模版”并点击“保存”。
Excel测量坐标计算程序(附带计算器程序)
缓和曲线角 β2
0.056
切线长ቤተ መጻሕፍቲ ባይዱT1
476.548
JD至HZ方位 角
（弧度）
（弧度）
HZ至JD方位角 （度）
（度）
HY至JD方位角 （弧度）
3.63453181 0.49293916 28.24333333 28°14′36″ 3.322837339
桩号、坐标结果表
QZ桩号
YH桩号
HZ桩号
40306.803
GotoA LblD(第二缓和曲线) Abs（M-(N+T+L+V)）→W W－W5÷（40R2V2）+W9÷（3456R4V4）→C-------------------------------支距X坐标 W3÷（6RV）－W7÷（336R3V3）+W11÷（42240R5V5）→D------------支距Y坐标 90W2÷（πRV）→O-----------------------------------------------------------------缓和曲线角 E＋CcosQ-BDsinQ＋Scos（Q+BO+90）→X◢ F＋CsinQ+BDcosQ＋Ssin（Q+BO+90）→Y◢ Pol（（X-P），（Y-Z））：Cls----------------------------------------------------方位角和距离程序 IfJ＜0：ThenJ+360 →J：ElseJ →J：Ifend：I◢J ►DMS◢
204.408414 1.42360245 204.413372 0.02089324
164.414334 0.74077489 164.416002 0.013516541
教你如何通过Excel VBA编写测量坐标计算程序
教你如何通过Excel VBA编写测量坐标计算程序发布日期：2013-01-11 来源：网络作者：未知浏览次数：1704摘要：认识VBA、理解VBA，并利用Office Excel VBA编写测量坐标计算程序。
关键词：Excel VBA 程序坐标编写了解：VBA是什么？简单的说就是一种自动化语言，它可以使常用的程序自动化,可以创建自定义的解决方案。
可以用Excel的宏语言来使Excel自动化运行等……Microsoft让它开发出来的应用程序共享一种通用的自动化语言——Visual Basic For Application(V BA)，可以认为VBA是非常流行的应用程序开发语言Visual Basic的子集，事实上VBA 是VB应用程序的版本，尽管存在有些不同VBA和VB在结构上仍然十分相似。
如果你已经了解VB会发现学习VBA非常快。
相应的学完VBA会给学习VB打下坚实的基础。
理由：选择Excel VBA编程的理由是因为它的计算功能非常强大，是现今任何编程计算器无法逾越的。
它运用范围广，计算速度快，计算精度高，合理化显示等。
或许很多测量人员对Excel VBA还有些陌生，主要是大家寄托于计算器、电脑、手机PDA等系列软件使用。
Excel VBA对于大多数测量人员而没有系统学过计算机语言程序设计的人群来讲有一定含糊，不过只要有基本数学知识、测量常识和逻辑理解的人，都能通过Excel VBA编写设计出称心如意的测量程序。
目标：基于Excel VBA的测量坐标计算程序的设计目标是将繁琐计算过程转入到计算机中，利用程序语言的重复性原理，在计算机中可将坐标计算得出更精确的结果，使坐标计算更加可靠。
最终目标是让用户可以通过Excel VBA自行完成坐标计算程序设计。
认识：学习VBA到底需要什么基础和了解些什么？学习VBA需要认识英文字母、一般的单词（如：函数所用的过程）、数学基础知识、测量常识、逻辑性思维即可。
运用Excel测量、放样、计算坐标
一、Excel的数组、数组名和矩阵函数的设置1 矩阵不是一个数，而是一个数组。
在Excel里，数组占用一片单元域，单元域用大括号表示，例如{A1：C3}，以便和普通单元域A1：C3相区别。
设置时先选定单元域，同时按Shift＋Ctrl＋Enter键，大括弧即自动产生，数组域得以确认。
2 Excel的一个单元格就是一个变量，一片单元域也可以视为一组变量。
为了计算上的方便，一组变量最好给一个数组名。
例如A={A1：C3}、B={E1:G3}等。
数组名的设置步骤是：选定数组域，点“插入”菜单下的“名称”，然后选择“定义”，输入数组名如A或B 等，单击“确定”即可。
3 矩阵函数是Excel进行矩阵计算的专用模块。
常用的矩阵函数有MDETERM(计算一个矩阵的行列式)、MINVERSE(计算一个矩阵的逆矩阵)、MMULT(计算两个矩阵的乘积)、SUMPRODUCT(计算所有矩阵对应元素乘积之和)……函数可以通过点击“=”号，然后用键盘输入，可以通过点击“插入”菜单下的“函数”，或点击fx图标，然后选择“粘贴函数”中相应的函数输入。
二、矩阵的基本计算数组计算和矩阵计算有很大的区别，我们用具体例子说明。
已知A={3 -2 5，6 0 3，1 5 4}，B={2 3 -1，4 1 0，5 2 -1}，将这些数据输入Excel相应的单元格，可设置成图1的形状，并作好数组的命名，即第一个数组命名为A，第二个数组命名为B。
计算时先选定矩阵计算结果的输出域，3×3的矩阵，输出仍是3×3个单元格，然后输入公式，公式前必须加上=号，例如=A＋B、=A－B、=A＊B等。
A＋B、A－B数组运算和矩阵运算没有区别，“=A＊B”是数组相乘计算公式，而“=MMULT(A，B)”则是矩阵相乘计算公式，“=A/B”是数组A除数组B的计算公式，而矩阵相除是矩阵A乘B 的逆矩阵，所以计算公式是“=MMULT(A,MINVERSE(B))”。