![MS Excel 2010 附加按钮](https://linux22.com/image/1599056/MS%20Excel%202010%20%E9%99%84%E5%8A%A0%E6%8C%89%E9%92%AE.png)
我无法让该代码运行。
If Target.Column = 6 Then
ActiveSheet.Shapes("Picture 1").Visible = True
ActiveSheet.Shapes("Picture 2").Visible = True
With ActiveSheet.Shapes("Picture 1")
.Left = Target.Offset(, 2).Left
.Top = Target.Offset(0).Top
End With
With ActiveSheet.Shapes("Picture 2")
.Left = Target.Offset(, 3).Left
.Top = Target.Offset(0).Top
End With
Else
ActiveSheet.Shapes("Picture 1").Visible = False
ActiveSheet.Shapes("Picture 2").Visible = False
End If
End Sub
此内容可在使用相对引用复制 Excel 按钮因此我不会重新讨论旧话题,而是在这里发帖。
我必须使用这个来将 Excel 上的值增加 1、0.1 和 0.01。创建 300 多个旋转按钮是不可能的。任何帮助都将不胜感激。我是一个非常基本的 Excel 用户。