Форум профессиональных мебельщиков PROMEBELclub
 
PROMEBELclub - Форум для мебельщиков: конструкторов, дизайнеров, мастеров, технологов и всех, кто имеет отношение к производству и изготовлению мебели. Программы для конструирования и дизайна мебели. Мебельная литература и обучающие пособия.
 
 

Вернуться   Форум профессиональных мебельщиков PROMEBELclub > Программы для мебельщиков > Программы для конструирования и дизайна мебели

Меню

Маркет


Программы для конструирования и дизайна мебели Любые программы для мебели. Программы для проектирования мебели, расстановки мебели, конструирования мебели, дизайна мебели, раскроя, дизайна интерьера и т.п.

Ответ
 
Опции темы Опции просмотра
Старый 13.01.2013, 21:32  
Exсel. Помощь по составлению таблиц и созданию макросов в мебельных расчётах
AndrewP
Местный
Регистрация: 13.08.2010
Сообщений: 1,615

Сказал(а) спасибо: 11,834
Поблагодарили 9,536 раз(а) в 1,526 сообщениях
Версия для печати Отправить по электронной почте
AndrewP AndrewP вне форума 13.01.2013, 21:32
Рейтинг: ()

Что такое макрос. Как его писать. На каком языке он пишется.

Предлагаю опытным форумчанам делиться своими знаниями Exel, в применении к мебельным задачам. С картинками и примерами.

Как, например сделать так, чтобы нажав на созданную кнопку бралось значение ячейки с одного листа и прибавлялось к значению ячейки на другом листе?

Варианты решения данной задачи во вложенном файле.

Последний раз редактировалось AndrewP; 15.12.2014 в 02:57..
Просмотров: 194271
Ответить с цитированием Вверх
17 пользователя(ей) сказали cпасибо:
Старый 07.05.2013, 19:51   #111
sparkfire
Местный
 
Аватар для sparkfire
 
Регистрация: 01.06.2012
Адрес: Санкт Петербург
Сообщений: 191
Сказал(а) спасибо: 403
Поблагодарили 392 раз(а) в 113 сообщениях
Вес репутации: 282
sparkfire - это имя известно всемsparkfire - это имя известно всемsparkfire - это имя известно всемsparkfire - это имя известно всемsparkfire - это имя известно всемsparkfire - это имя известно всем
По умолчанию

Почти финальная версия таблицы моей.. выстрадал ее за праздники.. выкладываю на общий суд. Принимаются все рацпредложения. Вопросы и инструкции позже. Файл для скачивания ТУТ
Добавлю: Сохранение кнопкой не юзать, недоработано, только алгоритм.
Все данные и цены реальны, я по этой таблице считаю свои заказы.
Процесс простой, данные из про100 копируются и с помощью кнопки вставляются во вкладке "Распил", затем выбирается столешница, комплектующие, фурнитура(пока только BOYARD) работа и список заказов пока в разработке.
Жду новых предложений от вас.( не от всех, только от тех, кому интересно).
Таблица бесплатная, без паролей, без секретов.
__________________
Всем добра!
sparkfire вне форума   Ответить с цитированием Вверх
6 пользователя(ей) сказали cпасибо:
Старый 07.05.2013, 19:59   #112
volunka
Местный
 
Аватар для volunka
 
Регистрация: 22.09.2010
Адрес: Россия, г. Санкт-Петербург
Сообщений: 538
Сказал(а) спасибо: 1,084
Поблагодарили 2,184 раз(а) в 436 сообщениях
Вес репутации: 678
volunka репутация неоспоримаvolunka репутация неоспоримаvolunka репутация неоспоримаvolunka репутация неоспоримаvolunka репутация неоспоримаvolunka репутация неоспоримаvolunka репутация неоспоримаvolunka репутация неоспоримаvolunka репутация неоспоримаvolunka репутация неоспоримаvolunka репутация неоспорима
По умолчанию

Может кому пригодится:
Макрос Excel вычисляющий контрольную 13-ю цифру по алгоритму шрих-кодирования EAN-13:

EAN-13

