本文作者:office教程网

打开excel工作簿后自动跳转到当前日期所在列?

office教程网 2023-10-27 13:53:04
后台-系统设置-扩展变量-手机广告位-内容正文顶部
摘要: Q:在Excel工作表中的第1行的每一列,都是按顺序排列的日期,如何在打开工作簿时自动跳转到当前日期所在的列?如下所示,如果今天是2 19年4月6日,打开工作簿后自...

Q在Excel工作表中的第1行的每一列,都是按顺序排列的日期,如何在打开工作簿时自动跳转到当前日期所在的列?如下所示,如果今天是2 19年4月6日,打开工作簿后自动选择这一列。

A:很简单。在Workbook_Open过程中输入下面的代码:

Private Sub Workbook_Open()

Dim wks As Worksheet

Dim rngSearch As Range

Dim lngLastColumn As Long

Set wks = Worksheets(“Sheet1”)

‘第一行中最后一列数据所在的列号

lngLastColumn =wks.Range(“A1”).End(xlToRight).Column

excel图表中Dirty有什么作用?

Q:在Excel VBA代码中,我有时会看到Range对象的Dirty方法,能够说明一下该方法的作用吗? A:Dirty方法与工作簿重新计算有关,指定下次重新计算发生时,需要进行重新计算的单元格区域。 通常,Calculate方法强制重新计算指定的区域,此时Microsoft Excel知道需要重新计算的单元格。

‘第一行中的数据区域

Set rngSearch = wks.Range(“A1”).Offset( , ).Resize(1, lngLastColumn)

‘查找当前日期所在的单元格并激活该单元格

rngSearch.Find(Date).Activate

End Sub

代码在工作簿打开时,先确定工作表Sheet1的第一行中所有已使用的单元格区域,然后使用Find方法在该区域查找到当前日期,并激活当前日期所在的单元格。

注意,代码要放置在ThisWorkbook模块中。

代码的图片版如下:

 

如何理解Excel公式中的各种符号?

Q:在Excel公式中,我们会使用各种符号连接数字、单元格或函数,从而获得想要的结果,例如,=SQRT((1234-234)/1 )^2。能够总结一下这些符号的使用吗? A:下面是Excel公式中使用的常用符号及说明。 - * / 基本的算术操作符:加、减、乘、除。例如,1 2,9-6,11*9,63/7,3

后台-系统设置-扩展变量-手机广告位-内容正文底部
未经允许不得转载:

作者:office教程网,原文地址:打开excel工作簿后自动跳转到当前日期所在列?发布于2023-10-27 13:53:04
转载或复制请以超链接形式并注明出处 演示站

分享到:

觉得文章有用就打赏一下文章作者

支付宝扫一扫打赏

微信扫一扫打赏

留言与评论(共有 0 条评论)
   
验证码: