劉任昌EXCEL VBA雙迴圈JavaScript迴圈VBA AddShape
VBA迴圈畫圖
>VBA迴圈畫圖程式碼
Rem https://excelatfinance.com/xlf19/xlf-qg-add-blue-circle.php
Rem 2021/11/29劉任昌提示
Option Explicit
Const topleft As String = "C5" ' anchor cell
Const diam As Integer = 100 ' 宣告常數constant變數diameter直徑radius半徑
Dim Shp As Shape '宣告變數Shp是 圖形 全域變數global 非區域變數local variables
Sub 劉任昌刪除()
For Each Shp In ActiveSheet.Shapes
Shp.Delete '刪除使用中試算表ActiveSheet的所有圖形Shapes
Next
End Sub
Sub 劉任昌()
Dim x As Double '宣告變數x是倍精度實數Double
Dim y As Double '宣告變數y是倍精度實數Double
Dim i As Integer '宣告變數i是整數Double
For i = 1 To 10 '寫迴圈
x = 20 * i
y = 20 * i '往下的方向出現物件addshape增加圖形type mso微軟office
Set Shp = ActiveSheet.Shapes.AddShape(msoShapeOval, x, y, 30,60)
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放入字串string
.Interior.Color = RGB(0, 0, 255) 'interior design室內設計
With .Font
.Size = 24
.Color = RGB(255, 255, 255)
.Bold = True
End With
End With
End Sub
VBA AddShape語法
expression.AddShape (Type, Left, Top, Width, Height)試算表.AddShape(圖表類型, 距離左, 距離上, 寬度, 高度)
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;
}
</script>
</head>
<input onclick="year()" type="button" value="超級美女" />
<p id="out">輸出</p>
https://d11017340.blogspot.com/2021/11/exceljavascript.html
回覆刪除作者已經移除這則留言。
回覆刪除作者已經移除這則留言。
回覆刪除作者已經移除這則留言。
回覆刪除https://0920416.blogspot.com/2021/11/exceljavascript.html
回覆刪除作者已經移除這則留言。
回覆刪除https://willy-yang.blogspot.com/2021/11/excel-vbajavascrip.html
回覆刪除https://xuanfinance.blogspot.com/2021/11/excel-vbajavascript.html
回覆刪除https://zxcvbnmjjokwo.blogspot.com/2021/11/excel-vbajavascript.html
回覆刪除https://tp6u83wu6.blogspot.com/2021/11/exceljavascript.html
回覆刪除https://liyujie034.blogspot.com/2021/11/blog-post_21.html
回覆刪除https://bowlllll.blogspot.com/2021/11/excel-vbajavascript.html
回覆刪除https://d11017337.blogspot.com/2021/11/h1padding-20px-background-color-green.html
回覆刪除https://julie92042.blogspot.com/2021/11/exceljavascript.html
回覆刪除https://yu-han18.blogspot.com/2021/11/excel-vbajavascript.html
回覆刪除https://weijiexu.blogspot.com/2021/11/excel-vbajavascript.html
回覆刪除https://0811bear.blogspot.com/2021/11/excel-vbajavascript.html
回覆刪除https://danley1116.blogspot.com/2021/11/exceljavascript.html
回覆刪除https://takmingfinace.blogspot.com/2021/11/excel-vba-javascript.html
回覆刪除https://d11017351.blogspot.com/2021/11/excel-vbajavascript.html
回覆刪除https://yangsungjun9.blogspot.com/2021/11/excelvba.html
回覆刪除作者已經移除這則留言。
回覆刪除https://gold-1-2zhang842.blogspot.com/2021/11/113sub.html
回覆刪除https://www.blogger.com/blog/posts/8763856802828946915
回覆刪除作者已經移除這則留言。
刪除https://d11017212.blogspot.com/2021/11/vbaloopjavascript.html
回覆刪除https://www.blogger.com/blog/post/edit/preview/8233902351681302814/8677979878872097269
回覆刪除作者已經移除這則留言。
回覆刪除