Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1192to1196
1192to1196
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Schaltbutton in Abhängigkeit von Ergebnis

Forumthread: Schaltbutton in Abhängigkeit von Ergebnis

Schaltbutton in Abhängigkeit von Ergebnis
Ergebnis
Hallo liebe Excelprofis,
habe ein kleines Problem,
habe hier einen Code der so weit gut funktioniert. Allerdings habe ich jetzt einen dritten Button dazu gesetzt und da kommt bei Butten3 die Fehlermeldung Variabele nicht definiert und der Debugger geht auf. Ich finde den Fehler nicht . Könnt ihr mir bitte einen Tip geben. Danke René 
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Butten1 As Object
Dim Butten2 As Object
Dim Button3 As Object
If Sheets("Rechnen").Range("C46") Is Nothing Then Exit Sub
Set Butten1 = CommandButton1
Set Butten2 = CommandButton2
Set Button3 = CommandButton3
If Sheets("Rechnen").Range("C46") = "1" Then
Butten1.Visible = True
Butten1.BackColor = &HFFC0FF
Butten2.Visible = True
Butten2.BackColor = &HFFC0C0
Butten3.Visible = True
Butten3.BackColor = &HFFC0C0
ElseIf Sheets("Rechnen").Range("C46") = "2" Then
Butten1.Visible = True
Butten1.BackColor = &HFFC0C0
Butten2.Visible = True
Butten2.BackColor = &HFFC0FF
Butten3.Visible = True
Butten3.BackColor = &HFFC0C0
ElseIf Sheets("Rechnen").Range("C46") = "2" Then
Butten1.Visible = True
Butten1.BackColor = &HFFC0C0
Butten2.Visible = True
Butten2.BackColor = &HFFC0C0
Butten3.Visible = True
Butten3.BackColor = &HFFC0FF
ElseIf Sheets("Rechnen").Range("C46") = "" Then
Butten1.Visible = False
Butten2.Visible = False
Button3.Visible = False
End If
End Sub

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
Option Explicit
25.12.2010 16:57:54
ransi
Hallo
Schreib mal als erste Zeile in das Modul:
Option Explicit
Dann wirds ganzschnell klar.
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Butten1 As Object
Dim Butten2 As Object
.
.
.

ransi
Anzeige
AW: Schaltbutton in Abhängigkeit von Ergebnis
25.12.2010 17:57:21
Ergebnis
Hallo René,
und den Code ein wenig aufgeräumt 
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Butten1 As Object
Dim Butten2 As Object
Dim Butten3 As Object
Set Butten1 = CommandButton1
Set Butten2 = CommandButton2
Set Butten3 = CommandButton3
Select Case Sheets("Rechnen").Range("C46")
Case 1
Butten1.Visible = True
Butten1.BackColor = &HFFC0FF
Butten2.Visible = True
Butten2.BackColor = &HFFC0C0
Butten3.Visible = True
Butten3.BackColor = &HFFC0C0
Case 2
Butten1.Visible = True
Butten1.BackColor = &HFFC0C0
Butten2.Visible = True
Butten2.BackColor = &HFFC0FF
Butten3.Visible = True
Butten3.BackColor = &HFFC0C0
Case ""
Butten1.Visible = False
Butten2.Visible = False
Butten3.Visible = False
End Select
Set Butten1 = Nothing
Set Butten2 = Nothing
Set Butten3 = Nothing
End Sub


Anzeige
AW: Schaltbutton in Abhängigkeit von Ergebnis
25.12.2010 18:17:19
Ergebnis
Hallo René, 

Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Sheets("Rechnen").Range("C46")
Case 1
CommandButton1.BackColor = &HFFC0FF
CommandButton2.BackColor = &HFFC0C0
CommandButton3.BackColor = &HFFC0C0
Case 2
CommandButton1.BackColor = &HFFC0C0
CommandButton2.BackColor = &HFFC0FF
CommandButton3.BackColor = &HFFC0C0
End Select
CommandButton1.Visible = Not Sheets("Rechnen").Range("C46") = ""
CommandButton2.Visible = Not Sheets("Rechnen").Range("C46") = ""
CommandButton3.Visible = Not Sheets("Rechnen").Range("C46") = ""
End Sub
Allerdings, nimm vielleicht doch den Code von Hajo und bau Case Else ein...

Gruß
Reinhard
Anzeige
AW: Schaltbutton in Abhängigkeit von Ergebnis
25.12.2010 18:24:24
Ergebnis
Hallo Reinhard,
ich habe es schon öffters im Internet gelesen. Das VBA Projekte angezeigt werden obwoh die Datei geschlossen ist. Was da helfen soll, alle Variablen die mit Set gesetzt wurden am Ende auf Nothing setzen.
Gruß Hajo
Anzeige
Danke dir für die Info, o.w.T.
27.12.2010 11:48:29
Reinhard

;

Forumthreads zu verwandten Themen

Skalierung eines Diagramms (Y-Achse)
Herbert

Hallo,
ich möchte gern die Y-Achse eines erstellten Liniendiagramms skalieren. Leider kann ich diese nicht ändern. Egal, was ich eintrage, die Skalierung ändert sich nicht. Über den eigentlichen Eingabefeldern steht das Wort "Automatisch".
Was mache ich falsch?
Gruß Herbert
05.01.2009 17:06:51
Thread-ID: 1037039
2 Beiträge
Diagramm Werte und Achsen dynamisch verändern
Niko

