如何修复ie-cs3中文版免费下载

excel dde
2023年4月1日发(作者:linux是什么系统)

实用文档

1、DDE简介

动态数据交换(DDE)是基于Windows的消息机制,两个Windows应用程序通过相互之间传递消息进行“对话”,

这两个程序被分别称为“服务器”和“客户”。DDE服务器是一个维护着其他Windows程序可能使用的数据程序,而DDE

客户则是从服务器获得这些数据的程序。

DDE对话是由客户程序发动的。客户程序将一条称为WM_DDE_INTITIATE的消息发给当前运行的所有Windows程

序,这条消息指明了客户程序所需要的数据类别,拥有这些数据的DDE服务器可以响应这条消息,这样一个对话就开始

了。

DDE的对话方式有3种:①服务器数据变化时,直接把数据送给客户,由客户对这些数据进行处理,这类对话方

式称为热链;②服务器的数据变化时,服务器通知客户,再由客户取数据,这种方式称为温链;③由客户申请数据、

服务器发送数据的方式称为冷链。

一、Wincc作为DDE的客户端,Excel作为DDE服务器(本地)

1、在变量管理上按鼠标右键--添加新的驱动程序--选“”

图1

2、在DDE上按鼠标右键--新驱动程序连接--点属性,在其连接属性中:

“计算机名称”为空;“应用程序”为excel;“主题”为[]工作表名,比如[]sheet1。

实用文档

图2

3、在DDEexcel下建变量,在变量属性中选择地址,条目名称填:r行数c列数,比如r1c1(表示第一行

第一列的单元格),重复步骤3可以加入更多的DDE变量

图3

4、Excel程序

图4

Wincc程序

图5

5完成

实用文档

用OPC做比较省事。

WinCC做OPCServer,Excel做OPCClient。

这种情况下,WinCC端不需要做任何设置,只要在Excel里用少量的代码就能实现双方的通讯。

对于WINCC与S7-300的通讯,首先要确定PLC的通讯口类型,PLC一般都集成了MPI/DP口,还可以安装通讯模块。计

算机(PC)上安装适当的通讯卡(不同的通讯卡支持的通讯协议不同)。看你需要啦!

其次是WINCC软件里的通讯协议要与PC机对应。WINCC提供了SIMATICS7PROTOCOLSUITE通讯驱动程序,包含

了多种通讯协议!

最终还有自己亲自实际操作了才有深刻的了解的!!

SubX6309X94AE9X0000X6539_OnClick(ByvalItem)

Dimfso,myfile

Setfso=CreateObject("stemObject")

SetMyFile=e("d:")

DimObjExcelApp

SetobjExcelApp=CreateObject("ation")

'e=True

File

'上面的程序段是为了打开d盘下叫名字的excel文件

eets("sheet1").Cells(1,1).VAlue=("usercodenew1").read

'上面两行的作用是将wincc变量"usercodenew1"的值写到Excel表中的A1格子里面,并且保持一下

Dimcoldold

Setcoldold=("usercodeold1")

=eets("sheet1").Cells(1,1).value

'上面这两句的作用是将刚才保持到Excel表格中的数据重新读回wincc,存到"usercodeold1"变量中,当然现在其实并

没有存入"usercodeold1"变量,只是存在了叫coldold的临时变量里面

SetObjEXceLapp=Nothing

'到这里为止,我们可以通过上面的语句关闭刚才打开的excel程序了

'最后是把读到的excel值从临时变量coldold中写入它对应的"usercodeold1"变量中

EndSub

实用文档

上面这个例子已经调试通过。网上有很多wincc值写入excel中的例子,一直找不到从excel中读取数据到wincc中的

例子,结合网上朋友的一些经验,这里给出个小例子,供大家参考。

估计考虑到后些天要用到EXCEL与WINCC的通讯,我看了些

书,在西门子的论坛上看到了一个现场做好的通讯成功例子.通过自己来做,通讯

成功.

例子地址:/club/bbs/?b_id=5&a_i

