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

Вход

Регистрация

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

 

= Мир MS Excel/Перенос строк таблицы при печати на другой лист целиком - Страница 2 - Мир MS Excel

Старая форма входа
  • Страница 2 из 2
  • «
  • 1
  • 2
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Перенос строк таблицы при печати на другой лист целиком (Макросы/Sub)
Перенос строк таблицы при печати на другой лист целиком
DrMini Дата: Среда, 17.04.2019, 19:53 | Сообщение № 21
Группа: Друзья
Ранг: Старожил
Сообщений: 1818
Репутация: 257 ±
Замечаний: 0% ±

Excel LTSC 2024 RUS
bmv98rus,
Цитата bmv98rus, 17.04.2019 в 19:34, в сообщении № 20 ()
чуть не забыл, все работает.

Я очень извиняюсь. но... у меня опять не работает :( . прилагаю файл. Подскажите, что я делаю не так.
К сообщению приложен файл: 7411739.xlsm (40.1 Kb)
 
Ответить
Сообщениеbmv98rus,
Цитата bmv98rus, 17.04.2019 в 19:34, в сообщении № 20 ()
чуть не забыл, все работает.

Я очень извиняюсь. но... у меня опять не работает :( . прилагаю файл. Подскажите, что я делаю не так.
Автор - DrMini
Дата добавления - 17.04.2019 в 19:53
bmv98rus Дата: Среда, 17.04.2019, 20:22 | Сообщение № 22
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4112
Репутация: 769 ±
Замечаний: 0% ±

Excel 2013/2016
Вы процедуру запускаете или ждете когда сработает? Можно конечно и автомат забацать перед печатью запуская эту, но убедитесь что работает у вас сперва.

Замечательный Временно просто медведь , процентов на 20.
 
Ответить
СообщениеВы процедуру запускаете или ждете когда сработает? Можно конечно и автомат забацать перед печатью запуская эту, но убедитесь что работает у вас сперва.
Автор - bmv98rus
Дата добавления - 17.04.2019 в 20:22
DrMini Дата: Среда, 17.04.2019, 20:39 | Сообщение № 23
Группа: Друзья
Ранг: Старожил
Сообщений: 1818
Репутация: 257 ±
Замечаний: 0% ±

Excel LTSC 2024 RUS
bmv98rus, Я не знаю, как запустить процедуру. Я в макросах вааще ни как, вот и туплю. Просто запускаю "Выбрать каталог с файлами и сформировать показания" жду пока все файлы загрузятся и произойдёт обработка макросом. Автомат для меня было бы просто волшебно.
 
Ответить
Сообщениеbmv98rus, Я не знаю, как запустить процедуру. Я в макросах вааще ни как, вот и туплю. Просто запускаю "Выбрать каталог с файлами и сформировать показания" жду пока все файлы загрузятся и произойдёт обработка макросом. Автомат для меня было бы просто волшебно.
Автор - DrMini
Дата добавления - 17.04.2019 в 20:39
DrMini Дата: Среда, 17.04.2019, 20:50 | Сообщение № 24
Группа: Друзья
Ранг: Старожил
Сообщений: 1818
Репутация: 257 ±
Замечаний: 0% ±

Excel LTSC 2024 RUS
bmv98rus, Нашёл. В меню "Разработчик" -> "Макросы" и выбрал макрос "myPageSetup". Да всё работает. А можно всё сделать в одну кнопку или хотя бы отдельную. Я найду, а девочки запутаются.
Спасибо Вам. Ещё раз прошу прощения за свои мизерные знания Excel и за ввод Вас в заблуждение.
 
Ответить
Сообщениеbmv98rus, Нашёл. В меню "Разработчик" -> "Макросы" и выбрал макрос "myPageSetup". Да всё работает. А можно всё сделать в одну кнопку или хотя бы отдельную. Я найду, а девочки запутаются.
Спасибо Вам. Ещё раз прошу прощения за свои мизерные знания Excel и за ввод Вас в заблуждение.
Автор - DrMini
Дата добавления - 17.04.2019 в 20:50
bmv98rus Дата: Среда, 17.04.2019, 20:50 | Сообщение № 25
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4112
Репутация: 769 ±
Замечаний: 0% ±

Excel 2013/2016
Завершение первой процедуры должно выглядеть так
[vba]
Код
    Call myPageSetup
    Application.ScreenUpdating = True
End Sub
[/vba]
Если конечно других манипуляций с листом руками перед печатью не производите.

Замечательный Временно просто медведь , процентов на 20.
 
Ответить
СообщениеЗавершение первой процедуры должно выглядеть так
[vba]
Код
    Call myPageSetup
    Application.ScreenUpdating = True
End Sub
[/vba]
Если конечно других манипуляций с листом руками перед печатью не производите.
Автор - bmv98rus
Дата добавления - 17.04.2019 в 20:50
DrMini Дата: Среда, 17.04.2019, 20:56 | Сообщение № 26
Группа: Друзья
Ранг: Старожил
Сообщений: 1818
Репутация: 257 ±
Замечаний: 0% ±

Excel LTSC 2024 RUS
bmv98rus, Сделал вторую кнопку для обработки распределения по листам.
СПАСИБО Вам за труд и терпение.
 
Ответить
Сообщениеbmv98rus, Сделал вторую кнопку для обработки распределения по листам.
СПАСИБО Вам за труд и терпение.
Автор - DrMini
Дата добавления - 17.04.2019 в 20:56
DrMini Дата: Среда, 17.04.2019, 21:04 | Сообщение № 27
Группа: Друзья
Ранг: Старожил
Сообщений: 1818
Репутация: 257 ±
Замечаний: 0% ±

Excel LTSC 2024 RUS
bmv98rus, После добавления
[vba]
Код
Call myPageSetup
    Application.ScreenUpdating = True
End Sub
[/vba]
у меня выходит ошибка. Скрин приложил.
К сообщению приложен файл: 8366592.jpg (31.5 Kb)
 
Ответить
Сообщениеbmv98rus, После добавления
[vba]
Код
Call myPageSetup
    Application.ScreenUpdating = True
End Sub
[/vba]
у меня выходит ошибка. Скрин приложил.
Автор - DrMini
Дата добавления - 17.04.2019 в 21:04
RAN Дата: Среда, 17.04.2019, 21:18 | Сообщение № 28
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Excel вам русским языком пишет, что вы не так сделали.
Добавить не равно заменить.

Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеExcel вам русским языком пишет, что вы не так сделали.
Добавить не равно заменить.
Автор - RAN
Дата добавления - 17.04.2019 в 21:18
DrMini Дата: Среда, 17.04.2019, 21:21 | Сообщение № 29
Группа: Друзья
Ранг: Старожил
Сообщений: 1818
Репутация: 257 ±
Замечаний: 0% ±

Excel LTSC 2024 RUS
RAN, Так ведь я же заменил
[vba]
Код
    End With
    Application.ScreenUpdating = True
End Sub
[/vba]
на
[vba]
Код
Call myPageSetup
    Application.ScreenUpdating = True
End Sub
[/vba]
 
Ответить
СообщениеRAN, Так ведь я же заменил
[vba]
Код
    End With
    Application.ScreenUpdating = True
End Sub
[/vba]
на
[vba]
Код
Call myPageSetup
    Application.ScreenUpdating = True
End Sub
[/vba]
Автор - DrMini
Дата добавления - 17.04.2019 в 21:21
DrMini Дата: Среда, 17.04.2019, 21:29 | Сообщение № 30
Группа: Друзья
Ранг: Старожил
Сообщений: 1818
Репутация: 257 ±
Замечаний: 0% ±

Excel LTSC 2024 RUS
Уважаемый RAN, заработало, как говаривал Матроскин. Спасибо Вам.
 
Ответить
СообщениеУважаемый RAN, заработало, как говаривал Матроскин. Спасибо Вам.
Автор - DrMini
Дата добавления - 17.04.2019 в 21:29
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Перенос строк таблицы при печати на другой лист целиком (Макросы/Sub)
  • Страница 2 из 2
  • «
  • 1
  • 2
Поиск:

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