Как вернуть соседние данные? после использования «Удалить данные из диапазона внешних данных перед сохранением рабочей книги» –

изображений

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

К сожалению, один пользователь этого не сделал, добавил целую кучу данных, «сохранил» и потерял свою работу.

Есть ли способ вернуть данные?


У нас есть несколько ответов на данный вопрос для Вас.

Лучший ответ:

Извините, вам не повезло. Поскольку вы установили «Удалить данные из внешнего диапазона дат перед сохранением книги», отметили, что добавленные данные никогда не сохранялись, и нет места для извлечения данных пользователя.

Чтобы не допустить такого рода несчастных случаев, я бы изменил рабочую книгу на макрос с поддержкой (.xlsm), если это еще не сделано, и добавил бы проверку в событии BeforeSave, чтобы увидеть, была ли таблица не связана.

Private Sub Workbook_BeforeSave (ByVal SaveAsUI как логическое значение, отмена как логическое значение)
   Dim sMsg As String

   Предполагая, что таблица данных является первой таблицей на первом листе
   С рабочими таблицами (1). Список объектов (1)  

      Если .SourceType <> xlSrcRange Тогда
         sMsg = "Любые изменения, которые вы внесли в таблицу, не будут сохранены, если вы не отсоединитесь от базы данных!" _
               & vbCrLf & vbCrLf & "Вы хотите отменить связь?"
         Если MsgBox (sMsg, vbExclamation + vbYesNo) = vbYes, то
            .Unlink
         Конец, если
      Конец, если

   Конец с

End Sub

Другой ответ


Источник

Leave a Reply