Hi
For some reason (probably because I'm thick as 2 short planks) I can't get my formula to omit 2 worksheets from the selection
Here is what I have and what I want is for it to omit both "Summary" and "Buildings" when selecting the data
Thanks again all
Dan
Sub SummurizeSheets() Dim ws As Worksheet Application.ScreenUpdating = False Sheets("Summary").Activate For Each ws In Worksheets If ws.Name <> ("Summary") Or ("Buildings") Then ws.Range("B10:M34").Copy ActiveSheet.Paste Range("E65536").End(xlUp).Offset(1, 0) End If Next ws End Sub
Bookmarks