For Schleife

Forumthread: For Schleife
5 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: For Schleife

For Schleife

26.10.2007 16:02:24

Patrick

Hallo zusammen,
folgender code gibt mir zu grübeln:
=
for i=1 to 15
if i=3 or i=10 then
next '<----- die 3 und 10 sollen übersprungen werden, funktioniert nicht.
end if
Werte.Controls("Textbox" & i).BackColor = &HFF&
next
=
ist bestimmt nur eine kleinigkeit. Vielen dank für jede Hilfe.
gruß Patrick

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: For Schleife

26.10.2007 16:11:36

Thomas
AW: For Schleife

26.10.2007 16:12:38

Kawensmann
AW: For Schleife

26.10.2007 16:14:00

Andi
AW: For Schleife

ransi
Danke für die vielen Vorschläge

26.10.2007 16:41:00

Patrick

AW: For Schleife

26.10.2007 16:11:36

Thomas

Hallo Patrick
probiere es so:
if i=3 or i=10 then goto weiter
Werte.Controls("Textbox" & i).BackColor = &HFF&
weiter:
Gruß Thomas

AW: For Schleife

26.10.2007 16:12:38

Kawensmann

Hallo,
mach's doch so:
For i = 1 To 15
If i = 3 Or i = 10 Then
Else
Werte.Controls("Textbox" & i).BackColor = &HFF&
End If
Next
Gruß
Kawensmann

AW: For Schleife

26.10.2007 16:14:00

Andi

Hi,
zB so:
For i = 1 To 15
If i 3 And i 10 Then
Werte.Controls("Textbox" & i).BackColor = &HFF&
End If
Next i
Schönen Gruß,
Andi

AW: For Schleife

ransi

HAllo Patrick
Versuche es mal so:

Public Sub test()
Dim i As Integer
For i = 1 To 15
    Select Case i
        Case 1 To 2, 4 To 9, 11 To 15
            MsgBox i
    End Select
Next
End Sub

ransi