У меня есть два флажка activeX (checkbox7 и checkbox10), и я хотел бы, чтобы заголовок, который отображается рядом с флажком, изменился со значением ячейки Sheet1 J13. J13 может изменить значение оператором IF

Я попробовал пару вещей. Пробовал использовать код, который я нашел в Интернете, но он должен был создать несколько флажков с нуля, а затем изменить заголовок. Я пытался изолировать часть, где они меняют заголовок и дублирует его, но это ничего не сделало для меня.

Вот что у меня сейчас:

>     Sheets("Customer View").OLEObjects("CheckBox7").Object.Caption = Sheets("Customer View").Range("J13").Value
    Sheets("Customer View").OLEObjects("CheckBox10").Object.Caption = Sheets("Customer View").Range("J13").Value

Спасибо

2 ответа2

0

Вам не хватает некоторых двойных кавычек в функции Range() :

Sub qwerty()
   With Sheets("Customer View")
      .OLEObjects("CheckBox7").Object.Caption = .Range("J13").Value
   End With
End Sub
0

В конце концов я выбрал самое простое решение: оставьте заголовок флажка пустым и установите флажок так, чтобы он совпадал с пустой ячейкой. Затем я просто использую эту ячейку, чтобы показать текст, который я хочу.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .