Обнаружение сломанных связанных таблиц Excel

Question

Я смотрю, как обнаружить, если таблица имеет неработающую ссылку или нет, не прибегая к попытке использовать таблицу и получить мою ошибку доступа к БД. Я универсально обнаружил, что каждый ресурс использует код, подобный этому:

If Len(TableName.Connect) > 0 Then ...

или что-то подобное, но в моей базе данных, если таблица / файл имел ранее работающую ссылку, он сохраняет последний известный хороший.connect, даже если ссылка не работает. Так что проверка.connect не работает. Я что-то пропустил? Или еще лучше, есть ли другое решение для проверки битых ссылок?

Answer 1

В качестве первого вы можете проанализировать свойство Connect:

FileName = Split(CurrentDb.TableDefs("LinkedExcelRange").Connect, "=")(1)
' FileName -> d:\path\yourexcelfile.xlsx

и проверьте, существует ли это.