VBA kod içine hücreden veri girmek

[mozdem]

Dim syf As Worksheet
Set syf = ThisWorkbook.Sheets("Veriler")

Yukarıda Sayfamı 2. satırda Sayfa ismini direk olarak kod bloğu içine yazarak değilde Sayfa adını bir sayfanın bir hücresinden almak istiyorum. Mümkünmü.
örneğin
Set syf = ThisWorkbook.Sheets(Sayfa8!B2) gibi
Teşekkürler

 

[cengo0010]

Emin değilim ama örnek olarak;
set syf = thisworkbook.sheets(worksheets("sayfa8").range("B2")) şeklinde denersen bir sonuç çıkar mı acaba?

 

[mozdem]

Emin değilim ama örnek olarak;
set syf = thisworkbook.sheets(worksheets("sayfa8").range("B2")) şeklinde denersen bir sonuç çıkar mı acaba?

Maalesef
Run-time error '13':
Type misma

 

[veyselemre]

    'Set syf = ThisWorkbook.Sheets(Sheets("Sayfa8").Range("B2").Value) 
    'veya
    Set syf = ThisWorkbook.Sheets([Sayfa8!B2].Value)

 

[mozdem]

    'Set syf = ThisWorkbook.Sheets(Sheets("Sayfa8").Range("B2").Value)
    'veya
    Set syf = ThisWorkbook.Sheets([Sayfa8!B2].Value)

Teşekkür ederim. iki kodda çalışıyor.