Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Sheets("Instructions").Select
Range("E5").Select
Selection.ClearContents

End Sub


"Carl Bowman" <CarlBowman@discussions.microsoft.com> wrote in message
news:1A4A2455-5CC8-4248-A4B2-D681C1B555AA@microsoft.com...
> I am trying to build a macro that will automatically clear the contents of
a
> certain cell just before the workbook is saved. I tried entering is as
> follows but it did not work:
> Sub Workbook_BeforeSave()
> Sheets("Instructions").Select
> Range("E5").Select
> Selection.ClearContents
> End Sub
> Thanks
>