存档在 ‘Excel应用’ 分类中.
近期正在利用Excel开发一套工作管理系统，已初步有了结果，并开始使用。前不久，在一篇博客文章中，我贴出了该系统的主界面。在这里，随便谈谈在开发过程中的一些心得体会，供大家参考。
在同一工作簿中不要试图处理所有需要实现的任务。当然，如果您的系统只需实现少有的几项功能，在一个工作簿中集中实现这几项功能是简单方便的。但是，如果需要实现多项任务，特别是需要处理大量数据的情形下，建议将任务进行整合分类，分别放在不同的工作簿中来实现这些任务。
此时，需要规划好各工作簿要实现的功能任务，合理设计各个工作簿之间的关系，理顺各工作簿之间的数据调用，并且使用一个主工作簿来调用各个工作簿，这样使得系统非常灵活、精简，也不致于因使用而致使工作簿体积快速不断增大。
要注意的是，对于存在数据调用的工作簿，一定要清楚调用的顺序，避免因为某一工作簿数据的更换而影响其他相关工作簿数据的准确性。例如，工作簿B需要调用工作簿A中的数据，如果工作簿A中的数据发生变化，那么要及时更新工作簿B中的数据。
为工作簿添加自定义文档属性（即CustomDocumentProperties
属性），从而利用该属性来查找工作簿，或者判断是否为要查找的工作簿，或者能够合并同类工作簿。特别是在有大量名称会发生变化的工作簿时。
单击菜单“文件”─—“属性”，选择“自定义”选项卡，在“名称”中输入相应的名称，在“取值”中输入“Yes”，然后单击“添加”按钮加入属性，如下图所示。
这样，在多个工作簿相互调用时，可以避免因工作簿名称改变而出现的无法找到工作簿的错误。
记得及早、适时地退出循环，特别是在存在大量数据而不得不逐一进行循环时。例如，下面的代码，必须在工作表中的第3行至第31行、第2列至第32列依次循环，当满足特定条件后，使用Exit Sub语句退出，从而避免继续循环。如果在更大范围内循环时更应如此。
For i = 3 To 31
‘循环每一列
For j = 2 To 32
If Target.Value = “” Then
If iTotalRow > 1 Then
For k = 2 To iTotalRow
If Target.Row = Worksheets(”Data”).Range(”A” & k) And Target.Column = Worksheets(”Data”).Range(”B” & k) Then
Worksheets(”Data”).Rows(k).EntireRow.Delete
bDecide = True
Exit Sub
End If
Next k
End If
End If
Next j
Next i
有时，需要在工作表中反复汇总或操作来自另一工作表或工作簿中的数据。记住，在将其他地方的数据复制到工作表中之前，记得清除以前的数据，避免产生重复数据或带来错误。
在我们编写程序的过程中，总有些代码适合于不同的程序开发。我们可以将这些程序代码做成通用程序，当需要时直接调用，从而节省时间，便于组织，提高了开发效率。这里，举几个例子。
（1）判断某文件是否存在
‘判断文件是否存在
Private Function FileExists(fname) As Boolean
‘如果存在则返回True
FileExists = (Dir(fname) <> “”)
End Function
（2）判断工作表是否存在
‘判断工作表是否存在
Private Function SheetExists(sName) As Boolean
‘如果当前工作簿中存在该工作表则返回True
Dim x As Object
On Error Resume Next
Set x = ActiveWorkbook.Sheets(sName)
If Err = 0 Then
SheetExists = True
Else
SheetExists = False
End If
End Function
（3）返回满足查找条件的所有单元格组成的区域
‘通用的查找函数
Function FindAll(SearchRange As Range, FindWhat As Variant, _
Optional LookIn As XlFindLookIn = xlValues, Optional LookAt As XlLookAt = xlWhole, _
Optional SearchOrder As XlSearchOrder = xlByRows, _
Optional MatchCase As Boolean = False) As Range
”””””””””””””””””””””””””””””””””””””””””””””
‘ 返回SearchRange区域中含有FindWhat所代表的值的所有单元格组成的Range对象
‘ 其参数与Find方法的参数相同
‘ 如果没有找到单元格,将返回Nothing.
”””””””””””””””””””””””””””””””””””””””””””””
Dim FoundCell As Range
Dim FoundCells As Range
Dim LastCell As Range
Dim FirstAddr As String
With SearchRange
Set LastCell = .Cells(.Cells.Count)
End With
Set FoundCell = SearchRange.Find(what:=FindWhat, after:=LastCell, _
LookIn:=LookIn, LookAt:=LookAt, SearchOrder:=SearchOrder, MatchCase:=MatchCase)
If Not FoundCell Is Nothing Then
Set FoundCells = FoundCell
FirstAddr = FoundCell.Address
Do
Set FoundCells = Application.Union(FoundCells, FoundCell)
Set FoundCell = SearchRange.FindNext(after:=FoundCell)
Loop Until (FoundCell Is Nothing) Or (FoundCell.Address = FirstAddr)
End If
If FoundCells Is Nothing Then
Set FindAll = Nothing
Else
Set FindAll = FoundCells
End If
End Function
大家在平时可以积累这些程序，既方便学习，又可以重用。
下面是网易水利中关于Excel应用方面的论文，辑录于此，方便查阅和参考。
- 利用Excel进行管网优化设计
简介：利用excel自带的规划求解进行管网优化设计。
- 用EXCEL绘制PⅢ频率曲线
简介：利用EXCEL强大的函数功能，经过一些简单设置，完全可以绘制PⅢ频率曲线，其方法简单、实用，有一定的推广价值。
- Excel在水文要素计算中的应用
简介：Excel是办公自动化软件Office的重要组成部分之一，是Windows操作平台上的电子表格软件，具有强大的制作表格、处理数据、分析数据、创建图表等功能，在日常生活工作中得到了大量的应用。目前陕西水文工作正向自动测报迈进，但仍有不少水文测验项目是人工测量，计算。利用Excel来进行一些水文要素的计算，不但适应了现阶段工作要求，还提高了工作效果。
- Excel VBA在工程测量上的应用
- 利用Excel数据在AutoCAD绘图软件中绘制大断面
简介： 利用Excel数据在AutoCAD绘图软件中绘制大断面
- 巧用Excel软件计算钢筋量
简介：在水工建筑物设计中，经常要对建筑物所配钢筋进行统计计算，制作钢筋表。钢筋表的制作是根据建筑物的配筋情况确定每一类型钢筋的直径、形状、长度、根数、总长、单重和总重。钢筋的直径、形状、长度、根数是由建筑物的结构尺寸具体确定。钢筋表的制作乍看起来只是数据的简单计算，其实是很烦琐的。通常的做法是把数据用电子计算器一个一个的摁。在钢筋规格尺寸或数量发生变动时，就要重新再摁。这样计算既费时间，又容易出错，更重要的是要想检查错误的话必须重新在摁一遍。这样做是不是很烦琐呀？难道就没有一种既简单又便于检查的计算方法吗？我们常用的Excel软件就可以轻而易举的办到。
- Excel在地质要素统计中的应用
简介： 著名的Excel是微软公司Office套件中的电子视算表软件,方便实用,功能十分强大,能够对各种数据进行分析处理,并可用直观的图表表示统计结果。在工程地质勘测过程中,有大量的原始数据要进行统计分析,灵活运用Excel中的内部函数,解决各类地质要素的统计工作,可以取得事半功倍的效果。下文将介绍几个实用的Excel内部函数的功能和适用范围,供大家参考使用。
- Excel电子表格在工程领域的应用技巧点滴
简介：Excel等电子表格具有强大的计算功能，在水利等土木工程建筑的规划设计、工程造价分析、工程经济分析、建设监理、财务统计及日常办公等诸多领域有着广泛的应用。运用Excel的数据自动填充、单元格数据引用、公式与函数、图表等技巧，可达到事半功倍的目的。
- 运用EXCEL软件计算梯形渠道流量
简介：本文通过运用EXCEL软件建立了新建梯形渠道设计流量的计算方法，经反复实践，该方法简便，计算速度快，精度满足设计要求。
- Excel在土工试验资料整理中的应用
简介：Excel不仅是一种功能齐全的电子表格处理软件，也是一种操作简便的制图工具。它可以根据表格中枯燥的数据迅速便捷地生成各种直观、生动的图表，并且还允许用户根据需要修改及自定义图表。巧妙灵活地使用Excel提供的格式化功能，可以使生成的数据表格或图形更加美观、清晰。
- Excel在水文分析中的应用
简介： 利用excel中的绘图及规划求解功能，解决水文分析与计算中常用图形的绘制、水位~流量关系曲线拟合的问题。拟合的曲线用函数表达更利于计算机处理，而且对于一些实测点据的定线，还能减少徒手绘制因人而异所带来的任意性。
- 浅谈Excel、AutoCAD在渠道设计中的应用
简介：文章针对影响渠道设计效率的关键性问题介绍了一种利用Excel和AutoCAD R14 软件进行辅助性渠道设计的方法，从而简化了渠道设计程序，有效地提高了渠道设计效率。
- EXCEL辅助计算公路中桩与边桩参数的应用
简介：在现今的道路桥梁建设中， 全站仪以其高精度、高效率的特点，在测量放样中得到广泛的应用，它将传统的二维测量提升到了三维测量的高度。但大量的坐标计算加重了测量人员的工作强度，也影响了全站仪的使用效率。本人根据《公路工程施工测量》提供的FX-4500程序，利用EXCEL函数与逻辑循环语来计算公路中桩及边桩参数，大大提高了计算的可靠性和速度。
- EXCEL在隧道监控量测数据分析中的应用
简介： 本文通过例题讲述了利用电子表格（Excel）处理隧道监控量测数据的详细步骤，以及回归成果在围岩收敛基本稳定判定中的应用，不需第三方软件的情况下，在Excel内完成所有数据的回归分析工作，可使监控量测数据分析更准确、更快捷、更及时、更方便观测数据的管理，为隧道施工及时提供反馈及预测信息，使施工更科学、更安全。
- 基于EXCEL的函数功能实现地下水的质量评判
简介：针对水资源评价中地下水质量评价项目的特点，结合目前技术人员的实际情况，运用大家熟悉的办公软件EXCEL实现地下水的质量评价。文章从地下水质量评价的国家标准出发，利用EXCEL中函数功能实现其评价目的。这一方法简单实用，可以给大家进行地下水质量评价工作节省不少时间。
- EXCEL在滑坡稳定性评价中的应用
简介：某规划中的中型水电工程近坝库岸的A、B古滑坡稳定问题,是影响坝址选择的主要工程地质问题,不仅涉及河流的开发方式,也直接决定了该工程兴建的可行性。本文以极限平衡法为理论基础评价该滑坡的稳定性。
- 用EXCEL计算土方量
简介：本文以新建土渠为例介绍土方量的一种简便计算方法。该法公式简单，计算速度快，精度可满足工程设计要求
- 水面线设计
简介：用Excel编程进行水面线推求，依据能量方程，用分段求和法计算，方法明确，简便易行。
- “规划求解”在土方调配计算中的应用
简介：土方调配计算中通常采用“线性规划”方法进行计算，然而当出现数量较多的填挖区时，采用人工计算则工作量太大，而专业分析软件又往往得不到普及。以潮州供水枢纽工程库区防护Ⅱ标段第二施工区域土方工程为例，介绍一种利用Excel中“规划求解”功能解决土方调配计算的方法。
- 水利工程中运输问题的计算机简化解法及探讨
简介：水利工程中需要调配大量的物资，要得到最优的物资运输方案，需进行复杂的线性规划计算，多次迭代，往往耗费大量的时间，本文通过对“线性规划”数学模型的分析，详细说明了如何利用Excel软件的规划求解功能来解决运输问题及其他相关的数学规划问题。
- 水利工程中运输问题的计算机简化解法及探讨
简介：水利工程中需要调配大量的物资，要得到最优的物资运输方案，需进行复杂的线性规划计算，多次迭代，往往耗费大量的时间，本文通过对“线性规划”数学模型的分析，详细说明了如何利用Excel软件的规划求解功能来解决运输问题及其他相关的数学规划问题。
- Excel软件编制建筑工程投标报价研究
简介：本文遵照GB50500-2003《建设工程工程量清单计价规范》，利用Excel软件，开发了计算建筑工程投票报价的方法。能提高编制速度。
- excel自定义函数在水质工作中的应用
简介：Excel是大家非常熟悉的应用软件，其使用非常方便。尤其是其强大的函数功能，为我们带来了极大方便，但有时我们为实现一项规定的功能，可能用到几个函数或者采用嵌套函数，这样应用起来，也不太方便；或者使用自定义公式进行计算，就没有现成的公式可用。可喜的是，我们可以创建自定义函数UDF(User—defined function)，它的运行与Excel中自带的函数完全相同。建立自定义函数有以下几个优点：建立自己特殊的功能和名称的函数；能将复杂的、嵌套的、多个原有的函数组合在一起，发挥更大的威力，使用、维护更加方便。
- Excel在水利设计中的几个应用
简介：介绍如何利用电子表格(Excel)进行各种水利计算，以达到高效准确、降低工作强度并提高设计质量的目的。并对利用电子表格开发解决设计工作中的其他问题提出设想。
- 隧道岩爆分析计算
简介：隧道岩爆分析计算 excel 表格
- 水利工程预算套价系统的编制一
简介：预算套价软件，是基于EXCEL平台之上，运用公式连接，实现智能化的计算方法。具体做法，根据给定的各项定额作出各项单价表，然后将单价表汇总，把汇总后的单价表作成数据库，再建立一个单价汇总表，用公式，实现单价汇总表中的各项数据与单价汇总表数据库的连接，各项汇总表也与其相对应的各项进行连接，从而实现数据共享，简化计算，修改方便，节省时间。
- 水利工程预算套价系统的编制二
简介： 预算套价软件，是基于EXCEL平台之上，运用公式连接，实现智能化的计算方法。具体做法，根据给定的各项定额作出各项单价表，然后将单价表汇总，把汇总后的单价表作成数据库，再建立一个单价汇总表，用公式，实现单价汇总表中的各项数据与单价汇总表数据库的连接，各项汇总表也与其相对应的各项进行连接，从而实现数据共享，简化计算，修改方便，节省时间。
- 水利工程预算套价系统的编制三
简介：预算套价软件，是基于EXCEL平台之上，运用公式连接，实现智能化的计算方法。具体做法，根据给定的各项定额作出各项单价表，然后将单价表汇总，把汇总后的单价表作成数据库，再建立一个单价汇总表，用公式，实现单价汇总表中的各项数据与单价汇总表数据库的连接，各项汇总表也与其相对应的各项进行连接，从而实现数据共享，简化计算，修改方便，节省时间。
- 充水式橡胶坝坝袋计算
简介： 充水式橡胶坝坝袋计算！EXCEL……
- Excel电子表格在机修水平梯田工程量计算的应用
简介： 如何计算水平梯工程量,看本文
- 钢材理论重量
简介： 钢筋理论重量速查EXCEL表（好全的，啥钢筋都有）
- 数值计算在三峡电厂尾水管施工中的应用
简介： 三峡左岸电站厂房14台机组水轮机，其轮廓为复杂的空间扭曲面，设计对尾水管成型精度要求又很高，从而使得模板设计、制作和安装难度加大，钢筋加工绑扎复杂，混凝土方量计算也较繁琐。运用AutoCAD Excel Au-toLISP和QBSASIC进行制图和计算，提高了计算速度和精度，取得了良好的效果。
- 隧洞设计
简介： 本软件是Excel电子表格式，内容：1、隧洞的水力计算 2、隧洞衬砌计算
- 离心泵并联运行工况点的数值求解
简介： 建立了求解多台不同型号离心泵并联运行工况点的数学模型，给出了用数值计算中的“二分法”求解该模型的方法，并附有用Excel计算的实例。
- 洛阳市下水动态之一
- 洛阳市下水动态之二
- 洛阳市下水动态之三
- 洛阳市下水动态之四
- 洛阳市下水动态之五
简介： 洛阳市地处洛阳盆地的西部，地下水开采量日益增大，造成盆地内区域性地下水位不断下降。1999年洛阳市规划在洛河洛阳市区段建立五级水面工程，目前已有三期水面工程建成蓄水。其拦水作用使本区水文地质条件发生重大变化，盆地部分地区地下水开始回升。为保护盆地的地质环境，合理开发利用地下水资源，需要研究地下水动态的规律，判断地下水水位的变化趋势，了解地下水资源的性质，并对可能发生的环境地质问题作出评价。本文在阐述洛阳市水文地质条件得基础上，利用48个观测孔的水位资料，分析了浅层地下水的动态特征。包括多年动态特征以及其空间分布、年内的动态变化特点。并利用excel做了水位动态的多元回归分析，用相关系数判断了影响因子的主次，通过逐步回归优化了方程，并研究了时间序列的自回归分析。
- 水利工程预算套价系统的编制
简介： 预算套价软件，是基于EXCEL平台之上，运用公式连接，实现智能化的计算方法。具体做法，根据给定的各项定额作出各项单价表，然后将单价表汇总，把汇总后的单价表作成数据库，再建立一个单价汇总表，用公式，实现单价汇总表中的各项数据与单价汇总表数据库的连接，各项汇总表也与其相对应的各项进行连接，从而实现数据共享，简化计算，修改方便，节省时间。
- VBA在水利工程断面图中的应用
简介： 鉴于在画断面图时不需要设计、思考，而许多工程设计单位要浪费大量的人力资源。为了节省劳动力并提高效率，开发出一套画图程序，来满足画断面图的需要。
在网易水利上找到的一篇文章，Excel VBA在工程测量上的应用。
下面是文章的简介：
- Excel是大家很熟悉的办公软件，相信大家在工作中经常使用吧。在测量工作中，你是否感觉到有很不方便的时候？比如，计算一个角度的三角函数值，而角度的单位是60进制的，此时，你一定感到很无奈，因为，Excel本身无法直接计算60进制的角度的三角函数！还有，如果你的工作表中有了点坐标值（二维或者三维），要在CAD中展绘出来，怎样才能又快又直接？不然，就只有拐弯摸角了，很痛苦啊！其实，只要对 Excel进行一些挖掘，就可以发现Excel的功能我们还没有好好的利用呢。Excel本身提供了强大的二次开发功能，只要我们仔细的研究，没有什么能难倒我们的。下面，好好笔者将带你走近Excel，认识它的强大的二次开发环境VBAIDE，用它来解决上面所提到的问题，就非常容易了。
全文请见：http://co.163.com/forum/content/1793_459145_1.htm
