Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Dim i as integer
- For i = X+1 to Y-1
- Sheets(i).Select
- .... your code
- Next i
- Dim i As Integer
- Dim wrksheet As Worksheet
- For i = 1 To Sheets.Count
- Set wkrsheet = ThisWorkbook.Sheets(i)
- 'Do work on wrksheet object
- Next i
Add Comment
Please, Sign In to add comment