Код:
 Sub EAN13() 
 For t = 1 To Excel.Selection.Cells.Count 
 'редактируем введёную строку доведя её до 12 знаков нулями слева 
 bk = Excel.Selection.Cells(t).Value 
 If Len(bk) < 12 Then bk = String(12 - Len(bk), "0") & bk 
 bk = Left(bk, 12) 
 'вычисляем контрольную цифру 
 sy = 0 
 For rt = 1 To 12 'перебираем все 12 значащих цифр 
 sy = sy + Val(Mid(bk, rt, 1)) * (1 + 2 * ((rt + 1) Mod 2)) 'суммируем 
 'все цифры кода, причём каждая вторая цифра 
 'домножается на 3 
 Next rt 
 sy = 10 - sy Mod 10 'теперь sy равно числу, дополняющему старое 
 'sy до ровного десятка (это и есть контрольная цифра) 
 If sy = 10 Then sy = 0 'если получилось 10, то оставляем только 0 
 bk = bk & sy 'дописываем контрольную цифру к коду 
 Excel.Selection.Cells(t).Value = bk 'ставим готовый код обратно где брали 
 Next 
 End Sub
[свернуть]
volunka вне форума   Ответить с цитированием Вверх
3 пользователя(ей) сказали cпасибо:
Peterson (07.05.2013), sibmebel (07.05.2013), sparkfire (07.05.2013)
Старый 11.06.2013, 12:18   #113
SinnerB
Местный
 
Аватар для SinnerB
 
Регистрация: 10.02.2012
Адрес: 23 RUS
Сообщений: 363
Сказал(а) спасибо: 2,413
Поблагодарили 2,875 раз(а) в 331 сообщениях
Вес репутации: 760
SinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспорима
По умолчанию

