VBA activate sheets in separate windows

[McGuilliam]

I have an excel file which is always open in two windows, each window showing a different worksheet of the same workbook. I use a VBA-macro to move some data around. In the end I want my two windows to show the same sheets again, but my code for this seems to be flawed. Could someone help me on this?
Currently I tried this:

Windows(1).Worksheets("Metingen").Activate
 Windows(2).Worksheets("Pivot table").Activate

 

[Jaafar Tribak]

Something like this;

Dim i As Long
For i = 1 To 2
    ThisWorkbook.Windows(i).Activate
    Sheets("Metingen").Select
Next i