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

Вход

Регистрация

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

 

= Мир MS Excel/Макрос фильтр для создания прайс листа - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Макрос фильтр для создания прайс листа (Макросы/Sub)
Макрос фильтр для создания прайс листа
AranyHunter Дата: Среда, 09.12.2015, 20:08 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
И еще раз доброго времени суток!
Помогите пожалуйста написать макрос фильтр для формирования прайс листа, в новом листе прайс
Данные берутся с листа "Курятники" : Порода (столбец B), окрас (столбец C), Цена инкубационного яйца за шт. (столбец I), Цена суточного цыпленка за шт. (столбец J), Цена недельного цыпленка (столбец K), Цена двухнедельного цыпленка за шт. (столбец L), Цена трехнедельного цыпленка за шт. (столбец M), Цена месячного цыпленка за шт. (столбец N)
Копируются в одноимённые столбцы, но порода и окрас в одном столбце B, а нумерация в столбце А (только на против окраса)
Пример:
Амераукана
1 белый
2 дикий
Фавероль
3 лососевый
Кохинхин
4 голубой, черный
5 золотистый черно-окаймленный
6 серебрянный черно-окаймленный
7 черный мрамор
8 белый

Пример формы заполнения вложил (Лист "прайс лист") и базы
К сообщению приложен файл: 1234567.zip (42.9 Kb)


Сообщение отредактировал AranyHunter - Среда, 09.12.2015, 20:13
 
Ответить
СообщениеИ еще раз доброго времени суток!
Помогите пожалуйста написать макрос фильтр для формирования прайс листа, в новом листе прайс
Данные берутся с листа "Курятники" : Порода (столбец B), окрас (столбец C), Цена инкубационного яйца за шт. (столбец I), Цена суточного цыпленка за шт. (столбец J), Цена недельного цыпленка (столбец K), Цена двухнедельного цыпленка за шт. (столбец L), Цена трехнедельного цыпленка за шт. (столбец M), Цена месячного цыпленка за шт. (столбец N)
Копируются в одноимённые столбцы, но порода и окрас в одном столбце B, а нумерация в столбце А (только на против окраса)
Пример:
Амераукана
1 белый
2 дикий
Фавероль
3 лососевый
Кохинхин
4 голубой, черный
5 золотистый черно-окаймленный
6 серебрянный черно-окаймленный
7 черный мрамор
8 белый

Пример формы заполнения вложил (Лист "прайс лист") и базы

Автор - AranyHunter
Дата добавления - 09.12.2015 в 20:08
Karataev Дата: Четверг, 10.12.2015, 13:16 | Сообщение № 2
Группа: Проверенные
Ранг: Старожил
Сообщений: 1334
Репутация: 533 ±
Замечаний: 0% ±

Excel
Макрос запускается кнопкой из "B1".
Макрос сортирует по породе. Если Вам нужно оставить в том же порядке и у Вас данные по породам сгруппированы, то тогда можно удалить в коде сортировку.
Но данные должны быть сгруппированы по породе (как у Вас в примере), иначе макрос будет неправильно работать.
К сообщению приложен файл: macro.zip (46.3 Kb)


Сообщение отредактировал Karataev - Пятница, 11.12.2015, 09:40
 
Ответить
СообщениеМакрос запускается кнопкой из "B1".
Макрос сортирует по породе. Если Вам нужно оставить в том же порядке и у Вас данные по породам сгруппированы, то тогда можно удалить в коде сортировку.
Но данные должны быть сгруппированы по породе (как у Вас в примере), иначе макрос будет неправильно работать.

Автор - Karataev
Дата добавления - 10.12.2015 в 13:16
AranyHunter Дата: Четверг, 10.12.2015, 23:53 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Karataev, огромное спасибо! очень помогли мне! Если живете в МО с меня яйца и мясо птицы ))))
 
Ответить
СообщениеKarataev, огромное спасибо! очень помогли мне! Если живете в МО с меня яйца и мясо птицы ))))

Автор - AranyHunter
Дата добавления - 10.12.2015 в 23:53
AranyHunter Дата: Суббота, 12.12.2015, 00:56 | Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Так же тема дублировалась на стороннем сайте ссылка
 
Ответить
СообщениеТак же тема дублировалась на стороннем сайте ссылка

Автор - AranyHunter
Дата добавления - 12.12.2015 в 00:56
AranyHunter Дата: Воскресенье, 13.12.2015, 12:33 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Karataev, наверное что то неправильно делаю! Но у меня происходит копирование двойное копирование одной породы и окраса, а вот цену подставляет неправильно!
К сообщению приложен файл: 1880038.xlsm (33.8 Kb)
 
Ответить
СообщениеKarataev, наверное что то неправильно делаю! Но у меня происходит копирование двойное копирование одной породы и окраса, а вот цену подставляет неправильно!

Автор - AranyHunter
Дата добавления - 13.12.2015 в 12:33
Karataev Дата: Воскресенье, 13.12.2015, 12:41 | Сообщение № 6
Группа: Проверенные
Ранг: Старожил
Сообщений: 1334
Репутация: 533 ±
Замечаний: 0% ±

Excel
AranyHunter, если что-то неправильно, то нужно писать адрес ячейки, чтобы можно было посмотреть, где именно неправильно.
У породы Амераукана в одном случае есть пробел на конце, в другом нет - для макроса это разные данные. Нужно удалять лишние пробелы.
Про цены не смотрел - напишите адрес ячейки, где неправильная цена (достаточно написать одну ячейку, а не все).


Сообщение отредактировал Karataev - Воскресенье, 13.12.2015, 12:42
 
Ответить
СообщениеAranyHunter, если что-то неправильно, то нужно писать адрес ячейки, чтобы можно было посмотреть, где именно неправильно.
У породы Амераукана в одном случае есть пробел на конце, в другом нет - для макроса это разные данные. Нужно удалять лишние пробелы.
Про цены не смотрел - напишите адрес ячейки, где неправильная цена (достаточно написать одну ячейку, а не все).

Автор - Karataev
Дата добавления - 13.12.2015 в 12:41
AranyHunter Дата: Воскресенье, 13.12.2015, 13:09 | Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Karataev, спасибо! я сам дурак ) не проверил все!!!! Все отлично работает )))))
 
Ответить
СообщениеKarataev, спасибо! я сам дурак ) не проверил все!!!! Все отлично работает )))))

Автор - AranyHunter
Дата добавления - 13.12.2015 в 13:09
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Макрос фильтр для создания прайс листа (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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