PaulCooper
New member
- Local time
- Tomorrow, 08:46
- Joined
- Feb 7, 2017
- Messages
- 3
Hi
In the following code W1 = Week 1, W2 = Week 2 and so on. I am trying to write a loop to refer to W1 (access field) as a variable e.g "W" & i; i being 1 to 10 (weeks in a school term). I have had a good look around and can;t seem to find how to do this. All the other references work fine. Any help would be very much appreciated.
Kind Regards
Paul
Select Case j <> 100
Case rcdOutput![W1] = "x" Or rcdOutput![W1] = "X"
Sheet.Range("H" & i) = "P"
Sheet.Range("H" & i).Font.Name = "Wingdings 2"
Sheet.Range("H" & i).Font.Size = 11
week1 = week1 + 1
Case Else
Sheet.Range("H" & i) = rcdOutput![W1]
Sheet.Range("H" & i).Font.Name = "Calibri"
Sheet.Range("H" & i).Font.Size = 11
End Select
In the following code W1 = Week 1, W2 = Week 2 and so on. I am trying to write a loop to refer to W1 (access field) as a variable e.g "W" & i; i being 1 to 10 (weeks in a school term). I have had a good look around and can;t seem to find how to do this. All the other references work fine. Any help would be very much appreciated.
Kind Regards
Paul
Select Case j <> 100
Case rcdOutput![W1] = "x" Or rcdOutput![W1] = "X"
Sheet.Range("H" & i) = "P"
Sheet.Range("H" & i).Font.Name = "Wingdings 2"
Sheet.Range("H" & i).Font.Size = 11
week1 = week1 + 1
Case Else
Sheet.Range("H" & i) = rcdOutput![W1]
Sheet.Range("H" & i).Font.Name = "Calibri"
Sheet.Range("H" & i).Font.Size = 11
End Select