Nieuwe invoer bewaren op een anderwerkblad exell2003

[pappi]

Hallo, vermits ik vrij nieuw ben op dit forum en niet zo vertrouwd ben met exell & macro's, graag de volgende vraagstelling.
Ik zo graag een invulblad maken in exell 2003, dat de gegevens bewaard op een ander werkblad (lijst)in de zelfde werkmap telkens er op het invulblad een nieuwe invoer van gegevens gebeurd.
Dus wanneer er telkens een nieuwe invoer gebeurd op invulblad , zou deze bewaard moeten blijven op werkblad lijst , telkens op een nieuwe rij.
Weet iemand hier raad mee?

 

[peter59]

Hallo Pappi

Heb je toevallig een voorbeeldbestandje en/of iets in excel staan v.w.b. je gedachtengang?
Er zijn v.w.b. je vraagstelling heel veel wegen die naar Rome leiden.

mvg Pie

 

[pappi]

ingevoegd bestandje

Hallo, gisteren problemen met uploaden van bestandje .
Hier is ie dan .
Greets

 

[pappi]

Iemand enig idee hoe dit op te lossen?

Iemand enig idee hoe dit op te lossen ?

 

[Warme bakkertje]

Sub tst()
With [lijst!A65536].End(xlUp)
    .Offset(1) = [Invulblad!D9].Value
    .Offset(1, 1) = [Invulblad!F9].Value
    .Offset(1, 2) = [Invulblad!H9].Value
End With
Union([Invulblad!D9], [Invulblad!F9], [Invulblad!H9]).ClearContents
End Sub

 

[pappi]

Nieuwe invoer bewaren op een ander werkblad

Hallo WB ,
dank voor je reactie , heb je code toegevoegd , maar schijnt niet te werken .
Krijg steeds de melding Object vereist wanneer de code wordt uitgevoerd.

Sub tst()
With [lijst!A65536].End(xlUp)
.Offset(1) = [Invulblad!D9].Value
.Offset(1, 1) = [Invulblad!F9].Value
.Offset(1, 2) = [Invulblad!H9].Value
End With
Union([Invulblad!D9], [Invulblad!F9], [Invulblad!H9]).ClearContents
End Sub

Moet er hier nog iets aan toegevoegd worden?
MVG

 

[Warme bakkertje]

Zie bijlage

 

[pappi]

Bedankt Wb ,dit is wat ik bedoel .