Hallo Experten,
Ich habe ein Makro das in eine Tabelle mit Datumsangabe in der Startspalte automatisch Zellen einfügt wenn bis zu dem aktuellen Datum noch Zeilen fehlen.
Bei mir und einem Kollegenläuft das alles Problemlos.
Bei einer Kollegin die an einem anderen Standort arbeitet kommt allerdings in der FETT markierten Zeile der Laufzeitfahler 1004 "Die Insert Methode des Range-Objektes konnte nicht ausgeführt werden.".
Hat einer von euch einen Tipp woran das liegen kann? Ich hab keine Möglichkeit auf den Rechner der Kollegin zuzugreifen und kann auch sonst den Fehler nicht reproduzieren.
Ich habe Excel 2010. Kann es mit der Version zutun haben?
If .Cells(i, 1).Value > M_Datum + 1 Then
Worksheets("Vorlage").Rows(1).Copy
.Rows(i).Insert (xlDown) <---hier ist die Fehlerzeile
EndZeile = EndZeile + 1
M_Datum = M_Datum + 1
Nummer = Nummer + 1
.Cells(i, 1).Value = M_Datum
.Cells(i, 17).Value = Nummer
GoTo SpM3
End If
Mfg Markus
|