Hallo,
habe mich evtl beim ersten mal nicht richtig ausgedrückt, habe folgenden
Fehler: Objekt Fehler 91 bei folgendem Code-Teil:
(Es sind natürlich alle Variablen deklariert!!!)
With xls.Worksheets(1)
Set x = xls.Worksheets(1).Range
(xls.Worksheets(1).Cells(block_hoehe - 1, pos_kg_gruppen),
xls.Worksheets(1).Cells(block_hoehe - 1, pos_kg_gruppen + anzahl_kg_gruppe - 1))
End With

x.Select

Selection.Merge
Genau hier beim "Selection.Merge" steigt das Programm bei einem zweiten Start aus ?
Gruß
Jörg