我正在嘗試將宏按鈕的“你好，世界”放在一起，該按鈕將在 Excel 電子表格的單元格上創建選項/單選按鈕，這是完成這項作業的最簡單的片段，因此我可以更好地理解 OptionButtons.Add然后在此基礎上進行構建。
以下 VBA 代碼拋出錯誤“編譯錯誤：預期：=”：
Sub BrokenOptionButtonTest()
Dim rang As Range
Set rang = Cells(Selection.Row, Selection.Column)
ActiveSheet.OptionButtons.Add(rang.Left, rang.Top, rang.Width, rang.Height)
End Sub
以下 VBA 代碼不會：
Sub PuzzlingOptionButtonTest()
Dim rang As Range
Set rang = Cells(Selection.Row, Selection.Column)
With ActiveSheet.OptionButtons.Add(rang.Left, rang.Top, rang.Width, rang.Height)
End With
End Sub
這里發生了什么事？它似乎與 With 陳述句的典型設想用例沒有太大關系。
uj5u.com熱心網友回復：
從第一個中洗掉括號，因為您沒有使用來自的回傳值 Buttons.Add
在第二個塊中，您使用回傳值作為With塊的主題，所以沒問題。
見VBA：括號的使用一種方法 ，例如
Sub OptionButtonTest()
With Selection.Cells(1)
.Parent.OptionButtons.Add .Left, .Top, .Width, .Height
End With
End Sub
轉載請註明出處，本文鏈接：https://www.uj5u.com/qiye/313365.html
上一篇：逆向excel索引匹配