3.2.5：VBA对单元格操作的引申

我给VBA的定义：VBA是个人小型自动化处理的有效工具。利用好了，可以大大提高自己的劳动效率，而且可以提高数据处理的准确度。我推出的VBA系列教程共九套和一部VBA汉英手册，现在已经全部完成，希望大家利用、学习。

如果您只是一般的职场VBA需求，可以打包选择7.1.3.9教程+汉英手册，第7套教程是入门，第1套教程是入门后的提高，第3套教程字典是必备的VBA之精华，第9套教程是实用的典型案例讲解。这四套教程内容掌握后足以处理一般工作中的问题，实际写代码的时候再辅助代码汉英手册，足矣！如果您想进一步提高，就需要选择高级阶段的教程了。

VBA是面向对象编程的语言，博大精深。很多朋友咨询VBA的学习方法，我会陆续给大家讲解一些我的经验，大家可以慢慢体会。今日的内容是：3.2.5：VBA对单元格操作的引申

【分享成果，随喜正能量】人心有畏，才能更懂因果，人性有畏，才不会怨天尤人。总是把抱怨的话放在嘴边，生命的状态也会因为抱怨的力量衰减。言语的力量最是可怕，看似一句无心之言，需要千般代价来消化。别不信，业果自造，业障自消。遇事不抱怨，遇人不埋怨。就是减少灾祸，降低业障的最好方式。。

3.2.5 单元格VBA操作引申

在工作薄、工作表操作中，最为基本的一项是单元格操作。我们可以先回忆一下在平时的EXCEL操作中，单元格都有哪些操作呢？这里将列举些实例给大家以抛砖引玉：

1）单元格的录入 当有数据要录入工作表时，如果源数据无法自动获取，是无法利用VBA来实现的。

2）单元格的复制和粘贴 在VBA中我们可以利用Range对象的Copy方法和Range对象的Paste方法，同时Range对象的PasteSpecial方法可以完成数值粘贴

3）单元格值的替换 可以利用Replace方法

4）单元格字体的设置 可以利用字体的属性Font进行设置 同时要求大家记住自己比较喜欢的几个颜色值：

 5）向单元格中录入公式 可以使用Range对象的Formula属性

6）如何判断单元格中是否有公式：可以使用HasFormula属性检查单元格是否含有公式的代码

7）在单元格操作的讲解中，给大家举了一个实际工作中或许能用的到的例子，就是单元格的高亮显示：

如果希望以某种方式突出显示活动单元格或者指定的单元格区域，从而一目了然地获得某些信息，那么可以高亮显示活动单元格区域，以下是教程中给出的代码。

 Private Sub Worksheet_SelectionChange(ByVal Target As Range)

 Cells.Interior.ColorIndex = xlColorIndexNone

    Target.Interior.ColorIndex = 36

End Sub

随着教程的学习的深入，需要大家不断的去理解VBA,比如代码放的位置。以上代码放的位置是工作表模块，而不是通用模块。什么是工作表模块呢？工作表模块也称为工作表的私用模块，这里面的代码是这个工作表私人定制的。以上的代码是放在了工作表的Worksheet_SelectionChange 事件中，这个事件在工作表的选择发生改变时就会发生。代码只有两行，第一行 Cells.Interior.ColorIndex = xlColorIndexNone 是设置整个工作表为无色，第二行Target.Interior.ColorIndex = 36，是设置当前单元格的颜色。对于这段代码，大家要理解代码放的位置的意义，再有就是能扩展一下代码的应用：如果扩展到单元格所在的行列高亮显示呢？代码如何修正？大家可以看我的教程，给出了详细的代码,实现的效果：

我20多年的VBA实践经验，全部浓缩在下面的各个教程中：