[算表] VBA另存成unicode檔
軟體:EXCEL
版本:2010
請教大神,
我要將EXCEL檔另存成unicode檔,使用下列程式碼,執行時會有一個問題
如果將VBA程式碼設密碼保護
https://imgur.com/lX0c6WG.jpg

就會出現如下錯誤
https://imgur.com/xQRJFzN.jpg

但是VBA程式碼如果解開密碼保護,就能正確存檔,
請問要如何調整,才能不解開VBA程式碼的密碼,也能正確存檔呢?
謝謝
XPath = Application.ActiveWorkbook.Path
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Application.ActiveWorkbook.SaveAs Filename:=XPath & "\test.txt", _
FileFormat:=xlUnicodeText, CreateBackup:=False
Application.DisplayAlerts = True
Application.ScreenUpdating = True
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 61.216.164.223
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1539687295.A.730.html
→
10/16 22:26,
7年前
, 1F
10/16 22:26, 1F
→
10/16 22:27,
7年前
, 2F
10/16 22:27, 2F
→
10/17 08:33,
7年前
, 3F
10/17 08:33, 3F
Office 近期熱門文章
PTT數位生活區 即時熱門文章