In diesem Artikel erfahren Sie, wie Sie Text mit einem einzigen Klick mithilfe von VBA-Code anzeigen.

[.underline] # Lassen Sie uns anhand eines Beispiels verstehen: # Um ein Textfeld-Popup anzuzeigen, während Sie auf eine bestimmte Zelle klicken, müssen Sie die folgenden Schritte ausführen. Klicken Sie auf die Registerkarte Entwickler. Wählen Sie in der Gruppe Code die Option Visual Basic

img1

aus Geben Sie den folgenden Code in Sheet1

ein === Private Sub Worksheet_SelectionChange (ByVal-Ziel als Bereich)

Wenn Intersect (Ziel, Bereich („A1“)) nichts ist, dann

ActiveSheet.Shapes.Range (Array („TextBox 1“)). Visible = False

Sonst

ActiveSheet.Shapes.Range (Array („TextBox 1“)). Visible = True

End If

End Sub

img2

Das SelectionChange-Ereignis stellt sicher, dass bei jedem Klicken auf Zelle A1 das Textfeld angezeigt wird. Siehe unten Schnappschuss

img3

Auf diese Weise können wir die andere Person ihre Informationen korrekt eingeben lassen.