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

Вход

Регистрация

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

 

= Мир MS Excel/Запуск макроса после выделения строк - Мир MS Excel

Старая форма входа
  • Страница 1 из 2
  • 1
  • 2
  • »
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Запуск макроса после выделения строк (Формулы/Formulas)
Запуск макроса после выделения строк
Stormy Дата: Четверг, 23.02.2017, 11:12 | Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
Добрый день.
Возникла задача, сделать следующее:
1) На листе Наклад выделяю какой-то участок к примеру B5:E7
2) Определить последнюю дату на листе Наклад в столбце дата ( в данном случае это будет 5 февраля)
3) На листе Сверка скрыть все столбцы с датами, которые не соответствуют 5 февраля.
4) Полученные данные (выделенный диапазон в Наклад и Столбец на 5 ое февраля из Сверки) вывести на печать .

Вывод на печать с горем пополам сделал. Связная картинка из листа Сверки . Решение не ахти какое, но вроде работает
Помогите решить остальные пункты.

Просьба перенести тему в раздел VBA
К сообщению приложен файл: 9181852.xlsx (10.2 Kb)


Место для рекламы.

Сообщение отредактировал Stormy - Четверг, 23.02.2017, 12:35
 
Ответить
СообщениеДобрый день.
Возникла задача, сделать следующее:
1) На листе Наклад выделяю какой-то участок к примеру B5:E7
2) Определить последнюю дату на листе Наклад в столбце дата ( в данном случае это будет 5 февраля)
3) На листе Сверка скрыть все столбцы с датами, которые не соответствуют 5 февраля.
4) Полученные данные (выделенный диапазон в Наклад и Столбец на 5 ое февраля из Сверки) вывести на печать .

Вывод на печать с горем пополам сделал. Связная картинка из листа Сверки . Решение не ахти какое, но вроде работает
Помогите решить остальные пункты.

Просьба перенести тему в раздел VBA

Автор - Stormy
Дата добавления - 23.02.2017 в 11:12
Wasilich Дата: Четверг, 23.02.2017, 12:35 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
4) Для печати нужен выделенный диапазон и столбец на 5 ое февраля из Сверки.
А как они должны вместе выглядеть? Для печати, их ведь надо разместить на одном листе.
 
Ответить
Сообщение4) Для печати нужен выделенный диапазон и столбец на 5 ое февраля из Сверки.
А как они должны вместе выглядеть? Для печати, их ведь надо разместить на одном листе.

Автор - Wasilich
Дата добавления - 23.02.2017 в 12:35
Stormy Дата: Четверг, 23.02.2017, 12:52 | Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
А как они должны вместе выглядеть? Для печати, их ведь надо разместить на одном листе.

Пока мысль крутится вокруг связанной картинки ( полученную через инструмент Камера), которая в свою очередь расположена на том же листе.
Вторая мысль задействовать объединяющий лист и сформировав уже общий диапазон выводить его на печать.



Место для рекламы.

Сообщение отредактировал Stormy - Четверг, 23.02.2017, 12:54
 
Ответить
Сообщение
А как они должны вместе выглядеть? Для печати, их ведь надо разместить на одном листе.

Пока мысль крутится вокруг связанной картинки ( полученную через инструмент Камера), которая в свою очередь расположена на том же листе.
Вторая мысль задействовать объединяющий лист и сформировав уже общий диапазон выводить его на печать.


Автор - Stormy
Дата добавления - 23.02.2017 в 12:52
Wasilich Дата: Четверг, 23.02.2017, 13:09 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
Уже на картинке видно, что не поместится весь этот огород на печатный лист. Короче, щас пообедаю и мин. через 30 сляпаю. Если никто раньше не сляпает. :)
 
Ответить
СообщениеУже на картинке видно, что не поместится весь этот огород на печатный лист. Короче, щас пообедаю и мин. через 30 сляпаю. Если никто раньше не сляпает. :)

Автор - Wasilich
Дата добавления - 23.02.2017 в 13:09
Stormy Дата: Четверг, 23.02.2017, 13:54 | Сообщение № 5
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
Короче, щас пообедаю

Приятного поглощения и удобного переваривания =)

Уже на картинке видно, что не поместится весь этот огород на печатный лист.

Как вариант уменьшить столбцы ну и для печати использовать альбомный вариант.


Место для рекламы.
 
Ответить
Сообщение
Короче, щас пообедаю

Приятного поглощения и удобного переваривания =)

Уже на картинке видно, что не поместится весь этот огород на печатный лист.

Как вариант уменьшить столбцы ну и для печати использовать альбомный вариант.

Автор - Stormy
Дата добавления - 23.02.2017 в 13:54
Wasilich Дата: Четверг, 23.02.2017, 14:25 | Сообщение № 6
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
Набросал без причесывания.
К сообщению приложен файл: Stormy.xls (47.0 Kb)
 
Ответить
СообщениеНабросал без причесывания.

