Worksheet.Sort (Excel) Gibt ein Sort -Objekt zurück. Dim srtSort As Sort Set srtSort = ActiveSheet.Sort