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

作者&投稿:郭甘 (若有异议请与网页底部的电邮联系)
在excel中如何使用VBA插入一个按钮,使其点击按钮实现在表格中单元格输入的功能~

A1到AN是横向输入?应该是纵向呀!
Sub 按钮1()
Cells(Range("a65536").End(xlUp).Row + 1, 1) = 1
End Sub

Sub 按钮2()
Cells(Range("a65536").End(xlUp).Row + 1, 1) = 2
End Sub
插入一个按钮控件,把下面的代码贴进去,注意你的button的名字替换掉Private Sub CommandButton1_Click()中的CommandButton1
Option Explicit
Public buttonClickCount As Integer
Private Sub CommandButton1_Click()
buttonClickCount = buttonClickCount + 1
Worksheets("Sheet3").Cells(1, 5).value = Worksheets("Sheet1").Cells(buttonClickCount, 1).value
'MsgBox (buttonClickCount)
End Sub
注意每次重新打开excel表格,按钮计数才会重置为零

步骤如下:
1.开发工具,插入,按钮

2.拖动绘制按钮,在弹框中选择,新建

3.在新界面中输入如下代码

4.这样,每次点击按钮,就会在选中单元格中输入内容了

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

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

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



按钮用 文本框


衡阳市15338333749: vba怎么excel中插入行 -
盖狄麦迪: 给个思路,要插入行,首先要选择行,再进行插入操作.假设在第二行处插入一行,则VBA代码如下:rows(2).insert shift:=xlup

衡阳市15338333749: excel如何添加VBA代码? -
盖狄麦迪: 1、在excel中可以添加VBA代码,通过打开“开发工具”,点击打开VB编辑器,进入VBA编写代码.1开发工具2VB编辑器3选择工作,双击4在代码窗中输入代码2、VBA,Visual Basic for Applications(VBA)是Visual Basic的一种宏语言,是微软...

衡阳市15338333749: excel vba如何用代码在单元格内插入复选框(activeX控件),求代码 -
盖狄麦迪: 软件版本:Office2007 方法如下:1.可以通过录制宏,插入一个复选框,然后查看代码如下:2.然后修改代码成为我们想要的,ActiveSheet即工作表,我们改成Sheet1 四个数据,分别是距离顶端位置,距离左边位置,复选框长度,复选框高度(可以更改数值,看看复选框的变化,就能知道每个数据的意思),改成我们需要的,如果是在某个单元格中,可以利用range的top和left选项获得单元格的位置,如下图所示代码:3.F5执行代码,返回Excel,就可以看到插入的复选框:

衡阳市15338333749: excel中的公式如何用VBA代码实现 -
盖狄麦迪: 用VBA的思路如下: 1、首先可以用一个循环遍历C3、E3两列数据 2、按照你选定的公式做计算(数值或逻辑计算) 3、如需要可添加按钮、文本、用户窗体

衡阳市15338333749: EXCEL中如何用VBA实现 -
盖狄麦迪: 方法/步骤如下: 1、双击打开桌面的EXCEL; 2、单击右上角的OFFICE图标,找到EXCEL选项,单击打开;3、勾选在功能区显示“开发工具”选项卡,单击确定按钮完成修改.4、单击菜单栏的开发工具,然后找到Visual Basic单击打开便可以进行相关的VBA编程.

衡阳市15338333749: excel中用VBA设置代码 -
盖狄麦迪: 1. 理解1是要设置数据有效性.处理方式:选中B列,然后,选择“数据→有效性”菜单,打开“数据有效性”对话框,在“设置”选项卡的有效条件“允许”处选择“自定义”,在出现的“公式”下面的方框中输入公式“=AND(LEN(B1)=26,...

衡阳市15338333749: Excel中利用VBA插入行和列 在所有的工作表或者指定的工作表中插入的行或者列都要插在同样的位置, -
盖狄麦迪: 1、新建一个Excel2003工作表,我们按不同的属性分为不同的列,如在工作经常记录生产信息,我们按照合同号,装置型号,装置名称,客户名称,工程名称,电话,联系人,发货地址来记录信息. 2、后来发现少一个序号的列,不好统计合...

衡阳市15338333749: Excel文件如何输入VBA代码,求详解 -
盖狄麦迪: 菜单上的 工具->宏->visual basic 编辑器,打开编辑器 然后,一般的情况: 菜单->插入->模块 在右边的编辑框输入代码. 如果代码是针对某个工作表的,则在左边的“工程资源管理器”双击该工作表对象,在右边的编辑框输入代码.

衡阳市15338333749: excel怎么使用VBA -
盖狄麦迪: excel使用VBA主要是通过宏运行的模式 一般要求来说 如果你没有VBA知识 建议用excel公式 VBA的代码在excel开发工具界面 可以在常规选项中 开发工具可见处打勾 就可以看到visual basic 和 宏两个选项 进去就能输入代码

衡阳市15338333749: 如何在EXCEL2003中用VBA插入数据
盖狄麦迪: cells(i,j)代表第i行第j列的单元格,循环是: for i = 1 to 100 for j = 1 to 7 cells(i,j) = i+1 '举例而已 next j next i

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 星空见康网