发布于 2013-03-04 10:27:38
2楼
谢谢y侠,现在可以通过以太网把数据从EXCEL中写入PLC。但我现在又有了一个新的问题:传输速度好慢哪。下面是EXCEL中“CommandButton1”按钮的VBA程序:
Option Explicit
Private Sub CommandButton1_Click()
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD768,REAL,RW", Cells(4, 3), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD760,REAL,RW", Cells(3, 3), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD214,REAL,RW", Cells(5, 3), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VW138,INT,RW", Cells(6, 3), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VW140,INT,RW", Cells(7, 3), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD258,REAL,RW", Cells(9, 3), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD266,REAL,RW", Cells(10, 3), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VB1000,STRING,RW", Cells(3, 6), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VB1010,STRING,RW", Cells(4, 6), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VB1020,STRING,RW", Cells(5, 6), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD1030,DINT,RW", Cells(6, 6), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD1100,REAL,RW", Cells(7, 6), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD154,REAL,RW", Cells(9, 6), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD1034,REAL,RW", Cells(10, 6), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD1038,REAL,RW", Cells(11, 6), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD1042,REAL,RW", Cells(12, 6), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD1046,REAL,RW", Cells(13, 6), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD1050,REAL,RW", Cells(14, 6), "")
Call Excel.Application.Run("OPCS7200ExcelAddin.XLA!OPCWrite", "2:192.168.2.4:1011:1000,VD1054,DINT,RW", Cells(15, 6), "")
End Sub
虽然通过以太网(电脑到PLC通过网线直连,电缆长度大概3M)可以把数据写进去,但是速度太慢了,要大概用3分钟的时间!我用PPI电缆把上面的那些数据写入PLC只需要10秒左右,这是咋回事?以太网传输速度不是最高100M,最低也有10M;我用的PPI通信才用的9.6K,怎么以太网还不如PPI向PLC传的快哪?
技术论坛