d=53940&s_id=0&num=49#anch

现总结一下:

1WINCC作为OPC服务器,勿需添加OPC通道.在例子中,只在内部变量中,建立6

个内部变量,内部变量为有符号的16位数,名称分别为,a,b,c,d,e,f.(当然如果

身边有PLC在,可以建立过程变量,为了方便运行,建立内部变量),分别在

a,b,c,d,e,f中的限制/报表中,设置其开始值,为1,2,3,4,5,6.

注意:计算机-->属性中的计算机名称要与本计算机名称一致

在WINCC中建立一页面,用按钮来改变a,b,c,d,e,f的值,如果通讯成功,在

EXCEL中也会随之改变.

2新建立一个EXCEL文件,打开文件,工具-->宏-->VB编辑器,打开EXCEL的VB

编辑器.

3在VB编辑器里,工具-->引用,在弹出窗口中,找SiemensOPCDAAutomation

2.0,勾上:)

4双击sheet1,打开sheet1的代码窗口,然后将程序(程序代码在页面的最后)复

制到代码窗口.

5在EXCEL的上分别对应

C2-->计算机名C3-->aC4-->bC5-->cC6-->dC7-->eC8-->f

6在EXCEL总,工具-->宏,选择lient,启动

7完了

代码:

OptionExplicit

OptionBase1

ConstServerName=""

DimWithEventsMyOPCServerAsOPCServer

DimWithEventsMyOPCGroupAsOPCGroup

DimMyOPCGroupCollAsOPCGroups

DimMyOPCItemCollAsOPCItems

DimMyOPCItemsAsOPCItems

DimMyOPCItemAsOPCItem

DimClientHandles(6)AsLong

DimServerHandles()AsLong

DimValues(1)AsVariant

DimErrors()AsLong

DimItemIDs(6)AsString

DimGroupNameAsString

DimNodeNameAsString

Dimitemv(6)AsVariant

DimiiAsInteger

实用文档

'-------------------------------------------------

--------------------

'SubStartClient()

'目的:连接至OPC_server,创建组和添加条目

'-------------------------------------------------

--------------------

SubStartClient()

'OnErrorGoToErrorHandler

'-----------可以自由选择ClientHandle和GroupName

Forii=1To6

ClientHandles(ii)=ii

Nextii

GroupName="MyGroup"

'-----------从单元“A1”得到ItemID

NodeName=Range("c2").Value

ItemIDs(1)=Range("c3").Value

ItemIDs(2)=Range("c4").Value

ItemIDs(3)=Range("c5").Value

ItemIDs(4)=Range("c6").Value

ItemIDs(5)=Range("c7").Value

ItemIDs(6)=Range("c8").Value

'-----------得到一个OPC服务器的实例

SetMyOPCServer=NewOPCServer

tServerName,NodeName

SetMyOPCGroupColl=ups

'-----------为添加组设置缺省的激活状态

tGroupIsActive=True

'-----------添加组至收集

SetMyOPCGroup=(GroupName)

SetMyOPCItemColl=ms

'-----------添加一个条目、返回ServerHandles

ms6,ItemIDs(),ClientHandles(),ServerHandles(),

Errors

'-----------用于接受不同的信息组

cribed=True

ExitSub

ErrorHandler:

MsgBox"Error:"&ption,vbCritical,"ERROR"

EndSub

'-------------------------------------------------

--------------------

'SubStopClient()

'目的:从服务器释放对象并且断开连接

'-------------------------------------------------

实用文档

--------------------

SubStopClient()

'-----------释放组和服务器对象

All

'-----------与服务器断开连接并且清除

nect

SetMyOPCItemColl=Nothing

SetMyOPCGroup=Nothing

SetMyOPCGroupColl=Nothing

SetMyOPCServer=Nothing

EndSub

'-------------------------------------------------

--------------------

'SubMyOPCGroup_DataChange()

'目的:组中的数值、质量或时间标志改变时,该事件激活

'-------------------------------------------------

--------------------

