在Excel中工作表的切换都需要鼠标点击来切换，能不能还有更简便的呢，当然有~ 输入如下代码： Application.SendKeys "{PGUP}", True Application.SendKeys "{PGDN}", True 或者  
标签： VBA
VBA实现单元格位移
前面讲了OFFSET函数位移，当然函数是要人一次次敲的。能不能简便点呢？有！宏或VBA实现！ 代码如下： sub my_offset on error resume next ActiveCell.Offset(0, 1).Select’当前单元格向左移动一格 ActiveCell.Offset(0, –1).Select’当前单元格向右移动一格 &nb
学习VBA的8个误区
VBA作为Excel的二次开发而延伸，打破了Excel本身函数的局限，让其在数据处理上进一步得到发展，VBA虽好，但很多人迷恋的同时也陷入了其误区： 1、想通过Excel+vba来编程发财，不管怎么说，目前这种可能性很小。 2、录制宏后的代码不进行简化，这种情况初学者常犯；或者不屑于用录制宏，这种相反。 3、喜欢用.select、.copy、.active等，如果不是迫不得已，还是不要用这些东西好。 4、不喜欢用公式、函数，什么都喜欢用程序；活用公式函数是我们学EXCEL中重要的重点，学会嵌套着
VBA实现Excel打开指定次数后自杀
上次我写了个VBA实现Excel指定时间才能打开~那能不能指定EXCEL表格打开指定的次数以后自杀呢？ 什么叫自杀？ 很简单嘛，就是自己杀死自己！对于Excel来说，就是删除自己了！ 如何实现？代码咯！可以参考如下代码： Private Sub Workbook_Open() Dim n As Integer Range("A65536").Value = 
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