心得: 1. 点击控件工具箱中的“退出设计模式”按钮。“芝麻开门”按钮周围的小圈圈没了,转换成运行模式。 2. 还可以在VBE窗口中直接运行,把光标定位到代码首尾之间(从“Private Sub CommandButton1_Click()”到“End Sub”),如下图所示执行菜单命令或按F8,逐行执行代码 3. 接下来要输入的代码是“ActiveCell.Address”,输入这些代码可以使用键盘输入,也可以从属性列表中选择。按Ctrl+J,在代码窗口中弹出一个下拉列表,就是属性/方法列表,将光标移动到ActiveCell,然后点击键盘上的小数点“.”,结果ActiveCell连同小数点被输入到代码窗口中。 4. Chr(13)代表一个回车符(信息分两行显示)。 后面的下划线“_”与显示无关,写代码的时候,如果一行太长,不方便阅读,可使用一个下划线把代码分两行或多行书写,不影响运行。 5. ActiveCell.ColumnWidth = 20 '设置活动单元格的宽度为20 ActiveCell.RowHeight = 40 '设置活动单元格的高度为40 ActiveCell.Font.Name = "黑体" '设置活动单元格的字体的名称为“黑体” ActiveCell.Font.Size = 20 '设置活动单元格的字体的尺寸为20 也可用指定的单元格代替活动单元格(ActiveCell),如:Range("d3").Font.Size=30。
练习一下: 设置VBA2中A1单元格内容为:“成绩表”,字体为“隶书”,字号为30,居中(代码为 .HorizontalAlignment = xlCenter) --finish |