Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Неоднозначная работа макроса - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Неоднозначная работа макроса
A_3485 Дата: Четверг, 30.08.2012, 16:18 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 146
Репутация: 0 ±
Замечаний: 40% ±

2007
Добрый день!
Помогите пожалуйста разобраться с работой моего макроса.
Суть такая:
На моем компьютере файл работает замечательно. У дргугих колег по -разному. Из 5 человек рабоатает правильно только у 3.
Ошибка которая вылазит:
1. Макрос не распознает текущую книгу:
[vba]
Code
Workbooks("заявление").Sheets("Лист2").Cells(1, 2) = ""
[/vba]
выдает ошибку: Runtime error 09.
если прописать:
[vba]
Code
Workbooks(1).Sheets("Лист2").Cells(1, 2) = ""
[/vba]
то все работает нормально
2. При открытии второй книги и попытки ее сохранить_как, вылазит тот же Runtime error 09.
Помогите пожалуйста решить эту проблему.....
 
Ответить
СообщениеДобрый день!
Помогите пожалуйста разобраться с работой моего макроса.
Суть такая:
На моем компьютере файл работает замечательно. У дргугих колег по -разному. Из 5 человек рабоатает правильно только у 3.
Ошибка которая вылазит:
1. Макрос не распознает текущую книгу:
[vba]
Code
Workbooks("заявление").Sheets("Лист2").Cells(1, 2) = ""
[/vba]
выдает ошибку: Runtime error 09.
если прописать:
[vba]
Code
Workbooks(1).Sheets("Лист2").Cells(1, 2) = ""
[/vba]
то все работает нормально
2. При открытии второй книги и попытки ее сохранить_как, вылазит тот же Runtime error 09.
Помогите пожалуйста решить эту проблему.....

Автор - A_3485
Дата добавления - 30.08.2012 в 16:18
Hugo Дата: Четверг, 30.08.2012, 16:26 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3690
Репутация: 790 ±
Замечаний: 0% ±

365
Попробуйте добавить расширение:
[vba]
Code
Workbooks("заявление.xls").Sheets("Лист2").Cells(1, 2) = ""
[/vba]Ну или xlsx/xlsb/xlsm...


webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
 
Ответить
СообщениеПопробуйте добавить расширение:
[vba]
Code
Workbooks("заявление.xls").Sheets("Лист2").Cells(1, 2) = ""
[/vba]Ну или xlsx/xlsb/xlsm...

Автор - Hugo
Дата добавления - 30.08.2012 в 16:26
_Boroda_ Дата: Четверг, 30.08.2012, 16:38 | Сообщение № 3
Группа: Админы
Ранг: Местный житель
Сообщений: 16715
Репутация: 6504 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
Если
"Макрос не распознает текущуюкнигу: "
то можно
если под словом "текущая" подразумевается книга, в которой сам макрос находится
ThisWorkbook.Sheets("Лист2").Cells(1, 2) = ""
или
если под словом "текущая" подразумевается активная на данный момент книга
ActiveWorkbook.Sheets("Лист2").Cells(1, 2) = ""


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеЕсли
"Макрос не распознает текущуюкнигу: "
то можно
если под словом "текущая" подразумевается книга, в которой сам макрос находится
ThisWorkbook.Sheets("Лист2").Cells(1, 2) = ""
или
если под словом "текущая" подразумевается активная на данный момент книга
ActiveWorkbook.Sheets("Лист2").Cells(1, 2) = ""

Автор - _Boroda_
Дата добавления - 30.08.2012 в 16:38
A_3485 Дата: Четверг, 30.08.2012, 17:57 | Сообщение № 4
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 146
Репутация: 0 ±
Замечаний: 40% ±

2007
Программа работает нормально до момента когда нужно сохранить отрытую книгу:

[vba]
Code
Workbooks("Spisok_.xls").SaveAs (ПутьСохр & Spisok)
[/vba]

опять появляется Runtime error 09.
 
Ответить
СообщениеПрограмма работает нормально до момента когда нужно сохранить отрытую книгу:

[vba]
Code
Workbooks("Spisok_.xls").SaveAs (ПутьСохр & Spisok)
[/vba]

опять появляется Runtime error 09.

Автор - A_3485
Дата добавления - 30.08.2012 в 17:57
Hugo Дата: Четверг, 30.08.2012, 18:03 | Сообщение № 5
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3690
Репутация: 790 ±
Замечаний: 0% ±

365
Добавьте в код перед сохранением
[vba]
Code
msgbox ПутьСохр & Spisok
[/vba]и внимательно посмотрите - такой путь есть?
Ну и скобки тут не нужны.


webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
 
Ответить
СообщениеДобавьте в код перед сохранением
[vba]
Code
msgbox ПутьСохр & Spisok
[/vba]и внимательно посмотрите - такой путь есть?
Ну и скобки тут не нужны.

Автор - Hugo
Дата добавления - 30.08.2012 в 18:03
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!