Автор - Wasilich
Дата добавления - 23.02.2017 в 14:25
Stormy Дата: Четверг, 23.02.2017, 15:05 | Сообщение № 7
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
Wasilich,
Именно то, что нужно. hands
Почему-то при переносе этого макроса на другую книгу, значения с листа Сверка не копирует.
К сообщению приложен файл: 19.xlsm (43.7 Kb)


Место для рекламы.

Сообщение отредактировал Stormy - Четверг, 23.02.2017, 15:08
 
Ответить
СообщениеWasilich,
Именно то, что нужно. hands
Почему-то при переносе этого макроса на другую книгу, значения с листа Сверка не копирует.

Автор - Stormy
Дата добавления - 23.02.2017 в 15:05
Wasilich Дата: Четверг, 23.02.2017, 17:40 | Сообщение № 8
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
У меня 2003-й, конвертер почему то не срабатывает. Выложи файл в формате xls.
 
Ответить
СообщениеУ меня 2003-й, конвертер почему то не срабатывает. Выложи файл в формате xls.

Автор - Wasilich
Дата добавления - 23.02.2017 в 17:40
Stormy Дата: Пятница, 24.02.2017, 07:58 | Сообщение № 9
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
Wasilich,
Прикрепил

ОБН:
С расширением xls работает.
Сейчас допилю и отпишусь о результатах

ОБН2:
Никак не въеду в сдвиг.
Данные с листа Накладные копирует нормально, а со сверки два раза дублирует столбец C
К сообщению приложен файл: 5126465.xls (92.0 Kb)


Место для рекламы.

Сообщение отредактировал Stormy - Пятница, 24.02.2017, 10:10
 
Ответить
СообщениеWasilich,
Прикрепил

ОБН:
С расширением xls работает.
Сейчас допилю и отпишусь о результатах

ОБН2:
Никак не въеду в сдвиг.
Данные с листа Накладные копирует нормально, а со сверки два раза дублирует столбец C

Автор - Stormy
Дата добавления - 24.02.2017 в 07:58
Wasilich Дата: Пятница, 24.02.2017, 10:23 | Сообщение № 10
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
со сверки два раза дублирует столбец C
Не надо спешить! Просто пример и оригинал не совпадают, а макрос жестко привязывается к колонкам и строкам, поэтому всякие смещения таблиц не допустимы. Я тут подумал, выделять весь диапазон таблицы малость проблематично, может достаточно будет выделения столбца с датой, а остальное автоматом копировать?
 
Ответить
Сообщение
со сверки два раза дублирует столбец C
Не надо спешить! Просто пример и оригинал не совпадают, а макрос жестко привязывается к колонкам и строкам, поэтому всякие смещения таблиц не допустимы. Я тут подумал, выделять весь диапазон таблицы малость проблематично, может достаточно будет выделения столбца с датой, а остальное автоматом копировать?

Автор - Wasilich
Дата добавления - 24.02.2017 в 10:23
Stormy Дата: Пятница, 24.02.2017, 10:27 | Сообщение № 11
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

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


Место для рекламы.
 
Ответить
СообщениеWasilich,
Начальника так просит, говорит мне визуально понятно, то что выделил.

Автор - Stormy
Дата добавления - 24.02.2017 в 10:27
Wasilich Дата: Пятница, 24.02.2017, 10:47 | Сообщение № 12
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
говорит мне визуально понятно, то что выделил.
Так он может и не все колонки копировать?
Типа, сколько колонок выделил столько и скопировал?
 
Ответить
Сообщение
говорит мне визуально понятно, то что выделил.
Так он может и не все колонки копировать?
Типа, сколько колонок выделил столько и скопировал?

Автор - Wasilich
Дата добавления - 24.02.2017 в 10:47
Stormy Дата: Пятница, 24.02.2017, 11:38 | Сообщение № 13
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
Типа, сколько колонок выделил столько и скопировал?

Нет обычно копирует весь фрагмент.
Допустим в конце дня он делает сверку с кассой. Выделил 20.02 и скопировал.
На следующий день где-то водку пил и забыл сделать сверку.
22.02 делает сверку и выделяет уже 21 и 22 вместе. А с листа сверки берет данные только за 22.02
В лист Сверки данные вносит вручную, то есть все перепроверяет и в ручную вписывает.


Место для рекламы.
 
Ответить
Сообщение
Типа, сколько колонок выделил столько и скопировал?

Нет обычно копирует весь фрагмент.
Допустим в конце дня он делает сверку с кассой. Выделил 20.02 и скопировал.
На следующий день где-то водку пил и забыл сделать сверку.
22.02 делает сверку и выделяет уже 21 и 22 вместе. А с листа сверки берет данные только за 22.02
В лист Сверки данные вносит вручную, то есть все перепроверяет и в ручную вписывает.

