This article explains backup scenarios when using network storage. We review the so-called “3-2-1 strategy” and summarize the methods you can use to send NAS data to the cloud

Solved

Posted on 2011-09-24

c array size is x

b array size is x2

I have the following table for example.

c(1) = b(1)

c(2)=((b(2)+1)*(c(1)+1))-1

c(3)=)(b(3)+1)*(c(2)+1))-1

c(4)=)(b(4)+1)*(c(3)+1))-1

c(5)=)(b(5)+1)*(c(4)+1))-1

How would i put these in a for statement? Again C goes until x, B goes until x2.

2 Comments

gowflow

```
Sub ForStatement()
Dim I As Long, J As Long, X As Long
Dim B(X), C(2 * X)
For I = 1 To X
For J = 0 To 4
C(I) = (B(I) + 1) * (C(J) + 1) - 1
Next J
Next I
End Sub
```

```
Const x2 = 5
'Const x = 12 'must be large enough to get through all the iterations... e.g., if x2 = 5, then x must be 12, if x2 = 10 then x must be 52, etc.
'as array c() is a function of array b(), it stand to reason that c() can be dynamic and allocate what it needs on the fly, thus the declaration,
'and the redim preserve statement
Sub forStmt()
Dim i As Long, j As Long, k As Long
Dim b(1 To x2) As Variant, c() As Variant
k = 1
For i = 1 To x2 - 2
For j = i To x2
ReDim Preserve c(k) As Variant
c(k) = IIf(j = i, b(j), (b(j) + 1) * (c(k - 1) + 1) - 1)
k = k + 1
Next j
Next i
End Sub
```

Cheers,

Dave

genFormula-r1.xlsm

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Title | # Comments | Views | Activity |
---|---|---|---|

VBA: insert new column and re-adapat string with lower letterS | 4 | 27 | |

Excel VLOOKUP. How to return "Not Found" if Item or Qty is missing in Lookup table? | 11 | 38 | |

Excel Need to return the text of a filter column | 11 | 21 | |

Select Next Route by Time | 4 | 19 |

Join the community of 500,000 technology professionals and ask your questions.