發表文章

目前顯示的是 7月, 2021的文章

接種疫苗前後注意事項

因為7/30準備要打疫苗了,在網路上搜尋了一些資料,記錄在此方便查詢。 打完疫苗不能揉?錯訊息的更正 打疫苗前 攜帶身分證、健保卡雙證件 帶疫苗通知單或預約成功畫面截圖,作為證明施打資格。 可喝250cc溫開水,不建議劇烈運動,若有感冒症狀者,建議暫緩施打。 使用免疫抑制劑的人,應錯開服藥與打疫苗時間 不鼓勵飲酒。但目前沒有科學證據顯示打疫苗前,喝多少酒會干擾免疫功能。 打完疫苗後 不能揉或拍打施針處(有醫師更正),需在接種處所停留觀察30分鐘 盡量放鬆手臂並保持活動,以避免僵硬。 若出現嚴重過敏休克、劇烈頭痛、嚴重胸痛、呼吸困難、皮膚出現自發性血點等症狀,請盡速就醫。 盡量放鬆手臂並保持活動,以避免僵硬。 普拿疼服用時機,建議在施打疫苗 後出現發燒、頭痛等再服用。 (我打算白天有狀況時去到我常看的中醫,用中藥緩解。) 勿在施打疫苗前吃普拿疼 、退燒藥或抗組織胺藥物,以免掩蓋過敏症狀,延誤就醫。 不熬夜 睡滿七小時 打完第二劑的疫苗在兩周後才會有較完整的保護力 若身體出現副作用,代表身體正在產生抗體,相關症狀並不會傳染。 打完疫苗後的飲食注意事項: 溫開水, 一天建議喝2千cc 。 雞湯、魚湯:內含豐富胺基酸、精胺酸,能強健人體細胞和腸胃道。 鮭魚、 綠茶 、薑黃、莓果:為Omegs-3、多酚類,有助降低發炎情形。 十字花科蔬菜(花椰菜、青花菜、高麗菜、白蘿蔔、油菜):抑制自由基,保護細胞。 新鮮水果(芭樂、柑橘類、奇異果、蘋果等):內含植化素及維生素,可幫助抗氧化。 (關於這點我打算用高劑量的維生素C發泡錠,有長者打疫苗用這種方式說沒感受到太大副作用,也許是體質問題) 嚴重副作用 大面積的過敏搔癢、頭暈、 喘不過氣 、 超過2天 持續發燒等明顯症狀,建議就醫諮詢。 仍需遵守戴口罩、勤洗手、保持社交距離等防疫守則。 AZ疫苗的常見副作用有哪些? 第一劑接種後,主要副作用為 注射部位疼痛(58%)、 疲倦(52%)、 肌肉痛(48%)與頭痛(37%); 發燒18-49歲約32.7%、50-64歲約13.8%、65歲以上約4.6%, 並且不超過2天 第二劑接種後,主要副作用為 注射部位疼痛(45%)、 疲倦(25%); 發燒約佔3.0%。 常見不良反應低於第一劑。 Moderna疫苗的常見副作用有哪些? 第一劑接種後,主要副作用為 注射部位疼痛(18-49歲約81%、5...

Power Query_挑戰_參數函數

        目前開始學習關於  什麼時候要用each,什麼是要用_,甚至什麼時候用(C)=>,現在看還是有點玄,相關說明也不多,理解上還不是很不到位,但我感覺這是Power Query在使用上,是一個很重要關卡,學會了在處理查詢會精簡很多,使用上也會比較廣泛,在這裡先記錄一下,日後再來看多久學會。        在書上看到很多函數其實都有參數函數,那個是可以省略也可以使用(c)=>的方式。      下面就是微軟的資料,在這裡用來做個紀錄。 Table.AddColumn Table.AddColumn( table as table, newColumnName as text, columnGenerator as function, optional columnType as nullable type) as table 關於 將名為  newColumnName  的資料行新增至資料表  table 。 此資料行的值是使用所指定選取函式  columnGenerator  來計算 ,並將每個資料列視為輸入。 範例 1 將名為 "TotalPrice" 的資料行新增至資料表,其中每個值都是 [Price] 資料行和 [Shipping] 資料行的總和。 powerquery-m 複製 Table.AddColumn( Table.FromRecords({ [OrderID = 1, CustomerID = 1, Item = "Fishing rod", Price = 100.0, Shipping = 10.00], [OrderID = 2, CustomerID = 1, Item = "1 lb. worms", Price = 5.0, Shipping = 15.00], [OrderID = 3, CustomerID = 2, Item = "Fishing net", Price = 25.0, Shipping = 10.00] }), "TotalPrice", ...

VBA_批次刪除工作表

         本例使用dictionary方式記錄不刪的工作表,然後對檔案中所有工作表檢查,只要不符合就刪掉,用VBA刪除工作表可以不顯示工作表就刪掉,對於檔案瘦身挺好用,這裡還用到inputbox對近期兩個工作表以輸入的方式保留。(2-3個月沒寫,的確有點生疏)  Sub  批次刪除工作表()     '2021/7/12      Application.ScreenUpdating = False     Application.DisplayAlerts = False             Dim D_不刪          Set D_不刪 = CreateObject("scripting.dictionary")          Sh_當期 = InputBox("輸入當其表格名稱", , Format(Date, "yyyymmdd"))          Sh_上期 = InputBox("輸入當其表格名稱", , Format(Date - 7, "yyyymmdd"))          sh_不刪 = Array("月簡表", "簡表", "月比較A", "月明細", "周比較", Sh_當期, Sh_上期)          For i_sh = LBound(sh_不刪) To UBound(sh_不刪)         D_不刪(sh_不刪(i_sh)) = i_sh     Next        For i_sh = Sheets.Count To 1 Step -1         If D_不刪.exists(Sheet...

Power Query_00常用List 清單

下面介紹一下常用清單,日期清單的表達方式比較不一樣,當然表達方式也不是只有一種。( M語言函數大小寫要求很嚴格,須注意該大寫的地方要大寫。 )   日期清單: List.Dates(    #date(2021,6,28),7,#duration(1, 0, 0, 0)  )  ,從2021/6/28開始逐日遞增1日,建立七個值清單。 List.Dates(   Date.From( DateTime.LocalNow() ) ,7,  #duration( 1, 0, 0, 0)  ) , 從 今天 開始逐日遞增1日,建立七個值清單。 List.Dates(   Date.From(DateTime.LocalNow()) ,7,  #duration( -1 , 0, 0, 0)  ) , 從今天開始逐日 遞減 1日,建立七個值清單。 數字清單:{1..10},根據輸入開始的數字及結束的數字建立清單,本例與{1,2,3,4,5,6,7,8,9,10}結果依樣。 文字格式數字清單:{"1".."10"},與{"1","2","3","4","5","6","7","8","9","10"} 相同。 大寫字母清單:{"A".."Z"} ,建立A~Z 26個大寫字母清單。 小寫字母清單:{"a".."z"} ,建立a~z 26個大寫字母清單。 所有字母清單:{"A".."z"},建立包含大小寫的字母清單,與{ "A".."Z","a".."z" }結果相同。 中文清單: {"一".."龢"}  龢音同 和 , 會產生常用的中文,但並非所有中文字。

Power Query_00關於Buffer(2個月沒寫VBA了)

             對於使用Power Query有時很慢、卡住讓我有點困擾,因為在某種程度我認為Power Query比VBA快,而且在不同資料來源彙整上我還是偏好使用Power Query,研究了官方對於重複查詢的問題( 這裡 )還有用一些關鍵字( Ppwer Query Slow+ Table.Buffer、 List.Buffer、 Table.NestedJoin、Table.Combine ) 爬了國外的論壇,在Power Query有些情況變慢大概有些理解,在這裡就做個詳細記錄。       我本身非資訊背景,因此大部分資訊都是在網路上資源看到,在一些國外論壇或部落客大部分是建議以Table.Buffer及List.Buffer方式處理,但這種方式也不是完全有用,官方的建議 ( 這裡 )是建立資料流程封裝來源資料, 我的理解是將源頭資料比較大的,還有一些中間步驟有使用到比較複雜查詢時另外存檔 ,這樣後面的步驟在查詢時就不會讓前面的步驟一直讀取,如果來源資料很大,雖然你已經使用Table.Buffer及List.Buffer處理,他仍然會在讀取一次源頭(我觀察是這樣),如果沒用Bufferr就會讓讓讀取次數滾很多次。 Buffer 概念簡單說明一下, 這是我理解的,所以可能說明不是那麼正確,在Power Query中查詢表中的每一個步驟本身都是一個Table或List,如果某些步驟做了很複雜的查詢,這時下一個步驟要飲用時會建議使用Buffer的方式,讓他不會重新計算一次,而是指接引用Buffer裡面的結果,有大陸的網友以計算機的M功能做Buffer做解釋,感覺是幫助了理解。           就目前查詢到最常使用就是在Table.Comine 或 Table.NestedJoin之前先將相關的Table以Table.Buffer處理,List.Contains則是先用List.Buffer處理。         不過 最有效的方式就是資料流程的規劃 ,我有一個對同一資料做不同查詢再互相引用,未將步驟切開另外存檔時跑了20幾分鐘,切開後只要1分鐘內,這真...