• 歡迎訪問奇跡の海網站,本站不上傳任何資源,所有資源均來自于網絡,歡迎加入奇跡の海~!奇跡の海-WordPress QQ群
  • 本站下載資源為網絡上收集整理而來,并且以計算機技術研究交流為目的,版權歸原作者所有,僅供大家參考,學習,不存在任何商業目的與商業用途.
  • 本站系統鏡像均來自于官方原版,ed2k可視為P2P下載鏈接。所有操作系統默認均為試用版,如有正版密鑰可以有效激活,本站不提供任何激活和相關服務。

AutoIt3(au3)源碼-遍歷所在工作目錄中的工作薄并替換指定的字符

AutoIT3 奇跡の海 2年前 (2017-09-29) 954次瀏覽 已收錄 0個評論 掃描二維碼

AutoIt3(au3)源碼-遍歷所在工作目錄中的工作薄并替換指定的字符

簡介

遍歷所在工作目錄中的工作薄并替換指定的字符(不是整個單元格內容)

代碼

#include <Array.au3>
#include <File.au3>
#include <MsgBoxConstants.au3>
#include <Excel.au3>

    Local $aFileList = _FileListToArray(@ScriptDir, "*.xlsx")
Local $oWorkbook
    _ArrayDisplay($aFileList, "$aFileList")

Local $oExcel = _Excel_Open();靜默替換,這里參數設為0或者FALSE
If @error Then Exit MsgBox(16, "", "EXCEL對象創建失敗.")

For $i = 1 To $aFileList[0]
$oWorkbook = _Excel_BookOpen($oExcel, @ScriptDir & "\" & $aFileList[$i])
If @error Then MsgBox($MB_SYSTEMMODAL, "", $aFileList[$i] & "文件打開失敗 ")

_Excel_RangeReplace($oWorkbook, Default, Default, "工具", "yamakawa的杰作") 
;第三個參數你要替換的字符串
;第四個參數,替換后的文件


Sleep(1000)
_Excel_BookClose($oWorkbook)
Next
_Excel_Close($oExcel)
MsgBox(0,"","替換完成,請自行檢查!")

版權聲明:本站所有文章和資源使用CC BY-NC-SA 4.0協議授權發布 , 轉載應當以相同方式注明文章來自“SeaOMC.COM->AutoIt3(au3)源碼-遍歷所在工作目錄中的工作薄并替換指定的字符!在下邊可以分享本文哦!
喜歡 (0)
[]
分享 (0)
奇跡の海
關于作者:
一個WordPress菜鳥!
發表我的評論
取消評論

表情 貼圖 加粗 刪除線 居中 斜體 簽到

Hi,您需要填寫昵稱和郵箱!

  • 昵稱 (必填)
  • 郵箱 (必填)
  • 網址
中国福利彩票36选7开奖结果