Opret mappe på en bestemt placering hvis ikke den findes

Hej
Nedenstående makro gemmer en kopi på en bestemt placering (oprettet før brug af makroen) og vedhæfter en kopi til en mail samtidig.
Kan det lade sig gøre at få makroen til at checke om en bestemt mappe findes, hvis den findes skal den bare bruge makroen som den er - hvis ikke så skal mappen oprettes?

På forhånd tak
Mvh

Sub Finish()
Dim Navn As String
' Finish Macro

'
Cells.Select
    Selection.Copy
    Workbooks.Add
    Cells.Select
    Cells.Select
    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=False
    Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=False
    With ActiveSheet.PageSetup
        .Orientation = xlLandscape
        .Zoom = False
        .FitToPagesWide = 1
        .FitToPagesTall = 1
    End With
    Range("G11").Select
  Navn = Format(Now(), "dd-mm-yyyy hh_nn_ss") ' der tillades ikke colon (:) i filnavnet, ret selv i formater
    ActiveWorkbook.SaveAs Filename:="C:\etellerandet\" & Navn & ".xls"
   
    If Application.MailSystem <> xlNoMailSystem Then ' tjekker om der et mailsystem
  With ActiveWorkbook
        .SendMail _
        Recipients:="mailadresse", _
        Subject:="Angaaende"
    End With
Application.MailLogoff
  Else
    MsgBox "Microsoft postsystem er ikke installeret.", vbInformation, "Postmeddelelse"
  End If

    ActiveWorkbook.Close
   

End Sub