Board logo

標題: 請問為何會出現以下訊息呢? [打印本頁]

作者: alex_wu    時間: 2012-8-3 18:32     標題: 請問為何會出現以下訊息呢?

目前小弟在書寫初階VBA程式時,用了一些錄製的功能.
寫了一個將EXCEL內的資料, 另存成文字檔的功能.
但是當我將VBA程式加密時,卻秀出附件之訊息.
但是解密時卻又正常 , 想問一下真的是加密造成嗎?
若是的話 , 有辦法解決嗎?

=============以上省略============
Output


End Sub
___________以上為另一個巨集___________
Sub output()

OUTPUT_Folder2 = Sheet1.Range("F5")
PN2 = Sheet1.Range("F3")

    Sheets("CO GERBER").Select
    ActiveWorkbook.SaveAs Filename:=OUTPUT_Folder2 & PN2 & "-CO GERBER.prn", FileFormat _
        :=xlTextPrinter, CreateBackup:=False
===============以下省略==================
作者: kimbal    時間: 2012-8-4 17:04

看看放檔案的文件夾是否存在 或錯位置
作者: lalalada    時間: 2012-8-5 01:04

回復 1# alex_wu

也有可能是已經有同名文件存在
此時也會發生錯誤~
如果想要讓同名文件存在時直接覆蓋
可以使用
on error resume next
另外如果不想要他一直問是否覆蓋
就再加上 application.displayalerts = false
以上希望對你有幫助!




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)