The Strawberry Statement / RR:Suche

Juten Morgen alle zusammen,
ich habe in meinem Makro mehrere "If-statements" .
Die Stamtements sollen, falls die gewünschte Zelle durchgestrichen oder ausgeblendet ist einfach die nächste kopieren!

Dieses Statement habe ich hintereinander für verschiedene zellen gebrauch etwas so:
dim zelle.
dim zelle.
dim.
Dim Wert As Variant
With Sheets("Tabelle2")
For Each zelle In.Range("F6:G6")
If ("J16"
Or "J16")
Or "J16" Then
zelle.Value = ActiveSheet.Range("J17")
Else
zelle.Value = ActiveSheet.Range("J16")
With Sheets("Tabelle2")
For Each zelle1 In.Range("F7:G7")
If ("G16"
Or "G16")
Or "G16" Then
zelle1.Value = ActiveSheet.Range("G17")
Else
zelle1.Value = ActiveSheet.Range("G16")
With Sheets("Tabelle2")
For Each zelle2 In.Range("F8:G8")
If ("C16"
Or "C16")
Or "C16" Then
zelle2.Value = ActiveSheet.Range("C17")
Else
zelle2.Value = ActiveSheet.Range("C16")

Mein Problem :
Falls die erste Zelle durchgestrichen ist, sprich der fall der durchgestrichenen Zellen eintrifft, fügt das Makro die alernative Zelle ein und bleibt dann stehen!
die anderen "If statement" werden dann nicht weiter ausgeführt.
Ich hoffe das ich mein Problem halbwegs vernünftig erklären konnte, damit man es versteht.
Hat jemand ne Idee voran das liegen könnte?

PauleVBA hat Dir ja schon passenden Code geliefert.
Kurse sind nicht ganz billig, aber es gibt Bücher, und in die kann man was reinschreiben oder Zettel reinlegen. Habs selbst nach einiger Zeit mit Kofler versucht, war ganz gut . Es gibt Aktualisierungen.
gugl mal unter: Kofler Excel Makro
da gibts mehr als eine Seite Nennungen.
Du wirst ja sicher noch weitermachen und auch den Zeilensprung dann automatisieren wollen. Achte also sehr auf die Übersichtlichkeit des Codes: Verschachtelungsebenen müssen erkennbar sein, der Sinn von Befehlen sollte mit mehr als nur einem Stichwort festgehalten werden.
Sonst blickst du bald nirgends mehr durch und gehst in der Fülle der eigenen Konstrukte unter!
bei Fragen hier übrigens immer noch die xl-Version mit nennen!
Den Stern, finde ich, verdient Paule

