菜鸟谈VBA最最基础入门1

《菜鸟谈VBA最最基础入门1》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、引用:　　提示：一行的代码过长，可以用空格加下划线进行换行。　　复制的区域过大时，对于目标区域，我们可以只指定一个单元格，这时它代表目标区域的左上角单元格。如上面的代码，我们可以写成这样：　　复制内容到剪贴板代码:　　Submycopy()　　  Workbooks("book1").Sheets(1).[a1:a10].Copy_　　  Workbooks("book2").Sheets(1).[b1]　　EndSub如果你需要只粘贴数值，或其他什么，你可以利用录制选择性粘贴的宏来进行修改。同

2、样的道理，我就不再多说。　　二、剪切单元格　　剪切单元格，或者说移动单元格和复制单元格类似，有了上面的经验，我们不难得到它的语句。其实它和复制单元格的命令大同小异，唯一不同的是使用Cut方法代替了Copy方法。　　下面的代码是将A1:A10单元格的数移动到B1:B10单元格：　　复制内容到剪贴板代码:　　Submycut()　　  [a1:a10].Cut[b1]　　EndSub　　三、删除单元格　　删除一个单元格的命令也很简单，调用Range对象的Delete方法即可。同我们用鼠标操作一样，同

3、样有四个选项，下面以删除A1单元格为例：　　复制内容到剪贴板代码:　　[a1].DeleteShift:=xlUp'  下方单元格上移　　[a1].DeleteShift:=xlToLeft'  右侧单元格左移　　[a1].EntireRow.Delete'  整行删除　　[a1].EntireColumn.Delete'  整列删除　　只写成[a1].Delete时，默认为“下方单元格上移”。Range对象的End属性　　Range对象有一个End属性，也许你在阅读别人的例子里经常会看到如“[

4、A65536].End(xlUp).Row”这样的语句，这就是End属性的利用。　　End属性应用于Range对象，同样也返回一个Range对象。该对象代表包含源区域的区域结尾处的单元格。如果你还是不明白，那请你在工作表里试一试，分别按Ctrl+上、下、左、右方向键，看看得到的是什么？End属性返回的单元格就相当于在源单元格按住Ctrl键+上（或下、左、右）方向键所得到的单元格。它的语句格式简单写为：　　源区域.End（移动方向）　　移动方向可以是：　　xlToLeft：向左移动，相当于在源区域

5、按Ctrl+左方向键。　　xlToRight：向右移动，相当于在源区域按Ctrl+右方向键。　　xlUp：向上移动，相当于在源区域按Ctrl+上方向键。　　xlDown：向下移动，相当于在源区域按Ctrl+下方向键。　　所以在程序设计的过程中，很多人喜欢用“[A65536].End(xlUp).Row”语句来返回A列的最后一个非空单元格的行号。　　如果当前活动工作表的A列填写的是学生的姓名，现在我们想在表中A列最后一个学生的后面增加一个叫“张青”的学生，则代码为：　　复制内容到剪贴板代码:　　A

6、ctiveSheet.Cells([A65536].End(xlUp).Row+1,1).Value="张青"　　　语句[A65536].End(xlUp).Row+1中，行号加1的目的是在最后一个非空单元格的下一个单元格里输入数据。需要注意的是：如果你的A列全为空的话，“[A65536].End(xlUp).Row”这个语句返回的是1。　　我们来做一个简易的学生信息录入的例子：　　（1）点工作表中的“录入资料”按钮，弹出“录入”窗体；　　（2）录入信息后，点击“确定”按钮即完成记录追加；　　（

7、3）不考虑录入内容是否规范。　　详细请看附件，信息录入.rar(11.09KB)信息录入.rar(11.09KB)附件没有设密码，希望大家尝试过后再看代码！汇总多工作表花名册　　上一贴中，“花名册分类”的题目主要是检验大家对循环语句、判断语句及一些单元格数据处理的方法。因为目标工作表和源工作表的格式都是一样的，所以处理起来也相对比较简单，无非就是给数据搬了个家。所以可以用我们前面贴子里说的Copy的方法，当然，也可以直接等于源区域的Value属性，即：目标区域.value=源区域.value。比

8、如我们想把Sheet1里的第一行数据复制到Sheet2的第一行，可以用以下两句代码中的任意一句：　　复制内容到剪贴板代码:Sheets("sheet1").Rows(1).CopySheets("sheet2").Rows(1)　　　　代码:Sheets("sheet2").Rows(1).Value=Sheets("sheet1").Rows(1).Value　　　　这一点，在“宝贝”的作业里已经用到了。　　上次的作业是对名册进行分类，进行原样的搬家。这一次的作业还是搬家，和上次不一样的是，这