V
Vashfish
We have 5 different computers using access applications. My computer
spontaneously stopped switching between apps even though everyone
else's was working properly. The code uses On Error to catch when
AppActivate fails and then launches a new copy of the app it's
switching to. Unfortunately, on my computer, On Error Goto... seems to
have ceased functioning entirely. I made a short test function:
-------------------------------------
Function errorcheck() As String
On Error GoTo testerr
Dim s As Integer
s = 1 / 0
errorcheck = "None"
testexit:
Exit Function
testerr:
errorcheck = "Yay"
Resume testexit:
End Function
-------------------------------------
When I run it, it spits out a runtime error (division by zero) instead
of handling it properly. I tried reinstalling Access to no avail...
Does anyone have any idea how to fix this short of a complete office
reinstall?
spontaneously stopped switching between apps even though everyone
else's was working properly. The code uses On Error to catch when
AppActivate fails and then launches a new copy of the app it's
switching to. Unfortunately, on my computer, On Error Goto... seems to
have ceased functioning entirely. I made a short test function:
-------------------------------------
Function errorcheck() As String
On Error GoTo testerr
Dim s As Integer
s = 1 / 0
errorcheck = "None"
testexit:
Exit Function
testerr:
errorcheck = "Yay"
Resume testexit:
End Function
-------------------------------------
When I run it, it spits out a runtime error (division by zero) instead
of handling it properly. I tried reinstalling Access to no avail...
Does anyone have any idea how to fix this short of a complete office
reinstall?