發表文章

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

陳佑愷EXCEL基本功能,VBA巨集程式設計

圖片
畫圖畫面 畫圖VBA程式碼 Option Explicit Const topleft As String = "C5"  ' anchor cell' Const diam As Integer = 180     ' points'定義diameter '劉任昌提示參考https://excelatfinance.com/xlf19/xlf-... ' =========================== Sub xlfAddCircle1() Dim Shp As Shape Dim TLCleft As Double Dim TLCtop As Double           TLCleft = Range(topleft).Left         TLCtop = Range(topleft).Top           Set Shp = ActiveSheet.Shapes.AddShape(Type:=msoShapeOval, _                                               Left:=TLCleft, Top:=TLCtop, _                                               Width:=diam, Height:=diam)         With Shp                ...

劉任昌EXCEL與JavaScript迴圈

圖片
輸出 EXCEL學習 '變數variables應該要宣告 pre=preserve保留 'Dimension 宣告指令 Option Explicit Dim i, j As Integer Public Sub 豬八戒() For i = 2 To 7 For j = 1 To 6 Cells(i, j).Value = i * j Cells(i, j).Font.Color = RGB(0, 0, 255) Cells(i, j).Font.Bold = True Next Next End Sub 相當於JavaScript指令}代表結束VBA不用{ } 代表開始與結束,sub end sub JavaScript迴圈 <head> <style>   h1{padding: 20px; background-color: green; color: white;} </style> <script> function year()   { var tmp ="<font size=5 color=#0000FF>"; //輸出HTML指令preserve格式    for (var i=0 ; i<= 5; i++)    {  tmp = tmp + (i+2020) +"年";       for (var j=1; j<13; j++)       { tmp=tmp + j +"月";       }      tmp = tmp +"<br/>";    }//tmp 是一個字串變數+進行字串的串接加上<br/>html換列命令    tmp = tmp + "</font>";    document.getElementById("out").innerHTML = tmp;   ...