Excel VBA: импорт / просмотр файлов в папке

Question

Меня беспокоит вопрос импорта / просмотра файлов с использованием VBA.Работает как положено, я могу импортировать или выбирать файлы из папки.Тем не менее, каждый раз, когда я обрабатываю выбранный файл, появляется диалоговое окно (см. Изображение ниже).Можно ли удалить это диалоговое окно?Или это потому, что файл слишком велик для обработки?

Вот мой код для выбора файла из папки:

Dim FSO As Object
Dim FD As Object

Set FSO = CreateObject("scripting.filesystemobject")
Set FD = Application.FileDialog(msoFileDialogFilePicker)

'select/browse file in folder path
If FD.Show = -1 Then
    Filename = FD.SelectedItems(1)
    Filename = FSO.getfile(Filename)
End If

txtBoxOld.Text = Filename

Спасибо.

Answer 1

Настройка Application.DisplayAlerts = True - это все равно, что просто засунуть пальцы в уши и сказать, что я не слышу тебя.Проблема в том, что он будет отключать каждое предупреждение, а не только то, о котором вы беспокоитесь.

Если вы хотите очистить буфер обмена до конца подпрограммы, используйте Application.CutCopyMode=Falseи вы не получите ошибку.