Wie kann ich eine bestimmte Form basierend auf dem angegebenen Zellenwert in Excel ein- oder ausblenden?
Tatsächlich kann eine bestimmte Form basierend auf dem Wert einer bestimmten Zelle ausgeblendet oder nicht ausgeblendet werden. Die folgende Methode kann Ihnen helfen.
Ein- oder Ausblenden einer bestimmten Form basierend auf dem angegebenen Zellenwert mit VBA-Code
Ein- oder Ausblenden einer bestimmten Form basierend auf dem angegebenen Zellenwert mit VBA-Code
Sie möchten beispielsweise eine bestimmte Form einblenden, wenn Sie Nummer 1 in Zelle A1 eingeben, oder diese Form ausblenden, wenn Zelle A1 andere Werte enthält. Bitte führen Sie den folgenden VBA-Code aus, um dies zu erreichen.
1. Klicken Sie mit der rechten Maustaste auf die Blattregisterkarte, die die Form enthält, die Sie ein- oder ausblenden möchten, und klicken Sie dann auf Code anzeigen aus dem Kontextmenü.
2. Dann die Microsoft Visual Basic für Applikationen Fenster öffnet sich. Bitte kopieren Sie den folgenden VBA-Code und fügen Sie ihn in den ein Code Fenster.
VBA-Code: Blendet eine bestimmte Form basierend auf dem angegebenen Zellenwert ein oder aus
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 And Target.Column = 1 Then _
Me.Shapes("Oval 6").Visible = (Cells(1, 1).Value = 1)
End Sub
Notizen: Im Code:
Sie können sie nach Bedarf ändern.
3. Drücken Sie die Taste Andere + Q Tasten gleichzeitig zum Schließen der Microsoft Visual Basic für Applikationen Fenster.
Wenn Sie von nun an Nummer 1 in Zelle A1 eingeben, wird die Form „Oval 6“ nicht mehr ausgeblendet. Wenn Sie jedoch einen anderen Wert wie Nummer 2 in die Zelle A1 eingeben, wird die Form „Oval 6“ sofort ausgeblendet.
In Verbindung stehende Artikel:
- Wie füge ich einer bestimmten Form in Excel eine Maus über die Spitze hinzu?
- Wie kann ich die Formgröße basierend auf dem angegebenen Zellenwert in Excel automatisch ändern?
- Wie fülle ich eine Form mit transparenter Hintergrundfarbe in Excel?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!