Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
For.. Next with exception
hello,
Any body would know how to do this? For i=1 to 123 blablabla next But without doing certain values of i (lets say 50,60,70) I could write For i = 1 to 49 blablabla next for i=51 to 59 blablabla next but is there a more elegant way? thanks -- caroline |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
For.. Next with exception
You could do it two ways.
1.) You could use an If...Then statement inside your loop. Dim i As Long For i = 1 To 123 If i = 50 Or i = 60 Or i = 70 Then ' do something End If Next i 2.) You could list the i's you want to loop through. Dim MyArray As Variant MyArray = Split(1, 2, 3, 4, 5, 6, 7, 8, 9, 10) For i = LBound(MyArray) To UBound(MyArray) ' do something Next i Hope this helps! If so, let me know, click "YES" below. -- Cheers, Ryan "caroline" wrote: hello, Any body would know how to do this? For i=1 to 123 blablabla next But without doing certain values of i (lets say 50,60,70) I could write For i = 1 to 49 blablabla next for i=51 to 59 blablabla next but is there a more elegant way? thanks -- caroline |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
For.. Next with exception
Public Sub OmitLoopIncrements()
Dim Index As Long For Index = 1 To 123 Select Case Index Case 50, 60, 70 Case Else 'your code End Select Next Index End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
sum of rows with exception of row x, y, z... | Excel Discussion (Misc queries) | |||
Exception from HRESULT: 0x800A03EC - COM Exception Unhandled | Excel Programming | |||
Exception list | Excel Discussion (Misc queries) | |||
Out of memory exception | Excel Programming | |||
WHAT ARE THE CAUSES FOR 'EXCEPTION ERROR ' | Excel Discussion (Misc queries) |