officeba > 单独文章

---

excel2010悬停图表

今天来说说excel2010悬停图表

我相信大家对冻结窗格知道在Excel中的功能 - 它已经在永远，并且它在某些情况下非常有用，你要保持在工作表，或顶一列（或更多的数据）列在纸张的一面 - 尤其是对过滤。当然，我们已经使少在2007年和2010年发布必要的，因为表头（2007年），现在表过滤器（2010）自动营地的行头，以便您可以轻松地查看和过滤器中的任何信息一表。

  
方便的列标题 - 没有冻结窗格 - 尼斯。

我喜欢这个新功能，但我经常发现自己想要创建一个图表来概括表中的一些数据 - 通常看到的图表继续增长，我继续增加数据表，显示随着时间的推移，我的趋势。一旦我这样做，我不断向上和向下滚动（最多见图表，到进入新的数据）。我真正想要的是一个功能，只滚动表行，而不是整个表...，当然，Excel没有。 （这几乎就像冻结窗格，除非一组额外的滚动条，这样你可以滚动4冻结窗格，每个独立...尽管这会导致其他问题。）哦，因为我可以阅读你的心灵 - 我可以'吨使用与冻结的'表'冻结窗格，因为我有非常有限的空间垂直屏幕超小型笔记本电脑。冻结窗格，我将会以高达两行垂直滚动！

下面是一个示例电子表格，说明了这个问题，我在那里跟踪我的两只猫，银，子弹（兄弟），谁喜欢吃的像狗比猫，体重。

  
我想（请注意在中间垂直滚动条），尽管设计'土崩瓦解'有点当你真正想一想。

行，有什么我的解决方案？虽然它可能是一个有点反高潮，它简单地将图表（羽绒作为可见光范围内变动页），并确保它总是在同一地点一般视觉停留。我相信有一个更好的方法来编写代码 - 随时提出选择！

将此代码添加到您自己的项目，只要采取以下步骤（或打开附加的项目）：

按Alt + F11以打开VBA编辑器
打开的表，它包含您的表和图表工作表类（Sheet1的在我的情况）
内添加以下代码编辑器。：

Dim previousRow As Long

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Dim vOffset As Double
  Dim currentRow As Long
   currentRow = Me.Application.ActiveWindow.scrollRow
   If previousRow <> currentRow Then
     If previousRow = 0 Then
     previousRow = Me.Application.ActiveWindow.scrollRow
   End If
    ' reposition charts
    For Each c In ActiveSheet.ChartObjects
      vOffset = c.Top - Me.Rows(previousRow).Top
      c.Top = Me.Rows(currentRow).Top + vOffset
    Next c
    previousRow = currentRow
  End If
End Sub

  

当您完成后，只需关闭VBA编辑器，然后滚动距离（垂直）。您的任何图表工作表上的应留在自己的相对位置在工作表的可见范围，如垂直滚动。
只要你有一个很长的数据表，特别是如果你有一个小屏幕分辨率（上网本或ipad公司任何人？）这可能是一个救命稻草，或者至少是方便。当然，你可以采取这个例子进一步处理水平滚动和垂直，但我会留下，作为读者的练习。现在，如果你原谅我，我得去衡量我的猫。

声明：欢迎各大网站转载本站文章，还请保留一条能直接指向本站的超级链接，谢谢！

时间:2010-03-20 13:53:55,点击:65824