Du meinst dann wohl:
Ich muss in meiner Collection der Antwortdoks nochmal jedes Doc greifen und praktisch dieselbe Schleife mit StampAll durchlaufen?
Also so:
'alle Antwortdocs des Backend-Docs werden in die Collection aufgenommen
Set dc = doc.Responses
'Radikal-Methode: setze alle Felder der Collection, gespeichert wird automatisch
Call dc.StampAll( "MainTitelTX" , doc.KapitelTX(0) & "\" & doc.TitelTX( 0) )
Set rdoc = dc.GetFirstDocument()
While Not(rdoc Is Nothing)
Set dc1 = rdoc.Responses
Call dc1.StampAll( "ForActivityTX" , rdoc.MainTitelTX( 0 ) )
Set rdoc = dc.GetNextDocument(rdoc)
Wend