Ja was ist das denn für ein Spagetti-Code?
Als Erstes habe ich mich in den Klammern verirrt. Dann habe ich mich gefragt, warum die Abarbeitung der ersten Zellen F6:G6 nicht abgeschlossen und schon der nächste Bereich beackert wird.
Also soweit ich das sehe würde ein rechtzeitiges Abschließen der Schleifen WEunder wirken.dim zelle. dim zelle. dim. Dim Wert As Variant With Sheets("Tabelle2""Tabelle2""F6:G6""J16" Or _ "J16"Range("J16" Then zelle.Value = ActiveSheet.Range("J17""J16""Tabelle2""Tabelle2""F7:G7""G16" Or _ "G16"Range("G16" Then zelle1.Value = ActiveSheet.Range("G17""G16""Tabelle2""Tabelle2""F8:G8""C16" Or _ "C16"Range("C16" Then zelle2.Value = ActiveSheet.Range("C17""C16") End If Next Da der Editor mal wieder alle Einzüge versaut, bekommst du den Code auch noch als jpg.
Im Übrigen würde ich dir empfehlen, mal einen richtigen Programmier-Kurs zu besuchen.
Dein Code ist grottenschlecht lesbar.

Der Stern sollte eigentlich an dich gehen habe mich verklickt aber für di Hilfe

Du hast Killozap falsch verstanden.
Das End If muss VOR das nächste If, nicht alle zusammen ans Ende! Sonst springt der Code bei erfüllter Bedingung ans Ende und überspringt damit die anderen If-Abfragen.
Wenn Du, wie ich schon mal sagte, den Code mit F8 Step by Step durchgehst, siehst Du das.
Also:
If.
Else.
.
End If
Next
For.Each.
If.
Else.
.
End If
Next
For.Each.
If.
Else.
.
End If
Next
Und poste immer den ganzen Code, auch das Ende ist interessant.
Das mit den geschachtelten For-Each Schleifen hatte ich Dir schon mal erklärt.

Schon mal was von End if gehört?
IF blabla
machdas
else
machdies
endif

ja! wür ja auch ohne end if gar nicht laufen!
weil alles zu lang war habe ich am Anfang:
dim zelle.
dim zelle. ect.
und am Ende
geschrieben!
kannst du mir helfen?

was soll das eigentlich heißen? ich weiß was die Übersetzung ist aber ich verstehe nicht was es damit auf sich hat.

Also das steht bei den "Protal" Videos und ich weiß das es bei Portal um einen Kuchen geht.

diese stimme will dich immer mit kuchen rumkriegen und überreden. und irgentwer der versucht hat zu flüchten hat das an die wand geschrieben damit du weißt dass du weiter machen sollst.

Also: Bei Portal geht es darum als Tester des Portal-gerätes die Tests, die ein mieser Super-Computer einem stellt, zu lösen. Gegen Ende des Spiels, als der Spieler merkt, dass der böse Super-Computer einen töten will, lehnt dieser sich gegen den Super-Computer auf und will ihn zerstören. Der Computer verspricht dem Spieler, wenn er sich sofort ergibt einen Kuchen(->Cake). Dies ist natürlich nur eine miserabele Ausrede und ein ziemlich schlechter Trick, obwohl Kuchen natürlich nur schwer zu widerstehen ist. Der Kuchen des Supercomputers ist nur ein Trick der in lustigen Wortspielen am Ende dem Spieler versprochen wird. Natürlich existiert der Kuchen nicht und der Spieler lässt sich nicht von dem Geschwätz stören. Im Abspann heißt es dann als lustiges Wortspiel / Ironie : -> The cake is a lie

Ich will The Witcher 3 spielen, würde mir bei Bedarf auch neue Graka zulegen.reicht der Rest dafür aus? Mein System: Win7 32bit ; AMD FX 4170 Quad-Core; AMD Radeon HD 6570 4095MB; 8GB RAM
Systemvoraussetzungen
Minimum Betriebssystem: Windows 7 / 8 / 8.1, 64bit Prozessor: Intel Core i5-2500K 3,3 GHz / AMD CPU Phenom II X4 940 Grafikkarte: GeForce GTX 660 / Radeon HD 7870 Arbeitsspeicher: 6 GB RAM DirectX: 11 Festplatte: 40 GB freier Speicherplatz
Empfohlen Prozessor: Intel Core i7 3770 3,4 GHz / AMD FX-8350 4 GHz Grafikkarte: GeForce GTX 770 / Radeon R9 290 Arbeitsspeicher: 8 GB RAM

Betriebssystem muss 64-bit sein, RAM reicht leicht, Prozessor erfüllt etwa die Mindestanforderungen, aber deine Grafikkarte ist viel zu schlecht. Hier musst du wohl aufrüsten, wenn du es einigermaßen spielen willst.

Can You RUN It | Can I run that game | Game system requirements

Laufen wirds, allerdings nicht in bester Grafik.

Hallöchen, ich habe eine kleine Frage und zwar. ich habe folgende Hardware: Grafikkarte: GeForce GTX 650 Prozessor Intel 4 Kern i5 3570 Arbeitsspeicher: 8 GB ram Würde The Witcher 3 bei mir laufen? Ich weiß Mindestanforderung wäre eine GTX 660. daher meine Frage. würde es überhaupt nicht laufen, nur mit starken rucklern oder würde es dennoch flüssig laufen, nur halt auf niedrig oder so

Der hier hat ein ähnliches System mit derselben Grafikkarte und da läuft es selbst auf Minimum kaum flüssig:
The Witcher 3 Gtx 650 Ti - YouTube

Zumindest in dem Level kaum. Sobald man aber in die Stadt kommt, wird schon ruckelig.
Witcher 3 Gameplay Gtx 650 - YouTube

Warum fragst du doppelt:
Es wird wohl selbst auf niedrig stark ruckeln:
The Witcher 3 - Systemanforderungen - Technik-Check mit Grafikvergleich - Technik-Check - Seite 7 - GameStar.de

man braucht mind. eine gtx 660 laut mindestanforderungen

Ja alzu rund wird es bei dir nicht laufen aber wenn du alles auf niedrig bis max. Mittel stellst sollte es noch spielbar sein. Deine Konfiguration ist jetzt nicht wirklich verkehrt aber bei der Grafikkarte solltest doch du dann mal nachrüsten, empfehle die GTX 960, damit klappt alles auf hoch und Full-HD

Es würde ziemlich stark laggen. Mein Kumpel  hat sogar eine 680 und es laggt heftig bei ihm. Also "no". Erst mal eine neue Grafikkarte.

laut gamestar wird es unspielbar ruckeln: Screenshot by Lightshot