excel表格 用vba写代码。插入按钮后,点击会在单元格输入字母

如图1.我点击A,B的时候,在左边的表格里自动输入“A”“B”。只能在左边的那个划线的表格里自动输入,不能出现在其他地方。输入的顺序为从上到下,从左到右。例如:我点击A,应该在D2出现一个“A”,然后在点击A,在D4出现一个“A” 点击B,应该在D6出现一个“B”,然后在点击A,在D7出现一个“B”.......求助2.我这个是直接插入的按钮,不能直接修改背景颜色,请问有啥其他办法吗? 比如我可不可以给这两个按钮添加背景图片,我的背景图片是自己画的颜色。来大神帮忙下哟
点击输入我已经弄好了,请问背景颜色,以及锁定单元格,就是按顺序输入怎么办

表的格式我是严格按照你的表格来了,VBA代码如下:

Private Sub ToggleButton1_Click()

For C = 2 To 28 Step 2

For R = 2 To 12 Step 2

If Cells(R, C).Value = "" Then

Cells(R, C).Value = "A"

Cells(R, C).Font.Color = RGB(125, 12, 15)

Cells(R, C).Font.Bold = 1

GoTo oT02

End If

Next

Next

oT02:

End Sub

-------------------------------------------------

Private Sub ToggleButton2_Click()

For C = 2 To 28 Step 2

For R = 2 To 12 Step 2

If Cells(R, C).Value = "" Then

Cells(R, C).Value = "B"

Cells(R, C).Font.Color = RGB(12, 14, 185)

Cells(R, C).Font.Bold = 1

GoTo oT01

End If

Next

Next

oT01:

End Sub

上述是两段宏,可以复制在一起,先在编辑模式下的“属性”下查看按钮Name属性,修改第一句Sub和 _Click之间为按钮名字(默认一般不用改)

保存后重新启动,同意运行宏,就可以随便操作了。

(有问题细节或不太清楚的地方可追问)

温馨提示:内容为网友见解,仅供参考
第1个回答  2018-05-30
按钮用 文本框追问

文本框没有点击按钮,麻烦大哥说详细一点点,我自学才三天。

追答

在表格里画个 文本框

右键这个 文本框,指定宏
文本框,你可以填充颜色等

相似回答