作者kcyy (嫑槑)
看板Office
標題[算表] VBA另存成unicode檔
時間Tue Oct 16 18:54:52 2018
軟體: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://webptt.com/m.aspx?n=bbs/Office/M.1539687295.A.730.html
1F：→ soyoso: 如果無合適方式的話，可於activeworkbook上方加上 10/16 22:26
2F：→ soyoso: activesheet.copy 試試 10/16 22:27
3F：→ kcyy: 可以了，感謝協助 10/17 08:33