Hallo zusammen,
ich bin ziemlich am verzweifeln, da ich nun schon seit Stunden an einem Problem sitze und auch das Internet bereits abgesucht habe, aber leider ohne Erfolg. Deshalb wende ich mich an Euch und hoffe ihr könnt helfen:
Und zwar habe ich in einer Mappe 10 Diagramme angelegt,...
28.01.2009 11:12:40
Thread-ID: 1044498
9 Beiträge
3D-Diagramm y-Achse Schattierung wie Legende
Martin

Liebe Leute,
ich habe ein 3-Diagramm (Oberfläche) erstellt. Die y-Werte können anhand der Oberflächen-Abschnitts-Farbe und über die Legende abgelesen werden.
Nun wäre es viel komfortabler, die Legenden-Farben direkt auf der yz-Fläche zu haben. Dann hätte man die direkte Zuordnung.
K...
09.02.2009 21:02:00
Thread-ID: 1048796
3 Beiträge
3D-Diagramm y-Achse Schattierung wie Legende
Martin

Liebe Leute,
ich habe ein 3-Diagramm (Oberfläche) erstellt. Die y-Werte können anhand der Oberflächen-Abschnitts-Farbe und über die Legende abgelesen werden.
Nun wäre es viel komfortabler, die Legenden-Farben direkt auf der yz-Fläche zu haben. Dann hätte man die direkte Zuordnung.
K...
10.02.2009 21:44:00
Thread-ID: 1049345
2 Beiträge
Löschen von Datenreihen in XY Diagramm
Datenreihen

Hallo Liebe Excel-Experten,
Dieses Problem habe ich bereits in einem anderen Forum gepostet. Dort konnte aber leider niemand mein Problem lösen. Deshalb habe ich es im anderen Forum als erledigt markiert und erwarte auch keine Antwort mehr.
Viel mehr hoffe ich, dass Ihr mir weiterhelfen...
17.02.2009 13:08:00
Thread-ID: 1051455
3 Beiträge
Farbumschlag von Aufwärtsbalken in Diagrammen
Aufwärtsbalken

Hallo zusammen,
ich habe folgendes Problem: Ich benutze die Darstellung von Aufwärts- und Abwärtsbalken (Pos./Neg. Abweichung) zur Darstellung von s.g. "Brückendiagrammen". Dabei stelle ich die Pos. und Neg. Abw. in unterschiedlichen Farben dar. Hierbei stoße ich auf das Problem, dass klein...
25.03.2009 07:14:34
Thread-ID: 1063552
3 Beiträge
Diagramm mit dynamischer Rubrikenachse
Dieterlem

Hallo Excelfreunde,
ich möchte ein Diagramm erstellen. Je nach dem ändert sich die Anzahl der zu anzeigenden Rubriken.
Es gibt 20 Rubriken, die ich im Datenbereich erfasst habe. In einigen Fällen werden nicht alle Rubriken verwendet (Eintrag im Datenbereich = "" Wert =0) wie kann ich da...
03.05.2009 10:53:43
Thread-ID: 1072501
4 Beiträge
Diagramm X-Achse
Reinhard

Hallo!
Für folgendes Problem suche ich eine Lösung. Ich habe eine Tabelle mit Datumsangaben und Meßwerten. Das gewünschte Diagramm soll als x-Achse das Datum tragen, es soll aber keine Zeitachse sein sondern die Abstände zwischen den einzelnen Messungen soll gleich sein. Das kriege ich ja n...
14.05.2009 11:58:36
Thread-ID: 1075090
6 Beiträge
Netzdiagramm - Y-Achse entschlacken.
Manuel

Hallo,
ich bin auf folgendes Problem gestoßen, habe dazu aber keine Lösung gefunden. Mein Fall ist ganz ähnlich, weshalb ich mir erlaube dieses Zitat zu verwenden.
Hallo! Ich habe ein Problem mit der Darstellung eines Diagramms. Ich habe in Excel ein Netzdiagramm erstellt, mit 2 Daten...
28.05.2009 08:31:35
Thread-ID: 1077837
2 Beiträge
Anzeige
Netzdiagramm - Y-Achse entschlacken.
Manuel

Hallo,
ich bin auf folgendes Problem gestoßen, habe dazu aber keine Lösung gefunden. Mein Fall ist ganz ähnlich, weshalb ich mir erlaube dieses Zitat zu verwenden.
Hallo! Ich habe ein Problem mit der Darstellung eines Diagramms. Ich habe in Excel ein Netzdiagramm erstellt, mit 2 Daten...
28.05.2009 09:36:28
Thread-ID: 1077848
2 Beiträge
Farbe von Diagrammsäulen in Abhängigkeit von Wert?
Diagrammsäulen

Kann man die Farbe einer Diagrammsäule in Abhängigkeit vom Wert einer bestimmten Zelle ändern? (wobei der Wert der Zelle leider nicht der ist, der die Säule bestimmt, die Säule ist immer der ABS()-Wert der Zahl, die die Farbe bestimmen soll.
Ideen?
Wäre großartig...
Ulrike
17.06.2009 12:06:12
Thread-ID: 1082199
3 Beiträge
Pflichtfeld in Abhängigkeit von Zelleninhalt
Zelleninhalt

Hallo zusammen,
hier mein Poblem:
Ein Tabellenblatt enthält eine Liste von Aufgaben, wobei jeder Aufgabe ein Status zugewiesen werden kann.
Spalte A enthält jeweils die Bezeichnung der Aufgabe.
In Spalte B stehen über ein Auswahlfeld der ""StatusA"", ""StatusB"" und der ""Status...
03.08.2009 13:33:48
Thread-ID: 1093209
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige