Button mit mehreren Bedingungen

[Stefan Zuber]

Hallo,
ich hoffe das ich das jetzt richtig erkläre.

Ich möchte mir eine Arbeitserleichterung schaffen und scheitere bereits den 3. Tag an einer Stelle.

Ich habe ein Blatt, auf dem soll der Nutzer ein paar Fragen beantworten. Ist eine Frage beantwortet, kommt die nächste. Am Schluss möchte ich gerne einen " Weiter" Button. Dieser soll nach drücken folgendes überprüfen und entsprechend handeln.

Beispielswerte

wenn b1<>" " und b2= blau, dann springe auf Blatt blau
wenn b1<>" " und b2= rot , dann springe auf Blatt rot
wenn b1<>" " und b2= grün , dann springe auf Blatt grün
wenn b1<>" " und b2= gelb , dann springe auf Blatt gelb

Ich bin halt nur ein einfacher Nutzer der im Grund zurecht kommt. Aber hier bin ich überfordert.

Vieleicht hat da jemand eine einfache Lösung für.

LG Stefan

[schauan]

Hallöchen,

also, falls es auch ohne Button und Makro sein darf, reicht eventuell auch ein Hyperlink. Den kann man per Formel erzeugen ...

Im Prinzip
=WENN(A1="ups";HYPERLINK("#Tabelle2!A1";"Tabelle2");HYPERLINK("#Tabelle3!A1";"Tabelle3"))

[Egon12]

Hallo,

Lösung mit Button

Gruß Uwe

[RPP63]

Moin!

wenn b1<>" " und b2= blau

Ist mit blau "blau" oder blau gemeint?

Will heißen:
Text oder Farbe?

Ich hoffe mal, dass letzteres nicht zutrifft.

Gruß Ralf

[schauan]

... die Hoffnung stirbt hier wohl zuerst
Ich hoffe auch, das es geschrieben wird. Man kann in eine blaue Zelle ja auch blau in blau reinschreiben bzw. per Formel reinsetzen

[Stefan Zuber]

Hallo,
Text  meine ich. Farbe ist nur als Beispiel gedacht.

lg

---

Hallo,

Lösung mit Button

Gruß Uwe

Hallo Uwe,

genau diesen Ablauf habe ich gemeint. Nur das du dich auf die Farben fixiert hast. Diese waren als Beispiel gedacht, war falsch von mir.

Gedacht zb:

Wenn in B2 Haus steht, dann soll es in Blatt Haus Springen. Wenn in B2 Licht steht, soll es in das Blatt Licht springen.

Gruss Stefan

[schauan]

Hallöchen,

dann kann man die Hyperlinkformel einfacher gestalten

=HYPERLINK("#" & A1 & "!A1";A1)

[Egon12]

na ja, dann ins Modul der Tabelle1 so:

Code:

Private Sub CommandButton1_Click()
    If Range("B1") <> "" Then
        If Range("B2") = "blau" Then Tabelle2.Select
        If Range("B2") = "rot" Then Tabelle3.Select
        If Range("B2") = "grün" Then Tabelle4.Select
        If Range("B2") = "gelb" Then Tabelle5.Select
    End If
End Sub

Gruß Uwe

[snb]

Es wäre besser ähnliche Daten nicht zu splitten in 4 Blätter.
Integriere die Daten in nur 1 Arbeitsblatt und deine 'Probleme' sind verschwunden: 'structuring precedes coding'.

[Stefan Zuber]

Danke,

funzt genau so wie ich mir das Vorgestellt habe.

Danke.

LG Stefan