Summary Row Eigenschaft
11.12.2003 18:33:28
Lars
Möchte bei jedem Start des Wokbooks die summary row Eigenschaft überprüfen und ggf. ändern. Mein bisheriges Makro (nachstehend) funktioniert aber nicht:
Private Sub Workbook_Open()
If ActiveSheet.Outline _
.SummaryRow = xlBelow Then
ActiveSheet.Outline _
.SummaryRow = xlAbove
Else: End If
End Sub
ein anderes funktioniert nur einmalig bei noch nicht geänderter Option:
Private Sub Workbook_Open()
with ActiveSheet.Outline _
.SummaryRow = xlabove
End with
End Sub
Anzeige