Я пытаюсь разработать превосходную версию бейсбольной системы показателей с бриллиантами, представляющими основание с первой по третью, и пятиугольником для домашней таблички.
В настоящее время я работаю только с первыми игроками-ватинами и запуском информации во время первого тайма и скопирую рабочий код остальным игрокам и другим иннингу. Я поместил скрытые кнопки сверху каждой базы, кнопку сверху круга Out, четыре кнопки для шаров и три кнопки для ударов.
Суть в том, что при броске мяча или удара щелкает соответствующая кнопка, и цвет кнопки назад становится темно-серым . Если игрока нет, то нажимается кнопка в верхней части внешнего круга, которая заполняет круг черным цветом. Для каждой базы бегун делает это безопасно, кнопка нажата, и база заполнена черным цветом. Когда нажимается кнопка «Домашняя пластина», заполняет домашнюю пластинку черным цветом и увеличивает счет в поле домашней отметки на единицу. Будет ли это работать, и если так, кто-нибудь, пожалуйста, помогите мне с частью VBA каждого события?
Если по какой-либо причине была допущена ошибка, можно нажать соответствующую кнопку еще раз и отменить действия предыдущих нажатий.
Метод, который я буду использовать для тестирования, - это нажатие на каждую кнопку, чтобы увидеть ответ и эффект. Если кнопки первых игроков работают, не влияя на других игроков, я перейду к следующему игроку, чтобы увидеть, влияет ли какая-либо предыдущая кнопка на нажатие кнопок этих игроков. Так и так далее, пока я не достигну последнего игрока в последнем иннинге. Я предполагаю, что мне не нужно будет проверять кнопки каждого отдельного игрока и что после трех или четырех игроков, работающих правильно, все кнопки игроков будут работать правильно.
** Я использую кнопки MS Excel 2013 и ActiveX для оснований и круг Out и кнопки формы для шаров и ударов.
источник
Ответы:
Не совсем понятно, какая помощь вам нужна. Этот код создаст кнопку на листе:
После того, как Shape был создан, назначьте ему этот макрос:
с каждым нажатием кнопки форма будет менять цвет:
источник