Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Schleifendurchlauf

Forumthread: Schleifendurchlauf

Schleifendurchlauf
26.06.2003 13:08:51
Brit
Hallo!
Ich möchte, wie im unteren Code zu ersehen, mehrere Anweisungen in Abhängigkeit von der Zahl i ausführen. So läuft dieser Code aber nicht. Wo liegt mein Fehler?

Dim i
For i = 1 To 10
ErgenissePolar.PNN& i.Value = polaresAnhängen2.PN & i.Value
ErgenissePolar.bRiN& i.Value = polaresAnhängen2.beta & i.Value
ErgenissePolar.SN& i.Value = polaresAnhängen2.S & i.Value
Next i

Danke für Eure Hilfe!
Brit

Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Schleifendurchlauf
26.06.2003 13:11:18
ipon

du versuchst jedesmal die i neu zu initialisieren!

Re: Schleifendurchlauf
26.06.2003 13:14:00
brit

Kannst du mir das näher erklären!
Danke

versuch es mal so
26.06.2003 13:17:45
ipon

Dim i
For i = 1 To 10
ErgebnissePolar.PNN = polaresAnhängen2.PN & i
ErgebnissePolar.PNN = ErgebnissePolar.PNN & i
ErgebnissePolar.bRiN = polaresAnhängen2.beta & i
ErgebnissePolar.bRiN = ErgebnissePolar.bRiN & i
ErgebnissePolar.SN = polaresAnhängen2.S & i
ErgebnissePolar.SN = ErgebnissePolar.SN & i
Next i


Anzeige
Re: versuch es mal so
26.06.2003 13:40:40
brit

Dann sagt er mir " Methode oder Datenobjekt nicht gefunden"
Wie darf ich das verstehen?
danke
Brit

Re: versuch es mal so
26.06.2003 13:49:04
ipon

was bedeuten überhaupt "ErgebnissePolar.PNN" usw.?
Sind es Variablen. Wurden die deklariert? Wenn ja, dann als was?
Was haben die für ein Wert? z. B. "polaresAnhängen2.PN"

Anzeige
Re: versuch es mal so
26.06.2003 13:57:05
brit

Das sind in einer Userform "polaresAnhängen2" Textfelder, in denen Zahlen stehen .Dieser Inhalt soll in ein Textfeld der Userform "ErgenissePolar" eingetragen werden.
Die einzelnen Textfelder heißen: PNN1;PNN2;PNN3 usw.
Um nicht jede einzelnes Textfeld anzusprechen und um den Code möglichst kurz zu halten, dachte ich an eine For...Next schleife!

Anzeige
Re: versuch es mal so
26.06.2003 16:10:35
ipon

dann fehlt überall .Value

Dim i
For i = 1 To 10
ErgebnissePolar.PNN.value = polaresAnhängen2.PN.value & i
ErgebnissePolar.PNN.value = ErgebnissePolar.PNN.value & i
ErgebnissePolar.bRiN.value = polaresAnhängen2.beta.value & i
ErgebnissePolar.bRiN.value = ErgebnissePolar.bRiN.value & i
ErgebnissePolar.SN.value = polaresAnhängen2.S.value & i
ErgebnissePolar.SN.value = ErgebnissePolar.SN.value & i
Next i

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige