Текстовое поле - это пустое поле, в котором пользователь может заполнить фрагмент текста. Чтобы создать текстовое окно в Excel VBAвыполните следующие шаги.
1. На вкладке «Разработчик» нажмите «Вставить».
2. В группе «Элементы управления ActiveX» щелкните «Текстовое поле».
3. Перетащите командную кнопку и текстовое поле на рабочий лист.
4. Щелкните правой кнопкой мыши командную кнопку (убедитесь, что выбран режим «Дизайн»).
5. Щелкните Просмотреть код.
Примечание. Вы можете изменить заголовок и имя элемента управления, щелкнув его правой кнопкой мыши (убедитесь, что выбран режим «Дизайн»), а затем щелкнув «Свойства». Измените заголовок командной кнопки на «Импортировать данные». На данный момент мы оставим TextBox1 в качестве имени текстового поля.
6. Добавьте следующую строку кода:
TextBox1.Text = "Данные успешно импортированы"
7. Щелкните командную кнопку на листе (убедитесь, что режим «Дизайн» не выбран).
Результат:
8. Чтобы очистить текстовое поле, используйте следующую строку кода:
TextBox1.Value = ""
Примечание: хотя в некоторых ситуациях может быть полезно разместить текстовое поле непосредственно на вашем листе, текстовое поле особенно полезно при размещении в пользовательской форме.