EXCEL VBA檔案另存成PDF,另存成XLSX加密碼

 

Function saveFile_13(name, month)

Dim RS As New ADODB.Recordset

    sPath = ThisWorkbook.Path

    Sheets("13").Select

    

    Application.ScreenUpdating = False

         X="A1234567890"

        If Len(Trim(X)) > 0 Then

          

                Application.DisplayAlerts = False


                pw = Left(X, 1) & Right(X, 5)

                

                '另存成PDF

               'Sheets("13").ExportAsFixedFormat Type:=xlTypePDF, Filename:=sPath & "\" & Replace(name, "*", "") & "_" & month & "個月.pdf"

                '另存xlsx

                 Worksheets("13").Copy

                 ActiveWorkbook.SaveAs Filename:=sPath & "\" & Replace(name, "*", "") & "_" & month & "個月.xlsx", FileFormat:=xlOpenXMLWorkbook, Password:=pw

                ActiveWorkbook.Close

             Application.DisplayAlerts = True

          End If

    saveFile_13 = Replace(name, "*", "") & "_" & month & "個月.xlsx" & "," & pw

    Application.ScreenUpdating = True

End Function


留言

張貼留言

這個網誌中的熱門文章

java 數字轉字串 字串轉數字

1. 數字轉字串 1-1 整數轉字串                int i = 7; String s = Integer.toString(i); or String s = "" + i; // 直接強制轉型 1-2  長整數轉字串 long x=10; String s = Long.toString(x); 1-3  雙精度數字轉字串 double x=10;                String s = Double.toString(x);     1-4 浮點數字轉字串 float x=10; String s = Float.toString(x); 2. 字串轉數字 2-1 字串轉整數 String str = "10"; int i = Integer.valueOf(str).intValue();  // 第一種方法 int j = new Integer(str).intValue(); // 第二種方法 int k = Integer.parseInt(str);  // 第三種方法 2-2 字串轉雙精度數字 double d = Double.valueOf(str).doubleValue(); 2.3 字串轉長型態數字                long l = Long.valueOf(str).longValue(); or long l = Long.parseLong(str); 2.4 字串轉浮點型態數字                float f = Float.valueOf(str).floatValue();
閱讀完整內容

MS sqlServer資料庫移轉至MySQL-->利用MySQL WorkBench

圖片
1.下載MySQL WorkBench並安裝。網址 http://www.mysql.com/products/workbench/   WorkBench開啟後執行畫面 2.執行[Database Migration] MySQL沒有內建各資料庫的DRIVER，是透過ODBC來轉資料庫，所以在轉換前要先設定來源資料庫的ODBC。 3.設定完ODBC連線後點選[Start Migration]，開始轉換資料庫步驟。 4.設定來源資料庫的連線資料，要轉換的資料庫名稱也要輸入，免得原本MSSQL的資料庫太多而造成後續轉換出現題，設定完後按[Next]。 5.設定目的地MySQL的連線參數 6.下一步，取得來源資料庫的Table schema。基本上不會有什麼問題，如果出現錯誤可能是在設定來源資料庫時沒有指定DATABASE造成。 7.選擇要轉換後MySQL的schema 8.下一步，轉換檢查 9.下一步，Show出來源資料庫的Object，如果有要修改選取的物件,可以在這裡增刪 。 10.下一步，開始轉換 11.手動修改轉換的指令(如果有需要) 12.下一步 13.建立目的地的資料庫，如果有驚嘆號出現,要看一下LOG出現什麼訊息。 14.轉換結果 15.下一步 16.下一步，開始轉換資料庫 17,轉換結果報表 18.結束
閱讀完整內容

sql server 15023 error [SQL SERVER問題: 使用者、組或角色 '*****' 在當前資料庫中已存在]

一般在建立使用者時即可指定使用者的對應，如果使用者建立後，才發現無法利用 Management Studio 調整對應(出現 錯誤：15023)可以利用下面的 指令 調整  Use [myDB資料庫名稱] go sp_change_users_login 'update_one', ' DBuser( 資料庫使用者) ', ' PowerUser( 系統登入的使用者) ' 將myDB資料庫的使用者 DBuser 對應到-->系統登入的使用者 PowerUser ，也就是說 PowerUser 登入系統後，對於資料庫(例如myDB) 的存取權限就相當於 DBuser!
閱讀完整內容