龙空技术网

VBA入门之---与代码亲密接触开场舞

Excel自力更生 349

前言:

现在我们对“vba强制转换为半角输入状态excel”大约比较关心,我们都想要分析一些“vba强制转换为半角输入状态excel”的相关资讯。那么小编在网上网罗了一些有关“vba强制转换为半角输入状态excel””的相关知识,希望兄弟们能喜欢,小伙伴们快快来了解一下吧!

去除粗枝繁叶,留一根主干,作攀天之梯,目标是那金碧辉煌的VBA殿堂。

一路上,两旁都是漂亮的姑娘,不要三心二意,请跟我走。

闲话少说,言归正传。

打开Excel,新建一工作簿。

如果你的工具栏中找不到“控件工具箱”,请打开它。控件工具箱可悬浮在工作表中,也可停靠在窗口的四周。

1点击命令按钮,在工作表中拖动鼠标至适合大小。

2按钮出来了。通过右键菜单,可以编辑它的文字。

4设置属性虽然有趣,但总不过瘾,来点刺激的。双击按钮,眼前是另一片天地,它叫做VB编辑器(或称VBE),VBA的一切神奇将从这里诞生。

5依样画葫芦。在光标处输入下面一行代码:

QUOTE:

MsgBox "哈哈,我会 VBA 啦……"

msgbox 不拘大小写,后面有一个空格,引号是半角引号。

输入完毕后点击工具按钮返回Excel窗口。

6点击控件工具箱中的“退出设计模式”按钮。“芝麻开门”按钮周围的小圈圈没了,转换成运行模式。

7点击按钮“Excel 教案”,这就是代码运行的效果图,一个系统对话框。

8现在,由工作表界面切换到VBE界面,下列方式可任选一种:

F按Alt+TAB选择VBE图标,松开复合键。

工作表签右键菜单-查看代码。

F菜单:工具-宏-VB编辑器。

FAlt+F11。

F双击控件。

9将代码修改为:

QUOTE:

Private Sub CommandButton1_Click()

ctxt = "哈哈,我会 VBA 啦……"

MsgBox ctxt, 64, "宣告"

End Sub

实际修改的是中间的黑色字体部分。

代码中,蓝色处是一个空格,粉红色处是一个逗号。

命令后面、命令与命令之间,间隔一个以上的空格。

参数与参数之间,用逗号分开。

运行代码的办法,除了在工作表上点击按钮,还可以在VBE窗口中直接运行,把光标定位到代码首尾之间(从“Private Sub CommandButton1_Click()”到“End Sub”),如下图所示执行菜单命令或按F8,逐行执行代码。

如果执行“运行-运行子过程”命令(按F5),将连续执行过程首尾之间的全部代码。

10代码的解释:

ctxt叫做自定义变量,就像我们代数中常用的x、y、z一样。

ctxt = "……" 叫做赋值,跟代数中的赋值是一样的。

11MsgBox是什么东西?我们总是想知道。

请选择MsgBox(实际上,只需把光标定位到命令中的任意位置均可),按F1键,系统将弹出帮助窗口并显示该命令的帮助。

12在B2:D4单元格输入一些数据备用。为工作表添加第二个按钮。

这个按钮的功能是:用鼠标点击这些单元格,然后点击按钮,像上例一样弹出一个对话框,显示的内容为这个单元格的名称和内容。

13双击按钮。在光标闪烁处,输入代码:

msgbox "你点击的单元格是:" &

(蓝色位置表示空格),接下来要输入的代码是“ActiveCell.Address”,输入这些代码可以使用键盘输入,也可以从属性列表中选择。按Ctrl+J,在代码窗口中弹出一个下拉列表,就是属性/方法列表,将光标移动到ActiveCell,然后点击键盘上的小数点“.”,结果ActiveCell连同小数点被输入到代码窗口中。

口中继续显示属性列表中,选择属性“Address”,按空格键输入该属性。

接着,输入“& Chr(13) _”,回车换行,继续输入:

& "该单元格的值等于:" & ActiveCell.Value, 64, "神算子"

完整的代码是:

QUOTE:

Private Sub CommandButton2_Click()

MsgBox "你点击的单元格是:" & ActiveCell.Address & Chr(13) _

& "该单元格的值等于:" & ActiveCell.Value, 64, "神算子"

End Sub

辛苦了。返回Excel,退出设计模式,你可以自己试试看。

14.如何读写其它工作表的单元格呢?

把工作表sheet2重命名为VBA2,添加第四个按钮“暗渡陈仓”,事件代码为:

QUOTE:

Sheets("VBA2").Range("D5").Value = "明修栈道,暗渡陈仓。"

以上就是今天要和大家分享的技巧,希望对大家有所帮助,祝各位一天好心情!

唯有不断学习,才能不被淘汰!

Excel中每一个方法都有特定的用途,不是他们没有用处,只是你不了解或者暂时用不着,建议你收藏起来,万一哪天用着呢?

标签: #vba强制转换为半角输入状态excel