Fout: Het subscript valt buiten het bereik

[krikri]

Ik werk in een exel bestandje programma.xls en zou graag vandaaruit het bestand offerte.xls openen met als werkblad "Voorstudieblad1".

Private Sub btnofferteinvullen_Click()
     Workbooks("offerte.xls").Worksheets("Voorstudieblad1").Activate     
End Sub

Echter telkens wanneer ik deze code uitvoer krijg ik de foutmelding "Het subscript valt buiten het bereik".

Wie weet raad?

Thanx