不動產天王

教學影片125 股票圖,IF函數,AND函數 勤業眾信聯合會計師事務所 356 資誠聯合會計師事務所 214 安侯建業聯合會計師事務所 207 安永聯合會計師事務所 90 電子零組件業 97 其他 78 半導體業 77 光電業 68 電腦及週邊設備業 60 建材營造 53 電機機械 47 紡織纖維 43 通信網路業 42 其他電子業 40 汽車工業 35 生技醫療業 34 金融保險業 34 鋼鐵工業 31 化學工業 29 航運業 23 食品工業 22 貿易百貨 22 塑膠工業 21 電子通路業 20 觀光事業 18 電器電纜 15 資訊服務業 12 橡膠工業 11 油電燃氣業 8 水泥工業 7 造紙工業 7 玻璃陶瓷 5

不動產萬宜芸

勤業眾信聯合會計師事務所 356 資誠聯合會計師事務所 214 安侯建業聯合會計師事務所 207 安永聯合會計師事務所 90 台灣上市公司產業類別 電子零組件業 97 其他 78 半導體業 77 光電業 68 電腦及週邊設備業 60 建材營造 53 電機機械 47 紡織纖維 43 通信網路業 42 其他電子業 40 汽車工業 35 生技醫療業 34 金融保險業 34 鋼鐵工業 31 化學工業 29 航運業 23 食品工業 22 貿易百貨 22 塑膠工業 21 電子通路業 20 觀光事業 18 電器電纜 15 資訊服務業 12 橡膠工業 11 油電燃氣業 8 水泥工業 7 造紙工業 7 玻璃陶瓷 5

  樞紐分析，把股票報酬率分成五組， 大漲超過6% 小漲超過2% 平盤2%到-2% 小跌超過-2% 大跌超過-6% =IF($G2>6%,"大漲",IF($G2>2%,"小漲",IF($G2>-2%,"平盤",IF($G2>-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影片樞紐分析

劉任昌Scalable Vector Graph可縮放向量圖形 ...

維基百科SVG EXCEL VBA繪圖 EXCEL VBA繪圖程式碼 Sub 劉任昌() For i = 0 To 4 ActiveSheet.Shapes.AddShape(msoShapeOval, i * 200, 0, 200, 200).Fill.ForeColor.RGB = RGB(255, 255, 0) ActiveSheet.Shapes.AddShape(msoShapeOval, i * 200 + 50, 50, 30, 20).Fill.ForeColor.RGB = RGB(0, 0, 0) ActiveSheet.Shapes.AddShape(msoShapeOval, i * 200 + 120, 50, 30, 20).Fill.ForeColor.RGB = RGB(0, 0, 0) ActiveSheet.Shapes.AddShape(msoShapeRectangle, i * 200 + 90, 80, 20, 50).Fill.ForeColor.RGB = RGB(0, 0, 255) ActiveSheet.Shapes.AddShape(msoShapeRectangle, i * 200 + 70, 150, 60, 15).Fill.ForeColor.RGB = RGB(255, 0, 0) Next End Sub

VBA迴圈畫圖 VBA迴圈畫圖程式碼 'https://excelatfinance.com/xlf19/xlf-qg-add-blue-circle.php Option Explicit Const topleft As String = "C5" ' anchor cell Const diam As Integer = 100 ' 宣告常數constant diam 100 Dim Shp As Shape 'global variables全域變數 ' =========================== Sub 劉任昌() Dim TLCleft As Double Dim TLCtop As Double Dim i As Integer '宣告整數integer i For i = 1 To 20 'write a loop單引號註解 TLCleft = 20 * i '距離左邊left TLCtop = 20 * i '距離上面top '使用中的試算表active sheet. addshape(type, left, top, width, height) Set Shp = ActiveSheet.Shapes.AddShape(msoShapeOval, TLCleft, TLCtop, 2 * diam, diam) With Shp .Fill.Visible = msoFalse .Line.Weight = 10 .Line.ForeColor.Brightness = 0.4 .ThreeD.BevelTopType = msoBevelCircle End With Next With Cells(1, 1) .Value = "劉任昌大帥哥" '在儲存格1,1放入字串 .Interior.Color = RGB(0, 0, 255) .Columns...