If Worksheets("Tabelle2").Activate = True Then
myUsername = InputBox("Gib deinen Usernamen ein.")
Range("D7").Value = myUsername
Worksheets("Tabelle1").Range("S10").Copy _
Destination:=Worksheets("Tabelle2").Range("E7")
Moin Leute, dass ist der Code mit dem ich bereits geschafft habe, sobald das Spiel "game over" ist, mithilfe der Inputbox einen Usernamen in Tabelle 2 und mit der Copy Funktion den Highscore einzugeben. Wie ihr euch denken könnt, habe ich aber das Problem, sobald ich das Spiel neustarte und beim nächsten Game over einen Usernamen eingebe, überschreibt er den vorherigen Namen und die Punkte..
Daher eine Idee, wie ich eine Liste erstellen könnte? Außerdem müsste ich auch noch zusehen, dass der die dann auch in die richtige Reihenfolge zuordnet, sprich: höchster Highscore an erster Stelle usw. Hätte da jemand eine Idee ? würde mich freuen
lg
|