Автор - Stormy
Дата добавления - 24.02.2017 в 11:38
Wasilich Дата: Пятница, 24.02.2017, 12:39 | Сообщение № 14
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
В общем, сколько бы колонок он не выбрал, копируются все. Не нужные, на листе печать можно скрыть. Тестируем.
К сообщению приложен файл: Stormy2.xls (92.5 Kb)


Сообщение отредактировал Wasilich - Пятница, 24.02.2017, 12:45
 
Ответить
СообщениеВ общем, сколько бы колонок он не выбрал, копируются все. Не нужные, на листе печать можно скрыть. Тестируем.

Автор - Wasilich
Дата добавления - 24.02.2017 в 12:39
Stormy Дата: Пятница, 24.02.2017, 14:07 | Сообщение № 15
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
Wasilich,
Отлично. Благодарю.
Пойду покажу его Величеству. %)
Если не будет возражать, доделаю скрытие ненужных столбцов в печати.


Место для рекламы.
 
Ответить
СообщениеWasilich,
Отлично. Благодарю.
Пойду покажу его Величеству. %)
Если не будет возражать, доделаю скрытие ненужных столбцов в печати.

Автор - Stormy
Дата добавления - 24.02.2017 в 14:07
Wasilich Дата: Пятница, 24.02.2017, 14:28 | Сообщение № 16
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
доделаю скрытие ненужных столбцов в печати
Ни чего не надо доделывать, просто 1 раз ручками скрыть и всё.
 
Ответить
Сообщение
доделаю скрытие ненужных столбцов в печати
Ни чего не надо доделывать, просто 1 раз ручками скрыть и всё.

Автор - Wasilich
Дата добавления - 24.02.2017 в 14:28
Stormy Дата: Пятница, 24.02.2017, 15:47 | Сообщение № 17
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
Wasilich,
Показал. В принципе доволен.
Теперь немного изменилось задание
Не нужен поиск и копирование столбца по дате на листе Сверка.
Нужно копировать последний столбец.
Так понимаю, алгоритм будет таковым.
1) Ищем последний заполненный столбец
2) Вместе с первым копируем его?


Место для рекламы.
 
Ответить
СообщениеWasilich,
Показал. В принципе доволен.
Теперь немного изменилось задание
Не нужен поиск и копирование столбца по дате на листе Сверка.
Нужно копировать последний столбец.
Так понимаю, алгоритм будет таковым.
1) Ищем последний заполненный столбец
2) Вместе с первым копируем его?

Автор - Stormy
Дата добавления - 24.02.2017 в 15:47
Pelena Дата: Пятница, 24.02.2017, 16:02 | Сообщение № 18
Группа: Админы
Ранг: Местный житель
Сообщений: 19184
Репутация: 4420 ±
Замечаний: ±

Excel 365 & Mac Excel
Stormy, не надо складывать все вопросы в одну тему. Другая задача - другая тема


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеStormy, не надо складывать все вопросы в одну тему. Другая задача - другая тема

Автор - Pelena
Дата добавления - 24.02.2017 в 16:02
Wasilich Дата: Пятница, 24.02.2017, 16:13 | Сообщение № 19
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
Теперь немного изменилось задание
:D Сколько пятниц на неделе у его Величества? :'(
[vba]
Код
   With Sheets("Сверка")
      ps = .Range("C" & Rows.Count).End(xlUp).Row
      ok = .UsedRange.Columns.Count 'последний столбец
      Set iz = .Range("B2:C" & ps)
      iz.Copy Sheets("Печать").Cells(2, cl) 'копируем В и С
      Range(.Cells(2, ok), .Cells(ps, ok)).Copy 'копируем последний
      Sheets("Печать").Cells(2, cl + 2).PasteSpecial Paste:=xlPasteValues
   End With
[/vba]


Сообщение отредактировал Wasilich - Пятница, 24.02.2017, 16:20
 
Ответить
Сообщение
Теперь немного изменилось задание
:D Сколько пятниц на неделе у его Величества? :'(
[vba]
Код
   With Sheets("Сверка")
      ps = .Range("C" & Rows.Count).End(xlUp).Row
      ok = .UsedRange.Columns.Count 'последний столбец
      Set iz = .Range("B2:C" & ps)
      iz.Copy Sheets("Печать").Cells(2, cl) 'копируем В и С
      Range(.Cells(2, ok), .Cells(ps, ok)).Copy 'копируем последний
      Sheets("Печать").Cells(2, cl + 2).PasteSpecial Paste:=xlPasteValues
   End With
[/vba]

Автор - Wasilich
Дата добавления - 24.02.2017 в 16:13
Wasilich Дата: Пятница, 24.02.2017, 16:17 | Сообщение № 20
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
Другая задача - другая тема
Лена, задача та же, просто пятница другая. :D
 
Ответить
Сообщение
Другая задача - другая тема
Лена, задача та же, просто пятница другая. :D

Автор - Wasilich
Дата добавления - 24.02.2017 в 16:17
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Запуск макроса после выделения строк (Формулы/Formulas)
  • Страница 1 из 2
  • 1
  • 2
  • »
Поиск:

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