Was ist ein verd.... Automatisierungsfehler?
22.08.2007 14:23:47
Stefan
ich habe eine Arbeitsmappe mit Makros, die ich selber auch in dieser Excelversion erstellt habe. Anfangs ging alles, aber nu' nich' mehr. Der Himmel weiß warum, ich aber nicht!
Also, zum Problem:
Per Mausklick sollen Teile einer Zeile mit der Zeile darüber vertauscht werden. Dazu gibt es das besagte Makro. Das sieht so aus:
Private Sub Zeile_nach_oben_Click()
Dim Rownum As Integer
Rownum = ActiveCell.Row
Range(Cells(Rownum, 2), Cells(Rownum, 9)).Select
Selection.Insert Shift:=xlDown
Range(Cells(Rownum - 1, 2), Cells(Rownum - 1, 9)).Select
Selection.Cut
Cells(Rownum, 2).Select
ActiveSheet.Paste
Range(Cells(Rownum + 1, 2), Cells(Rownum + 1, 9)).Select
Selection.Cut
Cells(Rownum - 1, 2).Select
ActiveSheet.Paste
Range(Cells(Rownum + 1, 2), Cells(Rownum + 1, 9)).Select
Selection.Delete Shift:=xlUp -->hier steigt Excel aus!
End Sub
Als Fehlermeldung kommt:
Laufzeitfehler '-2147417848 (80010108)':
Automatisierungfehler
Das aufgerufene Objekt wurde von dem Client getrennt
Excel rührt sich danach auch nicht mehr und kann nur noch per Task-Manager geschlossen werden.
Ich habe im Forum schon etwas von Varianten, Excelversionen, der Funktion "Public" usw gelesen, aber das hilft mir nicht weiter. Kann mir jemand von euch weiterhelfen?
Vielen Dank im Voraus!!!!
Stefan
Anzeige