指數變化(2023.12.08)
自己整理給自己勘,不作為投資理財參考
REVIEW上周紀錄:
上期 本期
美國密西根大學信心指數 61.3 69.4
美國首次申請失業救濟人數 219 220
美國ISM非製造業採購經理人指數 51.8 52.7
美國30年期房貸利率 最高 7.9 7.17
美國非農業就業人數變化 297 150
本周指數:
未來一周:
喜歡攝影的我,喜歡到處拍拍照,吃點當地的特色食物。 跟朋友聊天之餘,推薦我寫成網誌跟大家分享。 沒外出的日子,喜歡在家當隱性宅,寫程式看看書,追劇。 希望我的手札文,不會讓你翻桌 XD
指數變化(2023.12.08)
自己整理給自己勘,不作為投資理財參考
REVIEW上周紀錄:
上期 本期
美國密西根大學信心指數 61.3 69.4
美國首次申請失業救濟人數 219 220
美國ISM非製造業採購經理人指數 51.8 52.7
美國30年期房貸利率 最高 7.9 7.17
美國非農業就業人數變化 297 150
本周指數:
說明一次寫入與copy 方式時間差距:
Sub CommandButton1_Click()
Debug.Print "陣列大量資料寫入"
t = Timer
DD = ActiveSheet.Range("A1:E1337")
Debug.Print "資料筆數" & Application.CountA(DD)
Sheets(2).Range("A1:E1337") = DD
Debug.Print "花費時間" & Timer - t
Debug.Print "copy 資料寫入"
t = Timer
ActiveSheet.Range("A1:E1337").Copy Sheets(2).Range("A1")
Debug.Print "花費時間" & Timer - t''
DD = Array(1, 2, 3)
ActiveSheet.Range("h1:j1") = DD
Debug.Print "一維陣列不支援不連續"
ActiveSheet.Range("h3,i3,l5") = DD
End Sub
資料分散時怎辦?
用FOR EACH IN,於不連續儲存格寫入技巧,解說SET物件的技巧
Sub 寫入陣列到儲存格a()
Dim 資料陣列 As Variant
Dim i As Integer
' 將資料存入陣列
資料陣列 = Array(1, 2, 3)
' 將設置 range 物件
Set myrange = ActiveSheet.Range("a1,b3,a10")
i = 0
For Each a In myrange
ActiveSheet.Range(a.Address).Value = 資料陣列(i)
i = i + 1 '
Next
End Sub
指數變化(2023.11.24)
自己整理給自己勘,不作為投資理財參考
REVIEW上周紀錄:
前期 本期
臺灣外銷訂單年增率 臺灣外銷訂單11/20 -15.6 -4.6
臺灣貨幣供給額M1B(期底)年增率 11/24 3.33 3.03
美國首次申請失業救濟人數 11/23 209 233
美國耐久財訂單月增率 11/22 4.0 -5.4
美國芝加哥FED景氣指數 11/21 -0.49 -0.02
美國30年期房貸利率 11/22 7.61 7.41
本周指數:
表1.周表現整理
指數變化(2026.07.31) 開始透過AI做整理 一、上周焦點: 7/27 美國 耐久財訂單(6 月) - 全部耐久財訂單月增 0.3%,結束前一月 -4.0% 的跌勢,增幅低於市場預期約 1.8%。 - 核心耐久財(扣除運輸設備)約月增 0.6%,顯示一般設備需求溫...