發表文章

Openai的ChatGPT果然厲害_初次使用

圖片
          今天註冊了chatGPT,看看現在最夯的機器人能做什麼,的確是有利害,我讓chatgpt寫一個VBA,他很快就寫出來,這讓原本要自己寫的代碼可以很快的完成一個初稿、模型,之後只要微調就好。              後來我又請他用Bat寫一個備份的code,雖然反映有慢一點點,但也比自己上google搜尋相關語法要快,在這個ai的時代,能節省時間就要好好節省。           ChatGPT_中文也通 中英文夾雜交代寫VBA ChatGPT寫的VBA ChatGPT寫的VBA還告訴你哪裡要修改 ChatGPT寫的VBA Sub MergeExcelFiles()     Dim wbDest As Workbook     Dim wbSource As Workbook     Dim strFolder As String     Dim strFile As String     Dim lngFileCounter As Long     ' Change the folder path to match your environment     strFolder = "C:\Users\UserName\Documents\ExcelFiles\"     ' Create a new workbook for the merged data     Set wbDest = Workbooks.Add     ' Loop through all the files in the folder     strFile = Dir(strFolder & "*.xlsx")     Do While strFile <> ""        ...

更換手機

先複製舊手機資料到新手機  因為都是使用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 + ...

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