...
dim rec as new ImportDef
set rec = new ImportDef     <--- Hier wird ein neues Objekt erzeugt
...
rec.field_attr = "Test1"
rec.field_bez ="Test1Bez"
ImportDefinitionen.add rec
'... (usw)
rec.field_attr = "TestN"      <--- Hier überschreibst du dein bestehendes _
  Objekt mit neuen Daten!
rec.field_bez ="TestNBez"
ImportDefinitionen.add rec
...

...
dim rec as ImportDef
set rec = new ImportDef
...
rec.field_attr = "Test1"
rec.field_bez ="Test1Bez"
ImportDefinitionen.add rec
'... (usw)
set rec = new ImportDef 'Hier wird wieder ein neues Objekt erzeugt und die 
' Referenz darauf in rec gespeichert. Die Referenz auf das alte Objekt steht ja 
' bereits in der Collection.
rec.field_attr = "TestN"
rec.field_bez ="TestNBez"
ImportDefinitionen.add rec
...