动态冷冻窗格标题

时间:2013-08-12 21:25:42

标签: excel vba dynamic

因此,在excel中,我被要求更改excel文件以在冻结窗格上方合并动态标题。这个想法是标题表示1月份,因为它是第一个月,但是当用户滚动到2月数据时,标题应该更改为2月。

我试图开始编写一个执行此操作的宏,但是我能得到的最接近的是将冻结的窗格标题放下,搜索标题单元格的内容并在标题下方的列中创建第一个单元格其中包含显示的实际月份,我无法使其工作;我无法调试我的语法。帮助会很棒!我想如果我可以将下拉选项作为搜索的基础,在当前活动单元格下方的列中生成搜索条件的第一个实例,然后滚动以使其位于冻结窗格的正下方。

Range("E1").Select
Dim selekt As Variant
selekt = Range("E1").Select
Selection.Copy (selekt)
Cells.Find(What:=selekt, After:=abc, LookIn:=xlFormulas, _
    LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
    MatchCase:=False, SearchFormat:=False).Activate

2 个答案:

答案 0 :(得分:1)

看看Window.VisibleRange。不过,你仍然需要举办一场活动。

答案 1 :(得分:1)

请在此处查看我对类似问题的回答 Dynamic Freeze Pane / Frozen Row in Excel

您可以冻结工作簿中的前两行,并以与我相同的方式更改它们。