Народ, кто знаком с Visual Basic, в плане написания макросов для Exel - помогите! Суть - есть екселевский файлик + макрос в нем. Функция макроса, по запуску, формирует фаил с разделителями на основе данных из таблицы. Затем запрашивает, куда сохранить. Нужно, что бы после того, как сохранил фаил, автоматом, в той же папке создавал пустой фаил с заранее заданным именем (фаил флаг). Чет, вчера пошарил по инету, но так и не нашел команды создания файла без диалогового окна. Сам фаил лежит тут http://fs.atol.ru/_layouts/15/atol....=5604d961-4c72-4c35-888e-bb700e3f0561&webUrl= Текст макроса.
очевидно после Close #1 из строки FileName нужно получить папку fso.GetParentFolderName(FileName) из него получить желаемое имя флага, что-то типа FlagName = fso.GetParentFolderName(FileName) & "Flag.Ext" а потом записать файл на диск Dim fso, f1 Set fso = CreateObject("Scripting.FileSystemObject") Set f1 = fso.CreateTextFile(FlagName, True) но я на вбс писать не умею