一区二区三区成人-一区二区三区www-一区二区三区 日韩-一区二区日韩欧美-一区二区日韩精品中文字幕-一区二区日韩

2184263820
級別: 略有小成
精華主題: 0
發帖數量: 73 個
工控威望: 174 點
下載積分: -169 分
在線時間: 39(小時)
注冊時間: 2024-02-16
最后登錄: 2025-01-06
查看2184263820的 主題 / 回貼
樓主  發表于: 2024-05-07 20:47
Wincc-VBS讀寫Excel文件,從一個公眾號得到個好東西
作報表時可能需要對Excel文件操作,主要是外部的Excel文件讀寫和表格控件(用于制作日、月、年報表):Micrsoft Office Spreadsheet 11.0的讀寫。
1-讀寫外部Excel文件? ? ?
2- D盤新建excel文件,test.xlsx,通過以下VBS腳本對其進行操作??????
1.1-寫入數據??????
1.2-步驟:創建FSO對象、指定excel路徑、創建Excel對象、打開excel、讀寫excel并保存、關閉excel、退出excel程序、釋放對象
Sub OnLButtonDown(Byval Item, Byval Flags, Byval x, Byval y)                                  Dim?objFSO,objFile'1-創建objFSO對象,實現對文本/文件的操作Set objFSO = CreateObject("scripting.FileSystemObject")'2-指定文件路徑Set objFile = objFSO.GetFile("D:\test.xlsx")'3-創建excel對象Dim ObjExcelAppSet objExcelApp = CreateObject("Excel.Application")'4-打開路徑下的文件objExcelApp.Workbooks.Open?objFile
'5-對文件進行寫操作'向sheet1表格的第5行第5列寫入123 'sheet是工作表的名稱,也可使用 (1)來指定第一個工作表 objExcelApp.worksheets ("Sheet1").Cells(5, 5).VAlue = 123   objExcelApp.worksheets (1).Cells(5, 6).VAlue = 234   'objExcelApp.worksheets?("sheet1").Cells(5,?5).VAlue?=?HMIRuntime.Tags("變量1").read'保存objExcelApp.ActiveWorkbook.Save
'6-關閉excel文件objExcelApp.Workbooks.Close'退出excel應用objExcelApp.Quit'釋放Excel對象Set ObjEXceLapp = NothingMsgBox "寫入成功"End Sub


Wincc-VBS讀寫Excel文件.rar (1231 K) 下载次数:308
catywu
級別: 家園�?�
精華主題: 2 篇
發帖數量: 621 個
工控威望: 832 點
下載積分: 19883 分
在線時間: 549(小時)
注冊時間: 2007-08-19
最后登錄: 2025-01-02
查看catywu的 主題 / 回貼
1樓  發表于: 2024-05-08 17:39
感謝分享
往事如風
科技改變制造
級別: 網絡英雄

精華主題: 0
發帖數量: 11354 個
工控威望: 18733 點
下載積分: 12590 分
在線時間: 2705(小時)
注冊時間: 2013-01-31
最后登錄: 2025-01-04
查看往事如風的 主題 / 回貼
2樓  發表于: 2024-05-09 11:25
感謝分享
三人行者必有我師 ,擇其善者而從之
ljh_li
級別: 探索解密
精華主題: 0
發帖數量: 18 個
工控威望: 136 點
下載積分: 508 分
在線時間: 230(小時)
注冊時間: 2013-04-18
最后登錄: 2024-12-05
查看ljh_li的 主題 / 回貼
3樓  發表于: 52天前
謝謝分享

主站蜘蛛池模板: 欧美伊人久久久久久久久影院 | 日韩资源 | 99久久精品免费看国产高清 | tobu8中国在线播放免费 | 四虎国产精品视频免费看 | 国产99久久久国产精品成人 | 精品国产成人a区在线观看 精品高潮呻吟99AV无码视频 | 色狠狠色狠狠综合天天 | 1024亚洲精品国产 | 国产美女屁股直流白浆视频无遮挡 | 91影视永久福利免费观看 | 国产91精品久久久久久 | 青草园网站在线观看 | 交欧美 | 午夜熟女插插XX免费视频 | 手机看片自拍自自拍日韩免费 | 91精品综合| 国产精品久久久免费视频 | 国产欧美日韩免费一区二区 | 视频一区国产精戏刘婷30 | 亚洲精品一二区 | 亚洲第一综合网站 | 女仆掀起蕾丝裙被打屁股作文 | 无耻三级在线观看 | 18美女光胸光屁屁洗澡 | 国产精品第页 | 免费午夜网站 | 女主被当众调教虐np | 欧洲老太玩小伙 | 国产欧美va欧美va香蕉在线观 | 99久久免费国内精品 | 超高清欧美同性videos | 999资源站 | 丰满肥臀风间由美357在线 | 亚州vs欧州vs日 | 成版人快猫永久破解版 | 国产成人精品免费2021 | 黄a在线观看 | wwwav在线 | 成品人视频w免费观看w | 久久AV国产麻豆HD真实乱 |