Advarsel hvis bogmærke er (Ref) som Makro

Jeg har følgende makro:

Public Sub GemWordSom()
B = ActiveDocument.Bookmarks("Ref").Range
FilNavn = "S:\Bruger\konsulenter\betalingstjek\" & B & "-" & Format(Now(), "yy")
ActiveDocument.SaveAs FileName:=FilNavn, FileFormat:=wdFormatDocument
End Sub

Jeg vil gerne have tilføjet, at hvis bogmærke Ref er tom - Der står (Ref) som standard -, skal der komme en advarsel og man skal ikke have mulighed for at gemme filen.

Hvem kan hjælpe med det?