不動產

  樞紐分析，把股票報酬率分成五組， 大漲超過6% 小漲超過2% 平盤2%到-2% 小跌超過-2% 大跌超過-6% 樞紐分析 先從範圍建立名稱 樞紐分析表欄位選單 EXCEL函數 =F230/F229-1 =IF($G230>6%,"大漲",IF($G230>2%,"小漲",IF($G230>-2%,"平盤",IF($G230>-6%,"小跌","大跌")))) =WEEKDAY(A230,2) IF巢狀函數 Rank PercentRank Min Max Median Match Index Count 以及過去學的Left, Mid, Right, Len。 資料表Table是連續範圍的儲存格資料。將格標放在資料表任何地方，Ctrl往上箭、Ctrl往下箭、Ctrl往右箭，格標跑到資料表的邊緣。 122影片樞紐分析

EXCEL函數IF,AND,OR =IF(AND(I2 J3),"買入",IF(AND(I2>J2,I3 MA20則買 FALSE AND函數 如果昨天MA5>今天MA20，今天則MA5 =IF(AND(I210J211),"買入",IF(AND(I210>J210,I211已經學的EXCEL函數 已經學的EXCEL函數 Rank PercentRank Min Max Median Match Index Count 以及過去學的Left, Mid, Right, Len。 資料表Table是連續範圍的儲存格資料。將格標放在資料表任何地方，Ctrl往上箭、Ctrl往下箭、Ctrl往右箭，格標跑到資料表的邊緣。 Rank PercentRank Min Max Median Match Index Count Left, Mid, Right, Len 利用MA5與MA20的穿越，判斷買賣點。 =IF(AND(I21J22),"買入",IF(AND(I21>J21,I22 85 及格 TRUE 60 及格 FALSE 15 當掉 TRUE 65 及格 =IF(A4>=60,"及格","當掉") AND(條件一,條件二) OR(條件一,條件二) IF(條件, 成立執行, 不成立執行) 資料表Data Table 資料表Table是連續範圍的儲存格資料。將格標放在資料表任何地方，Ctrl往上箭、Ctrl往下箭、Ctrl往右箭，格標跑到資料表的邊緣。 119教學影片 120教學影片 121教學影片

老虎頭 ...

程式碼 Sub 鮑薇安() ActiveSheet.Shapes.AddShape(msoShapeOval, 0, 0, 200, 200).Fill.ForeColor.RGB = RGB(255, 255, 0) ActiveSheet.Shapes.AddShape(msoShapeOval, 50, 50, 30, 20).Fill.ForeColor.RGB = RGB(0, 0, 0) ActiveSheet.Shapes.AddShape(msoShapeOval, 120, 50, 30, 20).Fill.ForeColor.RGB = RGB(0, 0, 0) ActiveSheet.Shapes.AddShape(msoShapeRectangle, 90, 80, 20, 50).Fill.ForeColor.RGB = RGB(0, 0, 255) ActiveSheet.Shapes.AddShape(msoShapeRectangle, 70, 150, 60, 15).Fill.ForeColor.RGB = RGB(255, 0, 0) End Sub

輸出 Public Sub 寶薇安率() Cells(1, 1) = "耶" Cells(1, 1).Font.Color = RGB(0, 0, 255) Cells(1, 1).Font.Size = 20 For i = 2 To 25 For j = 1 To 4 Cells(i, j) = (2010 + i) & "年" & j & "月" Next Next End Sub 心得

劉任昌程式碼 Public Sub 劉任昌第一個城市() '練習寫迴圈 VBA=Visual Basic Application 'Dim i, j As Integer j = 7 For i = 1 To 15 Cells(i, j).Value = i * i Next 'VBA迴圈的結束Next, C或Javascript {}定義迴圈範圍 'VBA程式語言寫Microsoft Office 巨集 Macro小程式 End Sub