Mushroomhead Beautiful Stories For Ugly Children / RR:Suche

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?

Das Lied kenne ich nicht, aber der Titel ist auf jeden Fall schon mal ein Wortspiel:

"to hold something against somebody" heißt im Deutschen "jemandem etwas vorhalten" oder "jemandem etwas übel nehmen".

Aber die Amis können diese Worte natürlich auch so wörtlich verstehen, also etwas "gegen jemanden halten", also an jemanden heranhalten.

"If I said you have a beautiful body, would you hold it against me?" heißt dann also gleichzeitig:
"Wenn ich sagte, Du hast einen schönen Körper, würdest Du mir das übel nehmen?" aber auch
"Wenn ich sagte, Du hast einen schönen Körper, würdest Du ihn an mich drücken?"

Kleines Wortspiel und war mal ein guter Anmachspruch drüben, bevor er in aller Munde war

Ich hoffe, ich konnte ein bißchen helfen.

soll ich ne übersetzung vom text schreiben?

Dafür möchte ich aber ein par pünktchen

hier:


If I said you had a beautiful body
wenn ich sagen würde, du hättest einen schönen körper

would you hold it against me
würdest du ihn an mich lehnen

If I swore you were an angel
würde ich schwören, du seist ein engel

would you treat me like the devil tonight
würdest du mich dann heute nacht wie einen teufel behandeln?

If I were dying of thirst
wenn ich am verdursten wäre

would you flow in love come quince me
würdest du meinen durst mit deiner liebe stillen?

If I said you had a beautiful body
würde ich sagen du hättest einen schönen körper

would you hold it against me
würdest du ihn an mich lehnen?

Verse 1
---

Now we could talk all night about the weather
wir könnten die ganze nacht über das wetter reden

I could tell you about my friends out on the coast
ich könnte dir von meinen freunden von der küste erzählen

I could ask a lot of crazy questions
ich könnte dir viele, verrückte fragen stellen

Or ask you what I really want to know.
oder dich fragen was ich wirklich wissen will

--
Chorus
--

Verse 2
---
Now rain can fall so soft against the window
der regen kann so sanft gegen das fenster fallen

The sun can shine so bright up in the sky
die sonne kann so hell am himmel scheinen

But Daddy always said don't make small talk
aber vater sagte immer, führe keinen small talk

He said come on out and say what's on your mind
er sagte, komm schon und sag was du denkst

Es heißt "hold it against".
Es läuft darauf hinaus, dass der 'Sprecher' Bedenken hat, seiner Liebsten zu sagen, sie habe einen wunderschönen Körper, weil man dann daraus schließen könnte, er sei oberflächlich.

In dem Lied geht es darum, dass der sänger sich nicht sicher ist ob er seiner liebsten sagen sollte wie sehr er ihren Körper liebt, da sie das als oberflächlich auffassen könnte.

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

Hey. Ich bin schon die ganze Zeit auf der Suche nach Filmen. Wisst ihr ähnliche Filme wie ''Love Stories - Erste Lieben, zweite Chancen''?
Einfach so schöne , traurige - Liebesfilme die so in die Richtung gehen.
Würde mich auf eine Antwort freuen , schon mal.

wenn du auf liebes filme stehst solltes du mal auf jedenfall bollywood schauen da wimmelt es nur vom liebes filmen

Ich hab nicht sehr Lust auf Bollywood Filmen. eher so die in Richtung Teeniefilme geht haha sorry, hätte es dazu schreiben sollen, trotzdem

Liebe den Film - Ich empfehle dir den Film Crazy Stupid Love
hoffe konnte dir weiter helfen