Hallo, ich habe einen Quelltext mit dem es möglich sein sollte die Spalte "E" zu sortieren.
Sub Sortieren()
Dim strSpalte As String
Dim strBereich As String
strBereich = "A1:AS2105"
strSpalte = "E"
With Sheets(1)
Range(strBereich).Sort _
Key1:=Range(strSpalte & "3"), Order1:=xlAscending, _
Header:=xlYes
End With
End Sub
Doch immer wenn ich es ausführe kommt folgende Fehlermeldung:
"Laufzeitfehler '-2147417848 (80010108)':
Automatisierungsfehler
Das aufgerufene Objekt wurde von den Clients getrennt."
Was bedeutet das? Wie kann ich diesen Fehler beheben?
Liebe Grüße
|