Как Popup Text Box с одним щелчком мыши с помощью VBA в Microsoft Excel 2010
В этой статье вы узнаете, как отображать всплывающий текст одним щелчком мыши с помощью кода VBA.
[.underline] # Давайте разберемся на примере: # Чтобы просмотреть всплывающее окно с текстовым полем при щелчке по определенной ячейке, вам необходимо выполнить следующие действия. Щелкните вкладку «Разработчик». В группе «Код» выберите Visual Basic
Введите следующий код в Sheet1
Private Sub Worksheet_SelectionChange (ByVal Target As Range)
Если Intersect (Target, Range («A1»)) равен нулю, то
ActiveSheet.Shapes.Range (Array («TextBox 1»)). Visible = False
Остальное
ActiveSheet.Shapes.Range (Array («TextBox 1»)). Visible = True
Конец Если
End Sub
Событие SelectionChange гарантирует, что всякий раз, когда будет нажата ячейка A1, появится всплывающее окно Textbox. См. Ниже снимок
Таким образом, мы можем позволить другому человеку правильно ввести свою информацию.