'-----------如果OPC-DAAutomation2.1被安装,使用:

PrivateSubMyOPCGroup_DataChange(ByValTransactionIDAsLong,ByVal

NumItemsAsLong,ClientHandles()AsLong,itemvalues()AsVariant,

Qualities()AsLong,TimeStamps()AsDate)

'-----------设置数据表单元值为数值读

Forii=1ToNumItems

itemv(ClientHandles(ii))=itemvalues(ii)

Nextii

Range("d3").Value=/qz.q/CStr(itemv(1))

Range("d4").Value=/qz.q/CStr(itemv(2))

Range("d5").Value=/qz.q/CStr(itemv(3))

Range("d6").Value=/qz.q/CStr(itemv(4))

Range("d7").Value=/qz.q/CStr(itemv(5))

注意:excel启动宏之前先启动WINCC运行。

在本实例中,将在MicrosoftExcel中使用VisualBasic编辑器创建一个OPCDA

客户机。OPCDA客户机读取WinCCOPCDA服务器的WinCC项目中的一个WinCC

变量,并将值写入单元格中。如果在单元格中输入一个新值,该值将会被传送到

WinCCOPCDA服务器。

实用文档

需要一台上面同时安装了WinCC和MicrosoftExcel的计算机来设置连接。

组态步骤

在MicrosoftExcel中需要进行下列组态:

1.在MicrosoftExcel的VisualBasic编辑器中创建一个OPCDA客户

引言

要将MicrosoftExcel用作OPCDA客户机,必须在MicrosoftExcel的Visual

Basic编辑器中创建相应的脚本。

要求

如何在MicrosoftExcel中使用VisualBasic编辑器的基本知识。

步骤

步骤

1打开MicrosoftExcel,将出现新的工作簿。

2在“工具”菜单中,选择“宏”“VisualBasic编辑器”。这将启动Microsoft

Excel的VisualBasic编辑器。

3在“VisualBasic编辑器”的“工具”菜单中选择“引用...”。出现标题

为“引用-VBAProject”的对话框。在可用参考的列表中找到条目“Siemens

OPCDAAutomation2.0”。标记相应的复选框。单击“确定”。

4单击此处。复制脚本。该脚本仅在在线帮助中可用。

5双击VisualBasic编辑器项目窗口中的“Sheet1”,打开新的代码窗口。

6将脚本粘贴到代码窗口中。

7从“文件”菜单中选择“保存”。从“文件”菜单中选择“关闭并返回到Microsoft

Excel”。

2.在MicrosoftExcel中组态对一个WinCC变量的访问

引言

实用文档

ExcelOPCDA客户机读取WinCCOPCDA服务器的WinCC变量并将变量值写入单

元格中。在WinCCOPCDA服务器的WinCC项目中,变量值显示在一个I/O域内。

如果单元格中的变量值改变,则在WinCCOPCDA服务器I/O域中的数值也随之

改变。

先决条件

在WinCCOPCDA服务器的WinCC项目中,组态名称为“OPC_Excel”,数

据类型为“有符号16位数”的内部变量。

将“OPC_Excel”变量的数值写入WinCCOPCDA服务器的WinCC项目的

I/O域内。

启用WinCCOPCDA服务器的WinCC项目。

步骤

步骤

1在MicrosoftExcel的单元格A1中,输入用作OPC服务器的计算机名称。

在单元格A2中,输入变量名称“OPC_Excel”。

2在Excel的“工具”菜单中,选择“宏”“宏...”。出现“宏”对话框。

从宏列表中选择条目“lient”。单击“运行”以启动OPC客

户机。

3在单元格B2中写入变量的数值,在C2中写入质量代码,在D2中写入时间

标志..

4在单元格B3中输入新的数值。更改后的数值将显示在WinCCOPCDA服务器

上的I/O域内。

5在Excel的“工具”菜单中,选择“宏”“宏...”。出现“宏”对话框。

从宏列表中选择条目“ient”。单击“运行”停止OPC客户

机。

更多推荐

excel dde