Consulting

Results 1 to 4 of 4

Thread: Compatibility Checker & Recalculate formula Messages

  1. #1

    Compatibility Checker & Recalculate formula Messages

    dear,
    could you please help me of this code
    actually every time i run macro give 2 alert messages as snapshots,


    Untitled.jpg





    what can i do to let file save without any alert?





    Dim Path As String
    Dim d As String


    Path = "\\xxx\Oct"


    If Len(Dir(Path, vbDirectory)) = 0 Then
    MsgBox "Path does not exist.", vbCritical
    Exit Sub
    End If


    d = Format(Date, "dd-mm-yyyy")
    If Len(Dir(Path & d, vbDirectory)) = 0 Then MkDir (Path & d)


    ActiveWorkbook.SaveAs Filename:=Path & d & "" & "Sum Report" & ".xls", FileFormat:=xlNormal






    End Sub

    Thanks,

  2. #2
    Knowledge Base Approver VBAX Guru
    Joined
    Oct 2005
    Location
    Surrey UK
    Posts
    4,299
    Untick the box in the picture which reads:
    Check compatibility when saving this workbook
    ?
    p45cal - - - - -This is my signature, it appears after all my posts. Below is not directed at anyone in particular - so don't take offence! - (You might guess why it's there though)
    If I've helped and you can't be bothered to acknowledge it, I can't be bothered to look at further posts from you.

  3. #3
    Dear,
    Even press untick on box, next time it will show me same message and this macro run as per schedule time so file will not save till i come and press continue,

  4. #4
    Knowledge Base Approver VBAX Guru
    Joined
    Oct 2005
    Location
    Surrey UK
    Posts
    4,299
    p45cal - - - - -This is my signature, it appears after all my posts. Below is not directed at anyone in particular - so don't take offence! - (You might guess why it's there though)
    If I've helped and you can't be bothered to acknowledge it, I can't be bothered to look at further posts from you.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •