oWord=СоздатьОбъект("Word.Application"); oWord.WindowState = 1; oWord.Height = 0; oWord.Width = 0; myopendial = oWord.FileDialog(3); myopendial.AllowMultiSelect = -1; myopendial.Title = "Выбирайте файлы..."; Для i = 1 По myopendial.Filters.Count Цикл myopendial.Filters.Delete(); КонецЦикла; myopendial.Filters.Add("1С файлы", "*.ert; *.mxl; *.txt", 1); oWord.Visible=-1; oWord.Activate(); myopendial.Show(); Для i = 1 По myopendial.SelectedItems.Count Цикл Сообщить(myopendial.SelectedItems.Item(i)); КонецЦикла; oWord.Quit();