Доступ к текстовому полю на многостраничном объекте листа (не пользовательская форма VBA) - PullRequest
0 голосов
/ 23 февраля 2019

Я создал многостраничный объект в объекте листа.Работает красиво.Но я хочу получить доступ к текстовому полю, которое находится на второй странице многостраничного объекта.Я часами искал и не могу найти решение.Я думал, что это будет что-то вроде:

With Sheet6.InputArea
    With .Pages("Details")
        With .texbox4.value = "100"

        End With
    End With
End With

Был бы очень благодарен, если бы кто-то мог указать мне в правильном направлении.

Ответы [ 2 ]

0 голосов
/ 24 февраля 2019

Я открыл вкладку разработчика и записал макрос, чтобы увидеть вывод.Я немного подправил код и произвел следующее:

Worksheets("Sheet1").Shapes.Range(Array("TextBox 1")).TextFrame2. _
TextRange.Characters.Text = "Goodbye moon..."

Первоначальный результат записи макросов был:

ActiveSheet.Shapes.Range(Array("TextBox 1")).Select
Selection.ShapeRange(1).TextFrame2.TextRange.Characters.Text = "Hello World!!!"

Я решил заменить ActiveSheet на определенное имя ихотел ссылаться напрямую, не требуя выбора.

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

0 голосов
/ 23 февраля 2019

With требует ссылки на объект, но выражение .texbox4.value = "100" будет иметь логический тип

.texbox4.value = "100"

должно работать без With...End with

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...