2022-11-22 09:39来源:m.sf1369.com作者:宇宇
Excel坐标转换:
在工作中常常会遇到要把金额单位为元的表格转换为金额单位为万元的情况,逐项修改很麻烦,即使运用公式也不便捷。可以利用Excel的选择性粘贴功能对数据作批处理:
首先在同一个Excel工作表中业务表格以外一个空白单元格中输入10000,选定此单元格,选择“编辑”菜单中的“复制”;
然后,选定需要修改数据的单元格区域,选择“编辑”菜单中的“选择性粘贴”,在“选择性粘贴”对话框“运算栏”下选择“除”,点击“确定”;
最后,对修改过的单元格区域进行格式设置,并删除原先在一个空白单元格中输入的10000。
为了避免转换后尾数造成的差异,在选定需要修改数据的单元格区域时,不应包括设置了计算公式的单元格,如小计、合计等。经上述处理后,要注意表中相关数据关系的检查,并纠正发现的错误
坐标转换介绍:
坐标转换是空间实体的位置描述,是从一种坐标系统变换到另一种坐标系统的过程。通过建立两个坐标系统之间一一对应关系来实现。是各种比例尺地图测量和编绘中建立地图数学基础必不可少的步骤。那么所要求的坐标,也做原坐标同样的变换就可以在新坐标中找到对应的位置。
在EXCEL中做图表,调换横坐标和纵坐标可在图标设计中调整。方法步骤如下:
1、打开需要操作的EXCEL表格,点击一下图表,工具栏出现“图表工具”,点击“设计”。
2、找到“数据”一项,点击“切换行/列”即可。
3、返回EXCEL表格,发现柱形图的横纵坐标已调换。
1.图表类型为:带直线的散点图
2.点击坐标轴选项,设置最大值、最小值、单位值
3.点击坐标轴选项,设置横纵坐标轴交叉
4.点击坐标轴选项,填充,设置结尾箭头类型
5.点击设置数据系列格式选项,填充,标记,数据标记选项,设置散点的突出显示
6.可做其他细化选项,例如加个刻度线什么的。
这个问题可以用EXCEL进行高斯投影换算来解决,下面具体介绍一下:
1、从经纬度B、L换算到高斯平面直角坐标X、Y(高斯投影正算),或从X、Y换算成B、L(高斯投影反算),一般需要专用计算机软件完成;
2、在目前流行的换算软件中不足之处,就是灵活性较差,大都需要一个点一个点地进行,不能成批量地完成,给实际工作带来许多不便。而用EXCEL可以很直观、方便地完成坐标换算工作,不需要编制任何软件,只需要在EXCEL的相应单元格中输入相应的公式即可。
一、修改坐标轴数据
选中Excel中的图表,然后在“图表工具”的“设计”界面中,点击“选择数据”。然后在“选择数据源”界面中重新选择数据就可以了。
二、修改坐标轴标题
选中Excel中的图表,然后点击“设计”界面中的“添加图表元素”。接着点击“坐标轴标题”,点击“主要横坐标轴”,然后在页面中修改横坐标轴标题就可以了。
三、修改纵坐标轴选
选中图表中的纵坐标,然后鼠标右击,点击“设置坐标轴格式”。然后在界面中修改纵坐标轴选项的大小与属性、效果及填充与线条。
四、修改坐标轴网格线
选中Excel图表中的纵坐标,然后鼠标右击,点击“设置坐标轴格式”。
然后我们可以点击“坐标轴选项”旁边的但倒三角,点击“垂直轴 主要网格线”。然后修改坐标轴网格的填充与线条及效果。
五、修改横坐标轴选项
选中Excel图表中的横坐标轴,然后鼠标右击。点击“设置坐标轴格式”。然后在“坐标轴选项”中修改横坐标轴的填充与线条、效果以及大小与属性。
所谓全站仪坐标反算就是利用已知点坐标和未知点坐标计算两点之间的水平距离和方位角称为坐标反算。在坐标放样常常要用到,因为放样数据水平距离和水平角就是通过坐标反算得到的。
坐标正算就是由已知点坐标和已知点到未知点的方位角与距离计算未知点坐标。公式推导略。
已知条件不够,还需给出“路”上的另一点坐标,或者给出“路”的坐标方位角才可计算只知道E点坐标的话,整个图形可绕E点旋转任意角度,这样A、B坐标就有无数个解知道“路”上的另一点坐标,或“路”的坐标方位角J,则可计算直线AB的法线方向坐标方位角J.ab=J+70-90=J-20设E点坐标为(XE,YE),E到A的距离为L1,E到B的距离为L2,则XA=XE+L1·cos(J.ab);
YA=YE+L1·sin(J.ab)XB=XE-L2·cos(J.ab);YB=YE-L2·sin(J.ab)
解决方法:
1、原来横坐标是123,先把要更改的数值列出来。
2、选中横坐标,点击鼠标右键点击选择数据。
3、点击编辑后,选择刚才列出来的数据。
4、选择好数据后,点击确定。
5、点击确定后,图表里的横坐标数值就更改过来了。即可解决表格横坐标数据没有规律重新设置。
先做了一个给你:按ALT+F11 打开代码窗口,在左边的格(工程资源管理器)内,右键,插入,模块,将下面的代码复制到右边窗口内(模块1的代码窗口),--------Public Function iSeek(iRng As Range, num As Variant) As StringDim iAdd$, c As RangeFor Each c In iRng If c.Value = num Then iAdd = c.Address(False, False): Exit ForNextIf iAdd = "" Then iSeek = "#无" Else iSeek = iAddEnd Function-------------然后关闭代码窗口,返回sheet表现在就可以将这个iseek()函数当做普通函数使用了这个函数有两个参数,第一个是单元格区域,第二个是要查找的数值例:1 2 3 4 56 7 8 9 1011 12 13 14 1516 17 18 19 2021 22 23 24 25其他单元格内输入公式:=iSeek(A1:E5,24)结果:D5