Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Bedingung erfüllt und dann von anderem Worksheet Daten ein tragen
#1
Guten Abend zusammen,

ich habe eine ``kleine´´Aufgabe bekommen und habe sogar meinen ehemaligen Excel Dozenten gefragt und der konnte mir leider auch nicht weiter helfen, also versuche ich hier mein Glück. Also folgende Aufgabenstellung:

Ich habe 2 verschiedene Worksheets, in dem ersten habe ich 4 verschiedene Sorten: Banane, Äpfel, Kirsche und Beere. Im 2. Worksheet habe ich zu jeder Frucht mehrere Eigenschaften. Diese Eigenschaften sollen im 1. Sheet angezeigt werden, wenn die jeweilige Frucht im Dropdown mit Ja ausgewählt worden ist, bei einem Nein, soll von dieser Frucht gar nichts angezeigt werden.

Hiermit habe ich schon mein Glück versucht, leider klappt es (noch) nicht, arbeite auch jetzt zum ersten mal mit VBA.

Code:
(Sub Anzeigen()

Dim Banane As String
Dim Apfel As String
Dim Kirsche As String
Dim Beere As String

Worksheets("Zutaten").Select

If Cells(13, 3).Value = Ja Then
Banane = Range("Bereich1")
ElseIf Cells(14, 3).Value = Ja Then
Apfel = Range("Bereich2")
ElseIf Cells(15, 3).Value = Ja Then
Kirsche = Range("Bereich3")
ElseIf Cells(16, 3).Value = Ja Then
Beere = Range("Bereich4")

End If

ActiveCell.Offset(1, 0).Select
ActiveCell.Value = Frucht
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Hinweistext

End Sub

VIELEN DANK SCHON MAL IM VORRAUS
Antwortento top
#2
https://www.herber.de/forum/archiv/1780t...tm#1782685
https://www.clever-excel-forum.de/Thread...ein-tragen
https://www.ms-office-forum.net/forum/sh...p?t=370049
https://www.vba-forum.de/View.aspx?ziel=...f%C3%BCgen
Antwortento top
#3
Sieh an, in den anderen Foren war es möglich eine normale Schriftgröße zu verwenden.

Auftragsprogrammierung (Auswahl):
https://www.excel-inside.de/programmierung
https://www.herber.de/develop.html
https://www.makro-excel.de/erstellungsservice/
https://www.excel-live.de/excel-programmierung/
Wir sehen uns!
... shift-del
Hinweise zu meiner Hilfe in Foren
Excel Super-Funktionen: VERWEIS(), INDEX(), WAHL()
Antwortento top
#4
es ist für mich und meine neue Arbeitsstelle, ich bin da seit 3 Tagen dran. Tut mir leid, dass ich am verzweifeln bin. Aber wow, die Leute in den Foren fühlen sich persönlich angegriffen, weil man in mehreren fragt...
Antwortento top
#5
Dann passt ja meine eben gegebene Antwort in einem anderen Thread wie die Faust aufs Auge:
https://www.clever-excel-forum.de/Thread...n=lastpost

Deine Variable Frucht ist nicht belegt!

Und BITTE:
Wähle eine lesbare Schriftgröße bzw. behalte einfach die Standardgröße!

Gruß Ralf

Sieh an, jetzt verstehe ich sogar die Schriftgröße:
Selbst Antworten gibst Du per C&P!
Merkst Du noch etwas?
Falls ja:
So etwas zeugt mir von mangelndem Respekt den Helfern gegenüber!

Ich bin dann mal weg.
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Antwortento top
#6
Hallo Daniel,

um ein wenig die Einsichtsbereitschaft, nicht ohne zu verlinken in mehreren Foren gleichzeitig zu posten, zu motivieren, hier etwas Lesestoff, damit du weißt, warum Helfer in solchen Fällen in der Regel säuerlich reagieren: https://www.clever-excel-forum.de/misc.php?action=help&hid=10
Gruß Günter
Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen.
angebl. von Georg Christoph Lichtenberg (1742-1799)
[-] Folgende(r) 1 Benutzer sagt Danke an WillWissen für diesen Beitrag:
  • Daniel456
Antwortento top
#7
Moin Günter

Danke für die optischen Korrekturen.
Wir sehen uns!
... shift-del
Hinweise zu meiner Hilfe in Foren
Excel Super-Funktionen: VERWEIS(), INDEX(), WAHL()
Antwortento top
#8
Hi WillWissen

Verstehen kann ich es allemale. Für die Zukunft werde ich es nur noch in einem machen. War gestern Abend ein bisschen verzweifelt und habe mich zuvor nie in so einem Forum bewegt und kannte die "Gesetze" nicht. Und habe mich dann überall angemeldet und nach gefragt.
Antwortento top
#9
Hallo,

noch ein kleiner Hinweis, weshalb Crossposting so sehr angesehen ist bei den Helfern:

Hier im Forum um 11:37 Uhr eine Entschuldigung in Sachen Crosspost (wobei ich davon in den anderen Foren nichts sehe).

Im Herber-Forum gibt es einen Lösungsvorschlag von Klaus M um 09:41 Uhr.

Reaktion deinerseits darauf: Nada, nothing, nichts.

Da haben wir wohl vor lauter Postings die Übersicht verloren.

Gruß Werner
Antwortento top
#10
Hi  Werner.M ,

natürlich kann man jetzt auch immer weiter drauf hacken...
ich habe es ja jetzt verstanden, aber in den anderen Foren habe ich sehr wohl weiter geschaut und mir wird da nichts angezeigt.

Gruß Daniel
Antwortento top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste