View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Peter[_48_] Peter[_48_] is offline
external usenet poster
 
Posts: 5
Default Save As behaviour

Hope someone can help, as is usually the case I'm probably missing
something really obvious!

I have a button on a form that I want to save the last contents of the
current workbook to a specific name as follows...

Private Sub cbEnd_Click()

Dim fname As String

fname = "Last end status"
ActiveWorkbook.SaveAs Filename:=fname,
ConflictResolution:=xlLocalSessionChanges
Unload Me

End Sub

I have another subroutine, part of which does exactly the same thing but
at specific periods as data changes...

fname = "Status at" + Str(vaNextClock) + " secs"

vaCurrClock = vaCurrClock Mod 5
vaNextClock = vaNextClock Mod 5

If vaCurrClock < vaNextClock And vaNextClock = 0 Then
ActiveWorkbook.SaveAs Filename:=fname,
ConflictResolution:=xlLocalSessionChanges
End If

My issue is that the second piece of code works fine but the first piece
always shows the confirm dialog box, does anyone have any idea why? Or
even better how to force the overwite?

Thanks in advance

Peter