在Excel进行变压器优化的设计.pptVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
在Excel进行变压器优化的设计

变压器优化设计 目 录 一) Excel“宏”——VB编辑器 二)工作表与VBA程序间数据传递 三)VBA程序的编写方法 五)公共变量与局部变量 六)控件——窗体 七)控件工具箱 八)工作表起始运算 九)优化设计和人工调整 十)程序的验证 变压器优化设计 一) Excel“宏”——VB编辑器 在Excel用“宏”中的Visual Basic编辑器编写程序比在单元格中编写公式要直观、明晰、方便得多。不需要很多的Visual Basic知识就可以编写出应用很方便的程序来。 Visual Basic编辑器具有VB 的大部分功能。一般用VB编写的程序拷贝到Excel来只需修改一下与界面的传递方式即可运行。它也可像VB一样,通过“引用”导入其它驱动程序与其它Excel工作簿及各种数据库、AutoCAD等其它语言连接。控件工具箱也很丰富。 变压器优化设计 二)工作表与VBA程序间数据传递 1.使用单元格传递 界面传递给程序 UN = Range(G3).Value C1 = Range(G11).Value ‘ G——列,11——行 T$ = Range(“N” BBH).Value ‘ “N”——列,BBH——行(变量) 程序传递给界面 Range(E5).Value = U1 Range(H5).Value = XN Worksheets(单1).Range(AJ35).Value = GZ 变压器优化设计 2.使用控件传递 “窗体” 控件 变压器优化设计 “控件工具箱”控件 变压器优化设计 变压器优化设计 三)VBA程序的编写方法 在“宏”中的“Visual Basica编辑器”编写VBA语句 可以将VB程序拷贝过来稍加修改,也可另行编写。它可使用VB程序中InputBox和MsgBox输入、输出框,也可像VB程序那样读、存.TXT文件,还可通过ADO对象或ADO控件读、存数据库数据。 变压器优化设计 变压器优化设计 变压器优化设计 变压器优化设计 五)公共变量与局部变量 公共变量 用于整个工作表(对象模块)中的变量。如: Public N1, MSG 注意:常数、固定长度字符串、数组、自定义类型与 Declare 语句不能是对象模块中的 Public 成员。 局部变量 用于过程(事件)中的变量。如:Dim S$, A1$, PC(11) 字符串、数组等只可以成为局部变量。 变压器优化设计 六)控件——窗体 由“窗体”制作组合框 单击视图——工具栏——窗体,选中组合框。击右键选中,设置控件格式(如 用控件工具箱的组合框,它要在程序中设置控件格式)。 在B40:B41区域输入数据源,B46作为单元格连接,在另外指定的单元格如:B47中输入=INDEX(B40:B41,B46),在程序中它将数据源传递给字符: YS$ = Range(B47).Value 变压器优化设计 变压器优化设计 变压器优化设计 变压器优化设计 变压器优化设计 优化设计框图 变压器优化设计 七)在Excel上使用优化设计 通过Excel的“宏”只需少许修改就可将VB程序移植到Excel上,如下图: 变压器优化设计 变压器优化设计 九)程序的验证 在程序投入使用之前,必须对程序的可靠性和准确性进行验证。验证的方法是人工对计算结果进行重新计算审核,且对不同容量多个产品进行反复验证,才推广使用。 变压器优化设计 参考资料: 解答程序无法运行的一些问题 层间绝缘计算 变压器设计步骤 全文完 * * 在Excel上进行变压器优化设计 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. YHLX = Range(R10).Value If YHLX = 优化设计 Then CL = 0 Range(N14).Value = 正在进行优化计算,请等待。 Range(N15).Value = 0 End If Eva

文档评论(0)

jdy261842 + 关注
实名认证
文档贡献者

分享好文档!

1亿VIP精品文档

相关文档