source.Sheets(RevisionHistory).Copy before:=target.Sheets(1)
This does not work when all the windows for the 'target' workbook are not visible. When Visible=True for them, then it works.
The easy answer is just to make them visible. But, they are being worked on and it a problem for the user to see all that activity.