Excel 2007; OutlineLevel-Problem
 

Hi,

It seems that Excel 2007 has some problems with the OutlineLevel-property.
When I run the follwing code

Sub Test()
Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets(1)
With ws.Range("A2:A10").EntireRow
.Rows.Group
.OutlineLevel = 1
End With
End Sub

a very annoying beep is sounded. Does anybody know how to solve this
(simple) issue?

Tom