hi,

this macro saves the file to the varible name

"d2" is made up from text from 3 different cells
what i need to do is look at cells "x8" in sheet 1 and sheet2 and q8 in sheet 3 to ensure that one of those cells contains a date . if not a message box apears stating the date needs to be entered in either of those cell. when that date is entered the macro carries on and save the file

for exapmle the file will be called 27-sept s.kirk expenses

thanks
steve





Sub Macro2()
'



     Dim Name As Variant
     On Error Resume Next
  
     
      Sheets("UK_ EXPENSE_SHEET").Select
     
    Range("d2").Select
  Name = ActiveCell.Value
  
 
   ActiveWorkbook.SaveAs Filename:=Name

End Sub