PowerPoint "Своя игра" как вести подсчет очков

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
tetris
Сообщения: 2
Зарегистрирован: 30 янв 2006, 00:53

Как вести подсчет очков причем всего 3 участника игры. Вопросы делятся по сложности: за простые мало очков за сложные побольше.

Мне необходимо сделать следующее: 25 слайдов на каждом должно быть три кнопки (три команды) вопрос имеет свою цену . при угадывании кликаем на счастливца. Потом в конце когда будут разгаданы все 25 слайдов кликаем на кнопку и выводиться результат кто победил в виде столбиков, и как-то по другому.

подскажите как ????
Аватара пользователя
Naeel Maqsudov
Сообщения: 2570
Зарегистрирован: 20 фев 2004, 19:17
Откуда: Moscow, Russia
Контактная информация:

На последнем слайде подготовить таблицу из 3 колонок.
На каждый слайд добавить по 3 кнопки и написть макросы, которые записывают в ячейки таблицы очки. Макросы с предпоследнего слайда должны дополнительно еще и просуммировать все столбцы.

Собственно в каждом макросе (кроме последних) будет по одной строке.
На вскидку не помню как к таблице там обратиться....
Вспомню - напишу.
tetris
Сообщения: 2
Зарегистрирован: 30 янв 2006, 00:53

Вспомни пожалуста
Аватара пользователя
Naeel Maqsudov
Сообщения: 2570
Зарегистрирован: 20 фев 2004, 19:17
Откуда: Moscow, Russia
Контактная информация:

Если на слайде 3 второй элемент - это таблица, то в ячейку 2:2 текст можно записать так:

Код: Выделить всё

Sub qwe()
   ActivePresentation.Slides(3).Shapes(2).Table.Cell(2, 2).Shape.TextFrame.TextRange.Text = "qazwsx"
End Sub

Ответить