Run Time Error on Certain Builds Only

[teefy]

Hello there!

I need to disable AutoSave in a certain file when opening. The solution posted here works fine on my machine with Excel 365, however other people have encountered problems.

I have Office 365, but others have Office 2016 (both of which are considered Version 16 apparently, albeit with different Builds).

I tried adapting the code linked above to include a Build number, so that it would only run recent builds of Excel:

If Val(Application.Version) >= 16 And Val(Application.Build) >= 11126 Then
    If ThisWorkbook.AutoSaveOn Then ThisWorkbook.AutoSaveOn = False
End If

But this still gives a "Method or data member not found" error on older Excel builds at compile, because evidently they simply don't have "AutoSaveOn" available.

How can I get the If ThisWorkbook.AutoSaveOn Then ThisWorkbook.AutoSaveOn = False code to only run if the function exists (i.e. recent builds) and not fall over on older ones?

Thanks very much!

 

[Fluff]

Try moving it to a different Sub & calling it like

If Val(Application.Version) >= 16 And Val(Application.Build) >= 11126 Then
    Call SwitchOff
End If
End Sub

Sub SwitchOff()
    If ThisWorkbook.AutoSaveOn Then ThisWorkbook.AutoSaveOn = False
End Sub

 

[teefy]

Try moving it to a different Sub & calling it like

If Val(Application.Version) >= 16 And Val(Application.Build) >= 11126 Then
    Call SwitchOff
End If
End Sub

Sub SwitchOff()
    If ThisWorkbook.AutoSaveOn Then ThisWorkbook.AutoSaveOn = False
End Sub

Thank you, that worked... I also found that when I used ActiveWorkbook.AutoSaveOn rather than ThisWorkbook.AutoSaveOn it doesn't error.

My fault, I changed that from the thread I referenced initially. I just prefer ThisWorkbook normally, as I know exactly what it's referring to.

Much obliged!

 

[Fluff]

You're welcome & thanks for the feedback.