Екцел ВБА - Избор следеће празне ћелије у низу

Висуал Басиц Апплицатион или ВБА, када се користе у програму Мицрософт Екцел, је ефикасан алат, јер се репетитивни послови могу аутоматизовати уз помоћ ове апликације. Корисници могу да напишу прилагођени ВБА код како би задовољили потребе програмирања. Кроз занимљива својства као што је оффсет, може се радити у различитим ћелијама у Екцелу. Операције као што је бирање следеће празне ћелије у реду могу се аутоматски извршити, али само када је ова особина изабрана у ВБА.

Питање

Користим Екцел 2002

Код испод функционише добро, осим што желим да изаберем следећу празну ћелију десно у реду сваки пут када се унесе исти резултат играча.

Као што сада пише, он само преписује претходни унос.

 Схеетс ("Цлассиц") Изаберите АцтивеСхеет.Унпротецт Ранге ("Б1") Изаберите До До АцтивеЦелл.Валуе = Плаиер.Валуе АцтивеЦелл.Оффсет (1, 0). 0, 4) .валуе = Сцоре.валуе АцтивеСхеет.Протецт ГамеНумбер.Валуе = "" Плаиер.Валуе = "" Сцоре.Валуе = ""

Решење

ПРОБАЈТЕ ОВО:

 АцтивеЦелл.Валуе = Плаиер.Валуе Ацтивецелл.оффсет (0, 4) .валуе = Сцоре.валуе 'пронађите последњу коришћену ћелију у реду десно АцтивеЦелл.Енд (клТоРигхт). усед целл АцтивеЦелл.Оффсет (0, 1)