博图wincc使用EXCEL编辑结构变量

精

奖

官

3131 产品版区：STEP 7(TIA 博途)

文档类型：问题类别：产品选型问题类别：产品使用问题类别：故障诊断

由于使用博图Wincc 监视第三方PLC，走OPC协议，而我在建立变量时要使用到结构变量，在使用EXCEL编辑变量表时，发现结构变量无法编辑，不知道有没有哪位大神遇到过这样的问题，怎么解决的。

问题补充：

扫码小程序：

一键登录查看全部问答

Shiloh2018 中级技术员

被采纳率 8.57%

问题为何被关闭

分享

手机扫码追踪该问题，
觉得实用，立即去分享！

点击复制链接
举报

去论坛讨论

结构变量都是自己用EXCEL编写代码来自动生成的，其实简单的很。我给你个我弄的参考仅中间的数据代码需要前面和后面添加相关的代码
Sub 生成AI参数DB块()
Dim I As Integer
''采用结构体
''清空表格
Sheets("AI参数DB块").Cells.Clear

For I = 1 To Sheets("AI参数").Cells(I + 2, 21)

         ''----------------------------------------------------------------------------
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 1, 1) = Sheets("AI参数").Cells(I + 1, 2)
              ''-----------------------------------------------------------------------------
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 2, 1) = "       :STRUCT//" & Sheets("AI参数").Cells(I + 1, 5)
          ''-----------------------------------------------------------------------------
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 3, 1) = "             H:REAL:="
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 3, 2) = Sheets("AI参数").Cells(I + 1, 6)
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 3, 2).NumberFormat = "0.00E+00"
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 3, 3) = ";//"
          ''----------------------------------------------------------------------------------
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 4, 1) = "             L:REAL:="
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 4, 2) = Sheets("AI参数").Cells(I + 1, 7)
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 4, 2).NumberFormat = "0.00E+00"
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 4, 3) = ";//"
          ''-----------------------------------------------------------------------------------
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 5, 1) = "             OFF:REAL:="
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 5, 2) = Sheets("AI参数").Cells(I + 1, 8)
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 5, 2).NumberFormat = "0.00E+00"
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 5, 3) = ";//"
          ''-----------------------------------------------------------------------------------------
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 6, 1) = "             DIP:BOOL:="
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 6, 2) = Sheets("AI参数").Cells(I + 1, 9)
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 6, 2).NumberFormat = "0.00E+00"
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 6, 3) = ";//"
          ''------------------------------------------------------------------------------------------
          Sheets("AI参数DB块").Cells((I - 1) * 7 + 7, 1) = "        END_STRUCT;"