Kreator Cause For Conflict Japan / RR:Suche

Andere Antworten auf Foren schlagen Dinge vor, wie "nach einem Grund suchen". Mein Schulbuch hat jedoch den "Memory support": "Advertising for a cause can be done in lots of ways, on streets, by email, by website, in the press". Das Thema ist "to get involved", also ist 'nach einem Grund suchen' irgendwie nicht passend, oder? "Promote a particular cause" wird beispielsweise auch in "eine bestimmte Sache fördern" übersetzt - also nicht in "Grund".
Mir fällt bei bestem Willen keine gut ausgedrückte und passende Übersetzung ein. schonmal!

Hallo,
cause heißt doch nicht nur Grund, sondern kann je nach Kontext viele andere Bedeutungen haben.
Bei der Übersetzung hilft ein gutes Wörterbuch, z.B. pons.com,
bei der Definition helfen einsprachige Dictionaries, z.B.:
das oxforddictionaries.com, das Longman Dictionary of Contemporary English online, das Oxford Advanced Learner's Dictionary oder auch das merriam-webster.com.
AstridDerPu

= für ein Anliegen Werbung machen
(good cause = gute Sache, guter Zweck. Man spricht z.B. von "a good cause" bei einer Wohltätigkeitsveranstaltung)

Annähernd wörtlich übersetzt heißt es "für einen Grund werben", was man etwas freier wohl übersetzen könnte: Für eine Sache werben, also "für etwas werben".

