Oprettelse af .txt fil via kommandoknap

Jeg har en routine der opretter et bibliotek med input fra en tekstboks (bibliotek):

Private Sub Opretbibliotek_Click()

Set myFSO = New FileSystemObject
  If myFSO.FolderExists("C:\" & bibliotek) Then
  MsgBox "Biblioteket findes allerede, vælg et andet navn"
  Me.bibliotek.SetFocus
  Me.bibliotek.Text = ""
 
  Else
  myFSO.CreateFolder ("C:\" & bibliotek)
  End If
  Set myFSO = Nothing



End Sub

Herefter vil jeg gerne gemme en txt.fil i denne mappe.

Private Sub Opretdatafil_Click()
Set myFSO = New FileSystemObject
  If myFSO.FileExists("C:\" & bibliotek & "\" & fil & ".txt") Then
    MsgBox "Filen findes allerede"
  Else
  myFSO.CreateFile "C:\" & bibliotek & "\" & fil & ".txt"
  End If
  Set myFSO = Nothing
End Sub

Men jeg får en fejl der siger at "Method or datamember not found"

Hvad er galt??