Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Form mit Makro nach Zellenwert ein- und ausblenden

Forumthread: Form mit Makro nach Zellenwert ein- und ausblenden

Form mit Makro nach Zellenwert ein- und ausblenden
08.07.2025 21:20:51
Soham235
Hallo in die Runde,

ich habe in einer Zelle (B2) eine 'Wenn-Dann' Bedingung à la "=WENN(Bedingung;Text1;Text2)". Darüber hinaus habe ich einen einen Button, eine Form mit einem Makro namens "Tabelle5".

Meine Frage: Ist es möglich, den Button nach dem jeweiligen Wert der Zelle (B2) ein- und auszublenden?

Alex
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Form mit Makro nach Zellenwert ein- und ausblenden
08.07.2025 22:04:00
schauan
Hallo Alex,

sicher, aber wann?
Du prüfst - im Prinzip
If [B2]="Ja" Then Button.Visible=True

Du kannst Dir dabei mit dem Makrorekorder helfen, eifach mal den Button selektieren ud wieder in eine Zelle gehen.

Sub Makro1()

'
' Makro1 Makro
'

'
ActiveSheet.Shapes.Range(Array("Button 1")).Select
Range("H1").Select
End Sub


Statt .Select geht auch .Visible = False

verarbeiten tust Du die Zeile z.B.
1) beim Calculate-Ereignis, dann läuft das immer

If [B2]="Ja" Then ActiveSheet.Shapes.Range(Array("Button 1")).Visible=True

2) beim Change-Ereignis, wo Du die Zellen prüfst, die zum Ergebnis in B2 führen. Sind das z.B. A1 und A2 dann

If (Not Intersect (Target, Range("A1") is Nothing) or (Not Intersect (Target, Range("A2") is Nothing)
If Range("A1") = "xxx" And If Range("A2")="YYY" Then
ActiveSheet.Shapes.Range(Array("Button 1")).Visible = False
Else
ActiveSheet.Shapes.Range(Array("Button 1")).Visible = True
End If
End If



Anzeige
AW: Form mit Makro nach Zellenwert ein- und ausblenden
08.07.2025 23:45:21
Soham235
Hi,
danke dir! Jetzt funzt es richtig gut.
Grüße
Alex
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18