Excel VBA - Velger neste tomme celle på rad

Visual Basic Application eller VBA, når det brukes i Microsoft Excel, er et effektivt verktøy, da gjentatte jobber kan automatiseres ved hjelp av dette programmet. Brukerne kan skrive tilpasset VBA kode for å møte deres programmeringsbehov. Gjennom interessante egenskaper som forskyvning, kan man operere på forskjellige celler i Excel. Operasjoner som å velge neste tomme celle på rad kan gjøres automatisk, men bare når denne egenskapen er valgt i VBA.

Utgave

Jeg bruker Excel 2002

Koden nedenfor virker bra, bortsett fra at jeg vil velge neste tomme celle til høyre i raden hver gang den samme spillers poengsum er oppgitt.

Som det leses nå, overskriver det bare forrige oppføring.

 Arkiv ("Classic"). Velg ActiveSheet.Unprotect Range ("B1"). Velg Gjør til ActiveCell.Value = Player.Value ActiveCell.Offset (1, 0) .Velg Loop ActiveCell.Value = Player.Value Activecell.offset ( 0, 4) .value = Score.value ActiveSheet.Protect GameNumber.Value = "" Player.Value = "" Score.Value = ""

Løsning

PRØV DETTE:

 ActiveCell.Value = Player.Value Activecell.offset (0, 4) .value = Score.value 'finn sist brukte celle på rad til høyre ActiveCell.End (xlToRight) .Velg' flytt en celle til høyre fra sist brukt celle ActiveCell.Offset (0, 1) .Velg