[VBA ] 請幫我解釋一下
教授要求逐行解釋 但我根本不知道自己在做什麼
麻煩幫忙一下囉
共有3個
Sub aa()
'
' aa Macro
' R509 在 2009/10/15 錄製的巨集
'
' 快速鍵: Ctrl+e
'
Selection.NumberFormatLocal = "0.00_ "
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
End Sub
Sub ac()
x = ActiveCell.Value
y = ActiveCell.Offset(1, 0).Value
ActiveCell.Value = y
ActiveCell.Offset(1, 0).Value = x
ActiveCell.Offset(1, 0).Select
End Sub
Sub bb()
ActiveChart.PlotArea.Height = InputBox("高(1/72 inch)?", "300")
ActiveChart.PlotArea.Width = InputBox("寬(1/72 inch)?", "300")
End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.118.41.154
→
10/16 16:09, , 1F
10/16 16:09, 1F
→
10/16 16:10, , 2F
10/16 16:10, 2F
→
10/16 16:12, , 3F
10/16 16:12, 3F