Как активировать входной режим с VBA на текстовом поле неактивного x, вставленного в рабочий лист?

Я вручную разместил текстовое поле non-activex на листе. Если я присваиваю ему макрос, то при нажатии на текстовое поле выполняется макрос, как ожидалось.

Однако входной режим не включен в текстовое поле. Как макрос помещает текстовое поле в режим ввода?

Обратите внимание: это текстовое поле, вставленное из ленты Insert.

введите описание изображения здесь

спасибо

я обнаружил ответ незадолго до публикации вышеуказанного вопроса:

Sub Activate_Textbox() ' stuff to do before edit mode... ' ... ' get textbox name Dim sName As String sName = Application.Caller ' get textbox shape object Dim txtBox As Shape Set txtBox = ActiveSheet.Shapes(sName) ' enter edit mode (put cursor into textbox) txtBox.TextFrame2.TextRange.Select ' cleanup Set txtBox = Nothing End Sub 

Рекомендуется защищать лист, иначе вы увидите дескрипторы выделения в текстовом поле, когда он имеет фокус. И, если вы защитите лист, вам нужно разблокировать текст, чтобы вы могли ввести его:

введите описание изображения здесь

  • Ячейка, связанная с текстовым полем ActiveX, возвращающая текст вместо номера
  • VBA Excel Укажите текущую дату в текстовом поле
  • Получение текста из хеш-таблицы текстовых полей
  • Excel VBA; UserForm, запуск одного фрагмента кода для разных значений TextBox
  • Как использовать данные, введенные в пользовательскую форму в основном модуле
  • Получение значения из текстового поля и сохранение его в переменной в VBA
  • Добавление переменного количества символов в строку, основанная на текущей длине строки
  • Автоматическое заполнение текстового поля в Excel VBA
  • Удалить строку из текстового поля, форм и т. Д., Которые могут быть сгруппированы
  • Добавить прослушиватель событий в текстовое поле Excel (потерять фокус)
  • Добавление чисел с использованием форм Excel
  • Interesting Posts

    Формула Excel COUNTIF (Пропустить диапазон заказа)

    Regex VBA Excel Поиск шаблонов внутри ячейки

    Поиск VBA для повторения одиночного символа с использованием Regex

    Ограничение результатов SQL до 2 десятичных мест в Excel

    Обработка массивов в макросах VBA для Excel

    Выполнять функцию диапазона (например, сумму, среднюю, среднюю) на основе условия

    Попытка создать UDF, который анализирует цены на акции с помощью пакета VBA-Web на Github

    VBA для копирования из одной книги и вставки в другую

    Как преобразовать лист в строку? Или мне даже нужно?

    Сводка данных Excel по текстовому значению – аналогично сводной таблице

    Держите ссылку на ячейку в новом листе

    Печать из ppt VBA в электронную таблицу Excel

    Как захватить данные из формы VBA Access и использовать эти данные в пользовательской форме Outlook?

    График Excel не обновляется после макроса (включен автоматический режим)

    Проблема с написанием файла данных pandas для Excel

    Давайте будем гением компьютера.