Public Function Add( _
   ByVal Name As String _
) As Folder