Статьи из блога
Вставка текста с помощью кнопки
Вячеслав спрашивает:
Как создать кнопку, при нажатии на которую её название добавлялось бы в текстовую строку? Кнопок на странице будет много и с разными названиями.
Для начала необходимо создать
Предположим, в начале документа у вас есть или будет кнопка, а двумя строками ниже вы хотите вставить ее название:
Чтобы добавить кнопку, следует открыть панель инструментов Элементы управления и выбрать элемент Кнопка:
После этого в том месте, где должен будет находиться ваш текст, вы добавляете свою закладку, назвав ее, например, button. Чтобы увидеть символ закладки, активируйте параметр отображения закладок в тексте (об этом читайте
Далее, дважды щелкаете на кнопке - откроется редактор кода. Вставляете в код между операторами Private Sub CommandButton1_Click() и End Sub следующий оператор:
ActiveDocument.Bookmarks("button").Range.InsertAfter CommandButton1.Caption
Должно получиться примерно так:
Но, что если вам нужно вставить не наименование кнопки, а некий заранее определенный текст? В этом случае вам нужно слегка изменить вышеприведенный код. Например, добавить такой код:
Dim sStr As String sStr = "Вставка заранее определенного текста с помощью кнопки" ActiveDocument.Bookmarks("button").Range.InsertAfter sStr
Вместо моего текста вставьте свой. В итоге должно получиться примерно так:
Закрываете редактор кода (обязательно!), сохраняете документ и испытываете работу кнопки.
Если вам нужно изменить стандартное наименование кнопки "CommandButton1" на свое, то щелкните правой кнопкой мыши на кнопке, чтобы вызвать контекстное меню, и выберите команду Свойства. Откроется окно свойств кнопки:
Измените название кнопки на свое в поле Caption и закройте окно свойств.
Метки: закладки | макросы | элементы управления
Просмотров: 24719
Подписаться на комментарии по RSS
Версия для печати
Еще записи по вопросам использования Microsoft Word:
- 10 вопросов и ответов по редактору Word (1 часть)
- 10 полезных заметок о колонтитулах
- 3 способа очистки списка недавно открытых документов
- Microsoft Office: популярные команды на одной вкладке
- SQL для начинающих: изучите SQL онлайн за 9 часов
- Word 2007: добавляем свою вкладку и свои команды
- Word 2007: полотно, рисунки, линии
- Word 2007: смена формата сохранения файла
- Word 97 - решение проблемы с отображением символов на линейке
- Word 97. Слияние документов как один из способов упростить свою работу
- Абзац с цветным фоном
- Автозаполняемые колонтитулы
- Автоматизация текстового набора в Word
- Автоматическая запись макроса
- Автоматическая нумерация билетов
- Автоматическая расстановка переносов
- Автоматическое обновление полей при открытии документа
- Автоматическое сохранение всех открытых документов
- Автоматическое сохранение документа при его закрытии
- Автотекст с последовательной нумерацией
- Белый текст на синем фоне в Word 2007
- Белый текст на синем фоне: ностальгия по DOS
- Быстрая смена ориентации страниц документа
- Быстрое выделение идущих рядом слов
- Быстрое изменение стиля форматирования текста
Комментариев: 3
Добрый день! А как быть если надо установить возле кнопки сайта, её html код? Я буду с нетерпением ждать ответа... Заранее спасибо!
При чем здесь HTML-код? Это VBA.
А код кнопки в HTML выглядит так:
Привет, есть вот какая проблема, необходимо вставлять скопированный тект в ячейку таблица ворд, каждый раз в следующую ячейку