更換手機

先複製舊手機資料到新手機

 因為都是使用sony 所以複製程序很容易理解,新手機會自動尋找舊手機

(照片跟影片移到SD卡就略過這部分的複製)

轉移Google Authenticator帳號

Authenticator 匯出帳戶 必須驗證身分，這裡的密碼是 手機本身的 PIN碼(螢幕鎖定密碼)

轉移line

1.line變更密碼前也會讓你輸入 PIN碼(螢幕鎖定密碼)

密碼設定要有英文大小寫跟數字

2.LINE App「12.10」最新版本。設定選單新增「以行動條碼移動帳號」的新功能。

這次我使用掃描條碼方式

IB轉移

1.轉移時會傳送一組驗證碼到你的手機，這時還是會要你輸入 PIN碼(螢幕鎖定密碼)

2.有一個更改設備那邊點選就可以轉移(在新手機那邊)

-----

上一支sony手機2018/11 /27算是使用了4年也可以了

VBA_反樞紐

             在工作上看過很多人習慣用表格呈現資料，不過不是以樞紐表，而是用輸入的方式，這在分析運用上很沒彈性，剛好有一個表格要資料化，本來想用Power Query處理，後來還是決定寫VBA，避免Power Query會一直重複查詢，而且很多人喜歡把不同部門資料放在同一個工作表內，這時還是用VBA比較快。

           在家裡弄了個簡單版，隔天上工可以快速修改用上。

Sub A0_反樞紐()

    '2022/11/24 22:35

    Dim arr_資料()

    With ActiveSheet

        br = 3

        lr = .Cells(br, 1).End(xlDown).Row

        lc = .Cells(br, 1).End(xlToRight).Column

        n = 0

        For i = br To lr

            in_代碼 = .Cells(i, 1)

            in_名稱 = .Cells(i, 2)

            For c = 1 To 16 '12個月+4季

                in_月份 = .Cells(1, c * 2 + 1)

                in_噸數 = .Cells(i, c * 2 + 1)

                in_金額 = .Cells(i, c * 2 + 2)

                

             n = n + 1

             ReDim Preserve arr_資料(1 To 5, 1 To n)

             arr_資料(1, n) = in_代碼

             arr_資料(2, n) = in_名稱

             arr_資料(3, n) = in_月份

             arr_資料(4, n) = in_噸數

             arr_資料(5, n) = in_金額

            Next

        Next

    

        .Range("A19").Resize(n, 5) = Application.Transpose(arr_資料)

    

    End With

End Sub

• 很多人喜歡用的表格方式，這裡簡單的表達一下

類樞紐表格

• VBA執行完就能呈現如下面的資料

表格資料化

• 執行完作了個驗證，確認資料正確

比對資料

Power Query_避免重複查詢_Power BI desktop版

 

• 如果沒有強大的電腦資源，處理太大量資料
• 避免重複查詢(Desktop版無法像excel版分檔處理)

        大約10月中在現在的公司開始在使用Power Query，因為excel版本不夠，所以使用desktop版，不過在使用上發生了瑕疵，筆電的資源不足，跑10萬筆以上資料就開始會鈍，在假日時好不容易花了1小時用了複雜查詢，在存檔時也花了1小時，一度要放棄存檔...

       有一句名言當你得不到你想的到的東西時，你會得到經驗，這次我真的是得到經驗了，我花了點時間，將資料比較多的部分改成用SQL擷取，而且是分段處理，因為我在用SQL時如果用比較複雜的子查詢也是卡住，人生不該把時間放在等待...

固定資產_驗收資料核對_主要使用VBA

        這幾天比對驗收報告及財產清冊原本使用Power BI的 Power Query處理，發現無法全部直接對上，後來單純比對品號及品名時發現可能的問題，現在想想這種無法完全1對1的還是要用VBA處理比較快速。

        在電腦效能不夠強的情況下，VBA還是有優勢，不過Power BI+SQL在不夠了解狀況下還是有一定的掃盲，只是SQL跟Power Query 在今天(2022/11/9)讓我的新筆電卡住了。

         VBA將兩份數據做1對1的比對還是耗比較少資源，把兩份數據分別丟進陣列中，對記憶體的使用比SQL跟PQ要少些，PQ很容易一直載入，存檔時跟完成新步驟時都會。SQL則是在子程序卡住了。不過用法上PQ跟SQL還是簡單些。

PS.VBA還沒寫，先記錄，下次比較容易完成。

狀況:

• 有條件驗收日
• 正常驗收日
• 其他驗收日(未知)
• 品號無法對應(某一方未輸入)
• 品名無法對應(財產清冊品名與驗收報告不同)
• 有驗收但不在財產清冊上 VS 財產清冊上有但驗收報告上無(有可能自製入庫)
• 為了支付供應商款項提前領用備品...(每間公司狀況不同)

篩選條件:

• 自製入庫的品號_SQL
• 驗收報告整理_SQL
• 財產目錄(全部)

主要處理方式:1對1

使用VBA，完全比對之後再模糊比對

以前使用過的地方:

• 比對運費
• 二十大營運分析 (費用對應)
• 附註費用

Power BI Desktop無法解除安裝

            前兩天要將家裡舊版Power BI Desktop解除安裝，竟然發生失敗，這個去年在A公司時也發生過，那時我還問公司資訊，不過A公司資訊對於對於Power BI不熟，所以我也放棄安裝新版Power BI。

       這次再發生同樣事情，我就開始猜是不是有什麼原因，於是我猜是因為我解除的同時開著excel，關掉excel 仍然一樣無法解除，於是我關掉另一個office的軟體 word，這次終於能解除了。

      在A公司我是Excel重度使用者所以我沒有發現原因，還以為是電腦舊了，但同樣的狀況在不同地方發生，我就往開啟的程式猜，竟然猜中...，順利安裝新版Power BI。

winRAR解壓縮失敗_No archives found

 

       最近一個壓縮檔用RAR解壓縮，出現No archives found，因為檔案是我壓縮的，所以我知道內容沒問題，後來查了google發現可以用7-Zip方式解壓縮，下載了最新版的7-zip真的解開了。

winRAR解壓縮失敗_No archives found

縮小excel檔案大小_xlsb二進位工作表

           會注意到xlsb這個檔案格式，一開始是請資訊(C公司)幫忙撈報表資料時，都是用xlsb的格式提供，有次看資料量有幾萬筆，但是檔案不大，開始了解xlsb這個格式，發現有它的優缺點。

搜尋相關資訊可以發現一些資料大概說明如下:

Excel是將資料內容儲存成了XML格式的檔案，而.xlsb格式不包含xml。

xlsb格式的優點：

檔案更小。

• xlsb的檔案小，對保存大Excel檔很有用。
• 打開和保存的速度更快。
• EXCEL直接使用二進位工作表比xlsx檔速度更快。

.xlsb格式的缺點：

 安全性。

• 對於XLSX/XLSM格式而言，我們可以輕易分辨哪些檔案帶有巨集，哪些沒有。如果用XLSB格式，無法知道這個檔案是否帶有巨集。(2003版的excel也是會有這問題)
• Power Query無法支援XLSB。如果要用Power Query，在舊版的excel跟 power query不支援xlsb，但是新版的power bi  跟 office 365 可以用power query開啟xlsb的檔案。

如果有使用excel外部連結方式，測試結果是可以把xlsb當一個小的資料庫，用sql連結撈取資料。

• 下面可以看出同樣檔案用xlsb儲存，大小會變成1/3

二進位工作表(縮小excel檔案)