Questo funziona con MDE/MDB(non so per ACCDE)
If SysCmd(acSysCmdRuntime) = True Then
Questo per ACCDE:
Public Function IsACCDE() As Boolean
IsACCDE = False
' This property exists only in compiled DBs (.mde, .accde)!
' Ignore error (and stay "False") if not.
On Error Resume Next
IsACCDE = (CurrentDb.Properties("MDE") = "T")
End Function
@Alex