Добрый день, уважаемые гуру Excel, Ну не могу я пререйти на позние версии Excel, все забыл, и на самом простм спотыкаюсь. А вопрос вот в чем. Как создается выбор из выподающего списка на основе таблицы. На скрине в ячейке В18 должны выбираться данные из верхней таблицы. Как обозчатить верхнюю таблицу, как диапазон, (верхняя таблица - диапазон, с имнем "компоненты"), я помню, но дальше запутался.
И можно ли сделать так, чтобы выбор был по столбцу (в данном случае столбец "компоненты" , а выбиралась вся строка таблицы, соответсвующего компонента? Спасибо
Миниатюры
ScreenShot 9.jpg  
SinnerB вне форума   Ответить с цитированием Вверх
Старый 11.06.2013, 12:34   #114
ПРАКТИК
VIP
 
Аватар для ПРАКТИК
 
Регистрация: 13.02.2009
Сообщений: 3,822
Сказал(а) спасибо: 28,995
Поблагодарили 27,373 раз(а) в 5,644 сообщениях
Вес репутации: 6116
ПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспорима
По умолчанию

Цитата:
Сообщение от SinnerB Посмотреть сообщение
можно ли сделать так
В нижней табличке в других строчках должен быть выбор из верхнего списка? Или только в помеченной ячейке?
Поразвёрнутее общую задачу...
ПРАКТИК вне форума   Ответить с цитированием Вверх
Старый 11.06.2013, 13:01   #115
SinnerB
Местный
 
Аватар для SinnerB
 
Регистрация: 10.02.2012
Адрес: 23 RUS
Сообщений: 363
Сказал(а) спасибо: 2,413
Поблагодарили 2,875 раз(а) в 331 сообщениях
Вес репутации: 760
SinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспорима
По умолчанию

Совершенно верно, Юрий. Я могу продублировать верхнюю таблицу вниз выбирая компоненты (метан, аммиак итд) приизвольно, из выпадающего списка (можен он по другому называется, на скрине не он. Ну, при наведении на ячейку появляется окошко из выбора, в моем случае газов. И при этом выбираться должен не только сам газ, но вся строка таблицы этого газа, спарава от наименования. Например, при выборе "метан" выбирается и метан - 52,915, другие столбцы, если будут, а они будут
-----
На скрине о таблицы рядом. Потом верхняя спрячется на служебный лист, а пользователь потом на его листе просто должен выбирать газы из выпадающего списка, в пустой дубликат таблицы

PS Excel 2007, вот и запутался
SinnerB вне форума   Ответить с цитированием Вверх
Старый 11.06.2013, 13:09   #116
_konstruktor_
Модератор
 
Аватар для _konstruktor_
 
Регистрация: 15.12.2010
Адрес: Новосибирск
Сообщений: 1,201
Сказал(а) спасибо: 674
Поблагодарили 1,908 раз(а) в 704 сообщениях
Вес репутации: 682
_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее
По умолчанию

именной диапазон + ВПР
__________________
сам НЕ курю, и вам НЕ советую!

разрабОтка, прОизвОдствО - мебели /услуги конструктора / Excel мебельщику / презентация / вконтакте /
_konstruktor_ вне форума   Ответить с цитированием Вверх
3 пользователя(ей) сказали cпасибо:
sibmebel (11.06.2013), SinnerB (11.06.2013), ПРАКТИК (11.06.2013)
Старый 11.06.2013, 13:24   #117
ПРАКТИК
VIP
 
Аватар для ПРАКТИК
 
Регистрация: 13.02.2009
Сообщений: 3,822
Сказал(а) спасибо: 28,995
Поблагодарили 27,373 раз(а) в 5,644 сообщениях
Вес репутации: 6116
ПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспорима
По умолчанию

Самый примитивный вариант
Вложения
Тип файла: xls Проба 01.xls (19.5 Кб, 73 просмотров)
ПРАКТИК вне форума   Ответить с цитированием Вверх
4 пользователя(ей) сказали cпасибо:
semdizain (04.11.2013), sibmebel (11.06.2013), SinnerB (11.06.2013), sparkfire (11.06.2013)
Старый 11.06.2013, 13:31   #118
SinnerB
Местный
 
Аватар для SinnerB
 
Регистрация: 10.02.2012
Адрес: 23 RUS
Сообщений: 363
Сказал(а) спасибо: 2,413
Поблагодарили 2,875 раз(а) в 331 сообщениях
Вес репутации: 760
SinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспоримаSinnerB репутация неоспорима
По умолчанию

Цитата:
Сообщение от _konstruktor_ Посмотреть сообщение
именной диапазон + ВПР
Спасибо, но писал, что именным диапазоном разобраля, ВПР - для меня темным лесом оказалось.

Юра, спасибо, именно так! Сейчас буду разбираться, как сделано, спасибо! Да я мог и книгу сбросить, а вам пришлось во скрина руками набирать Но в реальности в таблице намного больше стобцов, а не один, как в примере на скрине. И все должны переноситься по выбору. Причем, некоторые данные в тех столбах константы, а некоторые формулы, и постоянно пересчитываются.

Последний раз редактировалось SinnerB; 11.06.2013 в 14:08.
SinnerB вне форума   Ответить с цитированием Вверх
Пользователь сказал cпасибо:
ПРАКТИК (11.06.2013)
Старый 11.06.2013, 14:05   #119
ПРАКТИК
VIP
 
Аватар для ПРАКТИК
 
Регистрация: 13.02.2009
Сообщений: 3,822
Сказал(а) спасибо: 28,995
Поблагодарили 27,373 раз(а) в 5,644 сообщениях
Вес репутации: 6116
ПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспоримаПРАКТИК репутация неоспорима
По умолчанию

Немного другие задачи в том примере были, но может поможет разобраться с выборкой (ВПР)... пост 97 в этой же теме.
А в том что выложил есть "спрятанные" данные (белые цифры на белом фоне) - "управляющие данные" необходимые для работы формулы ВПР... Тут вообще идёт связка: настройка ниспадающего списка и правильно прописанная выборка.
ПРАКТИК вне форума   Ответить с цитированием Вверх
2 пользователя(ей) сказали cпасибо:
SinnerB (11.06.2013), sparkfire (11.06.2013)
Старый 11.06.2013, 19:46   #120
_konstruktor_
Модератор
 
Аватар для _konstruktor_
 
Регистрация: 15.12.2010
Адрес: Новосибирск
Сообщений: 1,201
Сказал(а) спасибо: 674
Поблагодарили 1,908 раз(а) в 704 сообщениях
Вес репутации: 682
_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее_konstruktor_ обеспечил(а) себе прекрасное будущее
По умолчанию

в Excel мощный help, попробуйте в нем набрать "впр" все очень просто.
__________________
сам НЕ курю, и вам НЕ советую!

разрабОтка, прОизвОдствО - мебели /услуги конструктора / Excel мебельщику / презентация / вконтакте /
_konstruktor_ вне форума   Ответить с цитированием Вверх
Ответ

Нижняя навигация
Вернуться   Форум профессиональных мебельщиков PROMEBELclub > Программы для мебельщиков > Программы для конструирования и дизайна мебели

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Мебельных дел мастер arsenii1981 Журналы 5 22.12.2014 13:52
Расчёт кухонных тумб в Exсel Valerian Программы для конструирования и дизайна мебели 25 10.03.2013 21:49
Компания Sky Group и ее партнеры объединили усилия по созданию технологичных продукто IQDEMY Поставщики 0 09.01.2013 09:45
Идея по созданию зеркального лого на посуде Shima Как это сделать?. Идеи. 13 28.10.2010 17:22
Уроки по созданию мебели от Девида Маркса Dosoleg Видео. Мебель и деревообработка. 13 31.08.2010 23:41


Текущее время: 01:08. Часовой пояс GMT +3.


Powered by vBulletin® Version 3.8.12 by vBS
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
© 2007-2023 PROMEBEL

џндекс.Њетрика