Overzetten score van userform

[Koelieman]

Hallo forummers, goedemorgen.

Ik weet niet zeker of de titel van mijn vraag begrijpelijk is, maar het komt op het volgende neer.
Ik heb een spelletje in elkaar geflanst (voorbeeld uit Youtube), maar ik wil graag de score bijhouden op de sheet achter de userform.
Dus elke keer als ik de button "Nieuw spel" klik, moet ie de stand overzetten op de sheet en voor het volgende spel moet ie dus een regeltje lager.
Als het mogelijk is zou ik graag hulp willen hebben in de codering.

Groet, koelie.

 

[SjonR]

Bovenaan je Sub Bnieuwspel

 Dim LastRow As Long, ws As Worksheet

    Set ws = Blad1
    
    
    LastRow = ws.Range("A" & Rows.Count).End(xlUp).Row + 1

    ws.Range("A" & LastRow).Value = sx.Caption
    ws.Range("B" & LastRow).Value = so.Caption

 

[VenA]

Kan ook in 1 regel

Blad1.Cells(Rows.Count, 1).End(xlUp).Offset(1).Resize(, 2) = Array(sx.Caption, so.Caption)

 

[Koelieman]

@ SjonR

Hartelijk dank voor uw reactie; ik heb het toegepast en het werkt super. Nogmaals dank.

@VenA

U ook bedankt voor de reactie. Zoals geschreven: het werkt perfect met de code van SjonR, maar ik zal spoedig ook deze code gebruiken en kijken naar de werking ervan.

Groet, koelie.