Search code examples
vbaexcelgroupingexcel-2013

Ungrouping Will not Allow To Scroll


I am copying from one worksheet to another, and am grouping the selection. When I click the plus sign to show the full group, I can not scroll through the grouped selection. This is the syntax I am using to expand the group, what is it that stops me from being able to scroll through?

Ungrouping allows me to scroll, but the data on the worksheet itself never moves, just the scroll bar on the right side of the page

Set rLastCell = ActiveSheet.Cells.Find(What:="*", After:=Cells(1, 1), _
LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlPrevious, MatchCase:=False)
Range("A2:A" & rLastCell.Row).Rows.Group
ActiveSheet.Outline.ShowLevels RowLevels:=1

Solution

  • There are two features in Excel that could cause this problem that I know of. Both are under the "View" ribbon options. Please verify that the Freeze or Split options are not active.