Hallo nochmals,
ich habe mit hilfe con einigen "gutefrage.net" usern einen code geschrieben und versuche jzt durch "Copy-Paste" es für jede Zelle anzuwenden.
Beim For-Befehl kommt immer folgende Meldung "For Steuervariabel wird bereits verwendet"
was bedeutet das? heißt es, das man das "For" nur einmal in einem code gebrauchen kann? wäre vielleicht ein "GoTo" befehl angebrachter?
hier ist der code:
sub kopieren()
Dim Zelle As Range Dim Wert As Variant
Wert = ActiveSheet.Range("J16:j29")
With Sheets("Tabelle2""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 Zelle In.Range("H6:I6")
If ("J17"
Or "J17")
Or "J17" Then
Zelle.Value = ActiveSheet.Range("J18")
Else
Zelle.Value = ActiveSheet.Range("J17")
End If End With End If Next Zelle End With End Sub
schonmal für eure Tatkräftigen Hilfen

Nein, darum geht es nicht.
Du hast ZWEI For-.Next-Schleifen ineinander geschachtelt, das ist möglich, und kein Problem.
Allerdings nutzt Du bei der zweiten Schleife die gleiche Variable, nämlich "Zelle" wie in der übergeordneten.
DAS ist der Fehler.
Schreibe in die ERSTE Zeile:
sub kopieren()
Dim Zelle As Range Dim Zelle2 As Range Dim Wert As Variant
UND dann in die zweite Schleife,
For Each Zelle2 In.Range("H6:I6")
.
Zelle2.Value = ActiveSheet.Range("J18")
.
Zelle2.Value = ActiveSheet.Range("J17")
.
Dann sollte es klappen.
ODER?
P.S.: Ich habe den Code nicht weiter überprüft (fehlt da vlt. noch ein Next?, dann "Next Zelle2".)
Habe leider keine Zeit mehr, muss zur Arbeit.
Melde Dich wenn es noch Probleme gibt.

NACHTRAG:
Ich sehe gerade, die Schleifen müssen nicht unbedingt geschachtelt sein, dann reich vlt. auch:
.
Zelle.Value = ActiveSheet.Range("J16")
Next Zelle
With Sheets("tabelle2")
.
Also die erste Schleif abschließen, dann die zweite starten. DAS kannst Du mit EINER Variablen machen.

Hallo Oubyi,
ich habe es so eingefügt wie du gesagt hast, siehe code :
Sub Kopieren()
Dim Zelle As Range
Dim zelle2 As Range
Dim Wert As Variant
Wert = ActiveSheet.Range("J16:j17")
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 zelle2 In.Range("H6:G6")
If ("J17"
Or "J17")
Or "J17" Then
zelle2.Value = ActiveSheet.Range("J18")
Else
zelle2.Value = ActiveSheet.Range("J17")
End If
Next Zelle
End With
Next zelle2
End Sub
Beim ausführen des Codes erscheint folgende Meldung :
"ungültiger Verweis auf Next Steuervariable"
habe ich da was übersehen oder vergessen?

HI
habe meinen Fehler entdeckt,
statt :
Next zelle1
next Zelle2
Next Zelle3
musste ich :
next zelle3
next zelle2
next zelle1
hinschreiben, sprich alles umgekehrt. weiß zwar nicht ganz warum der Befehl so geschrieben werden soll aber es funktioniert
1000 DANK! newb

Ich versuche es mal:
1.
WAS sollen diese beiden Zeilen:
Dim Wert As Variant Wert = ActiveSheet.Range("J16:j17")
Macht keinen Sinn, und würde wohl auch nicht funktionieren.
2.
Einmal: With Sheets("Tabelle2")
genügt.
3.
Du hast die beiden For Next Schleifen geschachtelt, ich denke das macht hier keinen Sinn.
4.
So würde der Code zumindest laufen:
Sub Kopieren()
Dim Zelle As Range
Dim zelle2 As Range
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")
End If
Next Zelle
'''''''''''''''
For Each zelle2 In.Range("H6:G6")
If ("J17" _
Or "J17") _
Or "J17" Then
zelle2.Value = ActiveSheet.Range("J18")
Else
zelle2.Value = ActiveSheet.Range("J17")
End If
Next zelle2
End With
End Sub
Allerdings passiert direkt noch nichtst, Du weist nur den beiden Variablen Zelle und zelle2 Werte zu.
Ich denke, was Du damit machen willst kommt dann wohl noch.
Gehe den Code mal mit F8 Step by Step durch.
fürs ☆

hab zwar kein plan, welche sprache das ist, aber: wo endet die for-schleife?

VBA -Sprache
die Schleife endet da wo "Next Zelle" steht beantwortet das deine frage?

Hallo gutefrage.net,
habe eine frage die lautet
darf ich cheat engine an need for speed world benutzen is es Legal oder illegal?

Du wirst auf jeden Fall von EA dafür gebannt, da es gegen die Nutzungsbedingungen verstößt.

aber auf diesen video was ist da? YouTube

hack is hack, guck mal bei google, es gibt ein forum wo man legal boost bekommt, für 10eu

funzt sowieso nich. und gebannt wirste bei dem versuch auch.viel glück

bin ja kein hacker,cheater oder so wollte nur fragen zocke des nfs world nur 1min pro monat oder überhaupt garned fuhr 1mal rum dann löschte ich es wieder

Hallo! Ich habe ein Verständniss-Problemchen mit der For-Schleife! nehmen wir mal folgendes an:
int[laengeint i = 0; i < array.length; i++) {} Ich kapiere einfach nicht den zusammenhang von der variable i und dem Array! Wo besteht da ein zusammenhang? Ich kapier generell nicht woher die For-Schleife wissen soll, wann sie hochzählen soll. Hat jemand eine gute erklärung oder eine Seite, auf der es für einen DAU verständlich gemacht wird?
schonmal

Ich weiß, dass sich Japan nahe einer Subduktionszone befindet. Dort wird die pazifische Platte unter die eurasische gezogen, weil sie eine höhere Dichte besitzt. Durch diese Vorgänge kam es auch zum Erdbeben und Tsunami.
Was ich jedoch nicht verstehe, ist warum sich die Hauptinsel von Japan verschoben hat. Eigentlich bewegt sich doch die ganze eurasische Platte wenige Zentimeter im Jahr nach Osten, warum hat sich da aber nur Japan verschoben?

Plattentektonik!
 
Falls du nicht weist, was das ist, hier die Erklärung:
Die ganzen einzelnen Erdplatten bildeten früher eine ganze Erdplatte. Wieso es nicht mehr so ist?
Weil es unter dem ganzen Ozean natürlich auch mal einen Boden gibt und unter diesem Boden ist gaaaaaaaaaaaanz heiße Lawa
Und manchmal fließt die ganze Lawa mit voller Wucht raus ins Wasser. Das Wasser bewegt sich hektisch und wenn die Lawa unter einer Erdplatte rausgeflossen ist, gibt es ein Erdbeben. Und somit hat sich die damals eine große Erdplatte in kleinere geteilt. Und diese einzelnen Teile haben sich auch von einander entfernt.
Genau das gleiche Prinzip ist auch in Japan. Aber nicht nur dort, sondern überall in der welt. Würde mich nicht wundern, wenn wir in Millionen von Jahren wiedergeboren werden und aufeinmal Russland an Griechenland klebt

Das wusste ich schon. Mir geht es eher darum, warum es sein kann, das Japan sich so schnell und für diese Vorgänge "so weit" verschob. Ich dachte, dass das sonst immer nur einige Zentimeter im Jahr sind.

Wie du in meinem Text unter der Frage siehst, weiß ich um die Erdbeben. Ich hätte gern eine genauere Erläuterung.

Entschuldigung, ich meine nicht nach Osten, sondern Westen.

Ok, das nehm ich zurück, es war doch Osten.