Запрограммировать командную кнопку

Question

Я новичок в PowerPoint VBA. Может ли кто-нибудь предоставить какой-то код, чтобы, если я нажму кнопку команды, какой-то текст появится в текстовом поле?

Как я уже сказал, я новичок в этом и просто нуждаюсь в отправной точке.

Спасибо.

Answer 1

Для Office 2003 щелкните правой кнопкой мыши на панели инструментов и убедитесь, что панель инструментов управления проверена.

При использовании Бюро 2007+ следовать этому руководству,

http://www.addintools.com/documents/powerpoint/where-is-control-toolbox.html

Нарисуйте кнопку и текстовое поле на слайде из меню Controls.

Щелкните правой кнопкой мыши текстовое поле и перейдите к свойствам. Проверьте свойство Name - должно быть «Textbox1» или аналогичное. Вы можете изменить это, если хотите только отметить его на данный момент, именно по этому имени мы ссылаемся на наш новый экземпляр текстового поля.

Дважды нажмите кнопку, чтобы открыть редактор макросов.

Редактировать вновь созданный обработчик событий, так он содержит следующую строку,

Private Sub CommandButton1_Click() 
    'Button Click event fired so alter the text property of our text box 
    Textbox1.text = "Hello World" 
End Sub 

Или изменить на имя вашего текстового поля. Нажмите F5, чтобы просмотреть слайд-шоу. Текст должен появиться, когда вы нажмете кнопку.