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

如图1.我点击A,B的时候,在左边的表格里自动输入“A”“B”。只能在左边的那个划线的表格里自动输入,不能出现在其他地方。输入的顺序为从上到下,从左到右。例如:我点击A,... 如图1.我点击A,B的时候,在左边的表格里自动输入“A”“B”。只能在左边的那个划线的表格里自动输入,不能出现在其他地方。输入的顺序为从上到下,从左到右。例如:我点击A,应该在D2出现一个“A”,然后在点击A,在D4出现一个“A” 点击B,应该在D6出现一个“B”,然后在点击A,在D7出现一个“B”.......求助2.我这个是直接插入的按钮,不能直接修改背景颜色,请问有啥其他办法吗? 比如我可不可以给这两个按钮添加背景图片,我的背景图片是自己画的颜色。来大神帮忙下哟
点击输入我已经弄好了,请问背景颜色,以及锁定单元格,就是按顺序输入怎么办
展开
 我来答
Kurohanmaru
2018-05-30 · TA获得超过416个赞
知道小有建树答主
回答量:240
采纳率:91%
帮助的人:44.1万
展开全部

表的格式我是严格按照你的表格来了,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之间为按钮名字(默认一般不用改)

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

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

柔软的Bp
科技发烧友

2018-05-30 · 智能家居/数码/手机/智能家电产品都懂点
知道大有可为答主
回答量:3万
采纳率:67%
帮助的人:8912万
展开全部
按钮用 文本框
追问
文本框没有点击按钮,麻烦大哥说详细一点点,我自学才三天。
追答
在表格里画个 文本框

右键这个 文本框,指定宏
文本框,你可以填充颜色等
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式