Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- For I = 2 To WS_Count
- LRow = Worksheets(I).[d2].End(xlDown).Row
- Worksheets(I).Range("e2:e" & LRow).FillDown
- Worksheets(I).[f2].Formula = "=max(e2:e&LRow)"
- Next I
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement