A dosyası içinden b dosyasındaki actıve sheet ı değiştirme

[dfom_2004]

A DOSYASI İÇİNDEN MAKRO İLE B DOSYASINI AÇIYORUM ANCAK B DEKİ ACTIVE SHEETI DEĞİŞTİREMİYORUM

Kod:

Workbooks.Open Filename:="C:\AÇIK HESAP.xls"
Dim sourceSheetName As String
sourceSheetName = ActiveWorkbook.ActiveSheet.Name ' A DOSYASI
Windows("AÇIK HESAP.xls").Application.Sheets(sourceSheetName).Activate

Problem:
Son satırda Sheets("DELİCE").Activate yazarsam kod çalışıyor ve B dosyasındaki active sheeti değiştiriyor ama bu şekilde hata vermiyor ve activesheeti değiştirmiyor

NERDE HATA YAPIYORUM BULAMADIM
YARDIMLARINIZ İÇİN TEŞEKKÜRLER

 

[janveljan]

Anladığım kadarıyla dosyayı çağırdığınız sayfaki isin neyse yeni açtığınızda da o sayfa açılsın istiyorsunuz.
sourceSheetName = ActiveWorkbook.ActiveSheet.Name ' A DOSYASI satırını workbooks.open satırından önceye taşıyarak deneyin.