Windows.Activate

Максим

Гость

01.07.2008 11:17:41

Подскажите пожалуйста возможно ли решить такую проблему:

Есть макрос который запускается по кнопке из определенного файла экселя. Данный макрос обращается к текстовому файлу, копируя из него данные в тот самый файл где находится кнопка. Проблема в том, что название файла будет менятся в определенной его части, например - выгрузка_XX_XXXX.xls, где X переменная велечина. Ну и соответственно макрос перестает работать как только изменяется данная переменная. Т.е. можно ли как-то обойти вот этот Windows("выгрузка_XX_XXXX.xls").Activate малой кровью?

слэн

Гость

01.07.2008 11:23:14

имя именно меняется? или появляется новый файл с новым именем наряду со старым?

:) в любом случае - предлагаю переименовывать файл(если не стирать) . в таком случае, если проверка показывает, что переименнованного(во закрутил:)) файла не существует, то брать файл, в имени которого есть слово dsuheprf...(dir(*выгрузка*))

Guest

Гость

01.07.2008 13:11:23

{quote}{login=Максим}{date=01.07.2008 11:17}{thema=Windows.Activate}{post}Подскажите пожалуйста возможно ли решить такую проблему:

Есть макрос который запускается по кнопке из определенного файла экселя. Данный макрос обращается к текстовому файлу, копируя из него данные в тот самый файл где находится кнопка. Проблема в том, что название файла будет менятся в определенной его части, например - выгрузка_XX_XXXX.xls, где X переменная велечина. Ну и соответственно макрос перестает работать как только изменяется данная переменная. Т.е. можно ли как-то обойти вот этот Windows("выгрузка_XX_XXXX.xls").Activate малой кровью?{/post}{/quote}
ПРОСТО УДАЛИТЕ ДАННУЮ СТРОКУ ИЗ КОДА!
это если
копируем данные в тот самый файл на тот самый лист где находится кнопка

если кнопка на листе то чтобы нажать кнопку нужновначале перейти в окно содержащее лист, содержащее кнопку.
то есть сама возможность нажатия кнопки подразумевает что
Windows("выгрузка_XX_XXXX.xls")активно и в нём мы видим sheet с кнопкой........

слэн

Гость

01.07.2008 13:27:45

не совсем так..

при открытии текстового файла он станет активным(если, конечно, его открывают как книгу)..

тогда или применять thisworkbook или сразу после нажатия кнопки запомнить имя книги..

а вообще тут слишком много если.. примерчик бы

Максим Гость	#5 01.07.2008 14:09:42 Ну вот прицепил для примера. Просто удалить не получается, ведь нужное окно и лист не активны. А надо их сделать активными :) Прикрепленные файлы post_22531.xls (25.5 КБ)

слэн Гость	#6 01.07.2008 14:51:33 как и предполагалось, используется opentext.. перед opentext пишите name(as string) =activebook.name а после пишите workbooks(name).activate

Читают тему