Hello all, I need to loop through each sheet, copy the values in Range B4:M7 (they're constant, always numbers) and then add them all together in on the Home page. Basically it's been awhile since I've done loops so I'm forgetting how to add them up as you go then put them in the home sheet and getting an error on the code below. Any help is greatly appreciated. Thanks!
Dim Rng as Range Dim RngTotal as Range RngTotal = 0 Dim ws3 As Worksheet For Each ws3 In Sheets If ws3.Name <> "Home" Set Rng as ws3.Range("B5:M8") End If RngTotal = RngTotal + Rng Next ws3 Sheets("Home").Range("B5:M8") = RngTotal End Sub