Excel VBA - Auswahl der nächsten leeren Zelle in einer Reihe
Visual Basic Application oder VBA ist in Microsoft Excel ein effizientes Tool, da sich wiederholende Aufträge mithilfe dieser Anwendung automatisiert werden können. Die Benutzer können benutzerdefinierten VBA- Code schreiben, um ihre Programmieranforderungen zu erfüllen. Durch interessante Eigenschaften wie Offset kann man in Excel zellenübergreifend arbeiten. Vorgänge wie das Auswählen der nächsten leeren Zelle in einer Zeile können automatisch ausgeführt werden, jedoch nur, wenn diese Eigenschaft in VBA ausgewählt ist.
Problem
Ich benutze Excel 2002
Der folgende Code funktioniert einwandfrei, außer dass ich jedes Mal, wenn die gleiche Punktzahl des Spielers eingegeben wird, die nächste leere Zelle rechts in der Reihe auswählen möchte.
Beim Lesen wird nur der vorherige Eintrag überschrieben.
Sheets ("Classic"). Select ActiveSheet.Unprotect Range ("B1"). Select Do Before ActiveCell.Value = Player.Value ActiveCell.Offset (1, 0). Select Loop ActiveCell.Value = Player.Value Activecell.offset ( 0, 4) .value = Score.value ActiveSheet.Protect GameNumber.Value = "" Player.Value = "" Score.Value = ""
Lösung
VERSUCHE DIES:
ActiveCell.Value = Player.Value Activecell.offset (0, 4) .value = Score.value 'Zuletzt verwendete Zelle in der rechten Zeile suchen ActiveCell.End (xlToRight) .Select' Eine Zelle vom letzten nach rechts verschieben verwendete Zelle ActiveCell.Offset (0, 1) .Auswahl
Hinweis
Danke an rizvisa1 für diesen Tipp im Forum.