VBA实现为单元格添加公式备注

文:Kael.Z 大家在处理在Excel数据时有些数据都是利用公式处理的,若要让所有存在公式的单元格显示公式!方案有一,就是将单元格的公式添加为该单元格的备注! 打开VBA编辑器,在显示的工作表(例如sheet1)输入如下代码:   Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) &

VBA指定EXCEL工作簿的有效期

当过了某个时间这个工作簿将不能被打开或者打开这个工作簿一定要在某个一天才能打开!比如你的excel表格指定在2011-3-23这一天才能打开,其他时间都不能打开!你是不觉得很神秘?想体验吗?那就跟我来写代码! 打开VBA编辑器,在Thisworkbook下插入如下代码:     Private Sub Workbook_Open() ‘工作簿打开时执行    If Now >= 

VBA实现工作表间层次链接

文:Kael.Z 不知道大家看到过这种工作表表格没有? 看到表1,如要看表2和表3,只能通过表1的链接打开,且表2和表3回到表1后,又不可见。很神奇吧!哈哈!想知道看下去! 打开VBA编辑器。输入如下代码即可:   Private Sub Worksheet_SelectionChange(ByVal Target As Range)      If Target.Address&nbs

VBA另类方式添加批注

文:Kael.Z 平时操作EXCEL时需要给单元格数据添加一些批注什么的方便记忆!一般的操作是:插入》批注或者像我这种懒人直接按住ALT+I+M来添加批注。但是有些人感觉这样操作麻烦! 那我就给大家个另类的方法,VBA代码实现吧。 有2个元素要涉及。一个是按钮控件,一个是VBA代码。 第一步在表格的适当区域建立2个控件按钮。(视图》工具栏》控件工具箱)插入2个按钮!分别命名为添加批注和删除批注。 第二步分别在第一个按钮插入代码 Private Sub 添加批注_Click()On Error R

VBA实现非空数据锁定

文:Kael.Z  版权所有,尊重原创 很多人在编辑EXCEL表格时,涉及到数据量很大,但又怕自己的不小心操作对单元格目标数值产生误操作,引起数据的错乱。 这种情况完全可以用VBA来实现锁定!保证最小的失误! 说干就干!跟我来! 打开EXCEL,按住ALT+F11,打开VBA编辑器!在你要实行的那个表格插入代码,这里我们默认采用sheet1. Private Sub Worksheet_SelectionChange(ByVal Target As Range)  

EXCEL 动态时间代码

你是不是厌倦了时间在EXCEL是静态的样子?想体验下EXCEL单元格中动态的时间吗?那就跟我来实现!此需求主要通过VBA来实现! 打开EXCEL,按ALT+F11打开VBA编辑器: 在thisworkbook中输入如下代码: Private Sub Workbook_BeforeClose(Cancel As Boolean)TerminateSet appTime = NothingSet objBtn = NothingEnd SubPrivate Sub Workbook_Open()In