Hallo
das werde ich bestimmt nicht nachbauen
aber so wie ich den Code sehe
werden hiermit
'die geänderten Eintragungen zurück
Tabelle1.Range(Tabelle1.Cells(1, 1), Tabelle1.Cells(251, 156)) = tab1
Application.ScreenUpdating = True
feste Werte in die Zellen A1 bis EZ156 geschrieben
und wenn du innerhalb dieses Bereichs Formeln
in der Spalte K und in deinen Zeilen 13, 16...usw hast
werden die natürlich überschrieben
MfG Tom
|