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

Вход

Регистрация

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

 

= Мир MS Excel/Записи участника (krosav4ig) - Мир MS Excel

Результаты поиска
krosav4ig Дата: Четверг, 17.12.2015, 13:16 | Сообщение № 881 | Тема: Объединение нескольких столбцов в один
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Сделал третий вариант с помощью подключения и SQL запроса
вводим данные в столбцы и на таблице жмем ПКМ>Обновить


upd.
упростил запрос, заменил файл
К сообщению приложен файл: 7950238.xlsm (23.7 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Четверг, 17.12.2015, 15:31
 
Ответить
СообщениеСделал третий вариант с помощью подключения и SQL запроса
вводим данные в столбцы и на таблице жмем ПКМ>Обновить


upd.
упростил запрос, заменил файл

Автор - krosav4ig
Дата добавления - 17.12.2015 в 13:16
krosav4ig Дата: Четверг, 17.12.2015, 14:29 | Сообщение № 882 | Тема: Свод из двух книг
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
SergProvkov, читайте
если чего по ссылке не понятно, кладите файлы-примеры (10-20 строк в каждом будет достаточно)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеSergProvkov, читайте
если чего по ссылке не понятно, кладите файлы-примеры (10-20 строк в каждом будет достаточно)

Автор - krosav4ig
Дата добавления - 17.12.2015 в 14:29
krosav4ig Дата: Пятница, 18.12.2015, 14:56 | Сообщение № 883 | Тема: Макрос для WORD 2007 реализующий задержку 5 сек
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
еще вариант, чтобы кнопка отображалась, нужно включить отображение скрытого текста (Параметры Word>Экран>Всегда показывать...>галка Скрытый текст)
[vba]
Код
Private Sub CommandButton1_Click()
    Application.PrintOut FileName:="", Range:=wdPrintRangeOfPages, Item:= _
        wdPrintDocumentContent, Copies:=1, Pages:="1", PageType:=wdPrintAllPages, _
        ManualDuplexPrint:=False, Collate:=True, Background:=False, PrintToFile:= _
        False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
        PrintZoomPaperHeight:=0
        
    Dim t#: t = Timer: Do: DoEvents: Loop While (Timer - t) < 10
    
    Application.PrintOut FileName:="", Range:=wdPrintRangeOfPages, Item:= _
        wdPrintDocumentContent, Copies:=1, Pages:="2", PageType:=wdPrintAllPages, _
        ManualDuplexPrint:=False, Collate:=True, Background:=True, PrintToFile:= _
        False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
        PrintZoomPaperHeight:=0
End Sub
[/vba]
К сообщению приложен файл: Doc3.docm (19.5 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Пятница, 18.12.2015, 15:01
 
Ответить
Сообщениееще вариант, чтобы кнопка отображалась, нужно включить отображение скрытого текста (Параметры Word>Экран>Всегда показывать...>галка Скрытый текст)
[vba]
Код
Private Sub CommandButton1_Click()
    Application.PrintOut FileName:="", Range:=wdPrintRangeOfPages, Item:= _
        wdPrintDocumentContent, Copies:=1, Pages:="1", PageType:=wdPrintAllPages, _
        ManualDuplexPrint:=False, Collate:=True, Background:=False, PrintToFile:= _
        False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
        PrintZoomPaperHeight:=0
        
    Dim t#: t = Timer: Do: DoEvents: Loop While (Timer - t) < 10
    
    Application.PrintOut FileName:="", Range:=wdPrintRangeOfPages, Item:= _
        wdPrintDocumentContent, Copies:=1, Pages:="2", PageType:=wdPrintAllPages, _
        ManualDuplexPrint:=False, Collate:=True, Background:=True, PrintToFile:= _
        False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
        PrintZoomPaperHeight:=0
End Sub
[/vba]

Автор - krosav4ig
Дата добавления - 18.12.2015 в 14:56
krosav4ig Дата: Воскресенье, 20.12.2015, 22:28 | Сообщение № 884 | Тема: Расчет остатка предоплаты
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Здравствуйте. До 25.10.2013 есть какой-то остаток?


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеЗдравствуйте. До 25.10.2013 есть какой-то остаток?

Автор - krosav4ig
Дата добавления - 20.12.2015 в 22:28
krosav4ig Дата: Воскресенье, 20.12.2015, 22:39 | Сообщение № 885 | Тема: Расчет остатка предоплаты
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
тогда как-то так
номер предоплаты (массивная формула)
Код
=ПРОСМОТР(СУММ($E$16:E16);МУМНОЖ((СТРОКА($C$5:$C$11)>ТРАНСП(СТРОКА($C$5:$C$11)))*Ч(ТРАНСП($C$5:$C$11));СТРОКА($C$5:$C$11)^0);$A$5:$A$11)

остаток предоплаты
Код
=СУММ($C$6:ИНДЕКС($C$6:$C$11;F16))-СУММ($E$16:E16)
К сообщению приложен файл: 7896059.xlsx (77.0 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Воскресенье, 20.12.2015, 22:41
 
Ответить
Сообщениетогда как-то так
номер предоплаты (массивная формула)
Код
=ПРОСМОТР(СУММ($E$16:E16);МУМНОЖ((СТРОКА($C$5:$C$11)>ТРАНСП(СТРОКА($C$5:$C$11)))*Ч(ТРАНСП($C$5:$C$11));СТРОКА($C$5:$C$11)^0);$A$5:$A$11)

остаток предоплаты
Код
=СУММ($C$6:ИНДЕКС($C$6:$C$11;F16))-СУММ($E$16:E16)

Автор - krosav4ig
Дата добавления - 20.12.2015 в 22:39
krosav4ig Дата: Вторник, 22.12.2015, 16:42 | Сообщение № 886 | Тема: Порядок страниц в буклете
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Всем привет! Есть количество страниц в документе (B1), нужно в столбце C получить номера страниц для "ручной" печати буклета (2 стр. на лист, двухсторонняя печать)
У мну 2 формулы:
для excel 2007 93 75 63 61 (немассивная, протягиваемая вниз, может не работать в 2003), рабочая для 2003 - 113 95 73 71

таблица справа в расчетах не используется, она просто для наглядности, для нее тоже есть формула
для excel 2007 88 64 (немассивная, протягиваемая вправо и вниз, может не работать в 2003), рабочая для 2003 - 100 70

все без "="

[p.s.]У мну в 2003 все формулы работают
К сообщению приложен файл: booklet.xls (25.5 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Среда, 23.12.2015, 14:37
 
Ответить
СообщениеВсем привет! Есть количество страниц в документе (B1), нужно в столбце C получить номера страниц для "ручной" печати буклета (2 стр. на лист, двухсторонняя печать)
У мну 2 формулы:
для excel 2007 93 75 63 61 (немассивная, протягиваемая вниз, может не работать в 2003), рабочая для 2003 - 113 95 73 71

таблица справа в расчетах не используется, она просто для наглядности, для нее тоже есть формула
для excel 2007 88 64 (немассивная, протягиваемая вправо и вниз, может не работать в 2003), рабочая для 2003 - 100 70

все без "="

[p.s.]У мну в 2003 все формулы работают

Автор - krosav4ig
Дата добавления - 22.12.2015 в 16:42
krosav4ig Дата: Вторник, 22.12.2015, 17:06 | Сообщение № 887 | Тема: Порядок страниц в буклете
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
vikttur, количество страниц может быть любым, но для того чтобы получился буклет нужно округлять до ближайшего кратного 4м и добавлять недостающее количество (как вариант,пустыми)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеvikttur, количество страниц может быть любым, но для того чтобы получился буклет нужно округлять до ближайшего кратного 4м и добавлять недостающее количество (как вариант,пустыми)

Автор - krosav4ig
Дата добавления - 22.12.2015 в 17:06
krosav4ig Дата: Вторник, 22.12.2015, 18:31 | Сообщение № 888 | Тема: суммесли по двум критериям в одном столбце
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
еще вариант, формула волатильная
Код
=СУММПРОИЗВ(ЕЧИСЛО(ПОИСК("(Ресторан)";Т(СМЕЩ($B$1;СТРОКА($B$2:$B$26)-ОСТАТ(СТРОКА($B$3:$B$27)-2;5);))))*($B$3:$B$27=$B28);C$3:C$27)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениееще вариант, формула волатильная
Код
=СУММПРОИЗВ(ЕЧИСЛО(ПОИСК("(Ресторан)";Т(СМЕЩ($B$1;СТРОКА($B$2:$B$26)-ОСТАТ(СТРОКА($B$3:$B$27)-2;5);))))*($B$3:$B$27=$B28);C$3:C$27)

Автор - krosav4ig
Дата добавления - 22.12.2015 в 18:31
krosav4ig Дата: Среда, 23.12.2015, 13:07 | Сообщение № 889 | Тема: Порядок страниц в буклете
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
И какое условие?


Если вопрос по формулам - то необходимо найти наикратчайшее или наибыстрейшее решение, если вопрос по VBA - аналогично, остальные вопросы - по оригинальности решения.


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Среда, 23.12.2015, 13:08
 
Ответить
Сообщение
И какое условие?


Если вопрос по формулам - то необходимо найти наикратчайшее или наибыстрейшее решение, если вопрос по VBA - аналогично, остальные вопросы - по оригинальности решения.

Автор - krosav4ig
Дата добавления - 23.12.2015 в 13:07
krosav4ig Дата: Среда, 23.12.2015, 15:22 | Сообщение № 890 | Тема: Выбор просроченных договоров в таблице
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
ну раз до кучи...

подходят к завершению
№ п/п
Код
=ЕСЛИОШИБКА(НАИМЕНЬШИЙ(ЕСЛИ((ЕСЛИОШИБКА(ДАТАМЕС(--Договора!$C$2:$C$39;-1);"")<=СЕГОДНЯ())*(СЕГОДНЯ()<=Договора!$C$2:$C$39);Договора!$A$2:$A$39);СТРОКА(A1));"")


просроченные
№ п/п
Код
=ЕСЛИОШИБКА(НАИМЕНЬШИЙ(ЕСЛИ((Договора!$C$2:$C$39<СЕГОДНЯ())*Договора!$C$2:$C$39;Договора!$A$2:$A$39);СТРОКА(A1));"")


В остальных столбцах
Код
=ЕСЛИОШИБКА(ВПР($A5;Договора!$A$2:$H$39;ПОИСКПОЗ(B$4;Договора!$A$1:$H$1;););"")
К сообщению приложен файл: -3-.xlsx (18.3 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Среда, 23.12.2015, 15:22
 
Ответить
Сообщениену раз до кучи...

подходят к завершению
№ п/п
Код
=ЕСЛИОШИБКА(НАИМЕНЬШИЙ(ЕСЛИ((ЕСЛИОШИБКА(ДАТАМЕС(--Договора!$C$2:$C$39;-1);"")<=СЕГОДНЯ())*(СЕГОДНЯ()<=Договора!$C$2:$C$39);Договора!$A$2:$A$39);СТРОКА(A1));"")


просроченные
№ п/п
Код
=ЕСЛИОШИБКА(НАИМЕНЬШИЙ(ЕСЛИ((Договора!$C$2:$C$39<СЕГОДНЯ())*Договора!$C$2:$C$39;Договора!$A$2:$A$39);СТРОКА(A1));"")


В остальных столбцах
Код
=ЕСЛИОШИБКА(ВПР($A5;Договора!$A$2:$H$39;ПОИСКПОЗ(B$4;Договора!$A$1:$H$1;););"")

Автор - krosav4ig
Дата добавления - 23.12.2015 в 15:22
krosav4ig Дата: Среда, 23.12.2015, 17:12 | Сообщение № 891 | Тема: Порядок страниц в буклете
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
66 с "="
должна работать в 2003

если она такая же, как у мну на 66 с "=", то она не будет работать с выключенным пакетом анализа


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение
66 с "="
должна работать в 2003

если она такая же, как у мну на 66 с "=", то она не будет работать с выключенным пакетом анализа

Автор - krosav4ig
Дата добавления - 23.12.2015 в 17:12
krosav4ig Дата: Четверг, 24.12.2015, 02:24 | Сообщение № 892 | Тема: Как сделать формат А4 с заданными размера ячеек?
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение

Автор - krosav4ig
Дата добавления - 24.12.2015 в 02:24
krosav4ig Дата: Четверг, 24.12.2015, 11:57 | Сообщение № 893 | Тема: Как сделать формат А4 с заданными размера ячеек?
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
GP75, ширина следующего справа столбца больше, чем оставшееся место до поля и он перескочил на следующую страницу


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеGP75, ширина следующего справа столбца больше, чем оставшееся место до поля и он перескочил на следующую страницу

Автор - krosav4ig
Дата добавления - 24.12.2015 в 11:57
krosav4ig Дата: Четверг, 24.12.2015, 15:05 | Сообщение № 894 | Тема: Порядок страниц в буклете
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Если сделать особый формат ячеек

то у мну для 2007 56 без "=", для 2003 60 без "="
Ограничение нужно?

нет, не нужно


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение
Если сделать особый формат ячеек

то у мну для 2007 56 без "=", для 2003 60 без "="
Ограничение нужно?

нет, не нужно

Автор - krosav4ig
Дата добавления - 24.12.2015 в 15:05
krosav4ig Дата: Четверг, 24.12.2015, 17:57 | Сообщение № 895 | Тема: Порядок страниц в буклете
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
12 1 2 11 10 3 4 9 8 5 6 7


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение12 1 2 11 10 3 4 9 8 5 6 7

Автор - krosav4ig
Дата добавления - 24.12.2015 в 17:57
krosav4ig Дата: Пятница, 25.12.2015, 00:28 | Сообщение № 896 | Тема: при быстром вводе времени не считает суммированное время
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
еще вариант
Код
=СУММПРОИЗВ(ОКРВНИЗ(ОСТАТ(AB21:CP21;{10:99}^2)/{60:100};{0,1:1}^15)/24)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениееще вариант
Код
=СУММПРОИЗВ(ОКРВНИЗ(ОСТАТ(AB21:CP21;{10:99}^2)/{60:100};{0,1:1}^15)/24)

Автор - krosav4ig
Дата добавления - 25.12.2015 в 00:28
krosav4ig Дата: Пятница, 25.12.2015, 14:17 | Сообщение № 897 | Тема: Порядок страниц в буклете
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
а чего не 14?

если со ссылкой на C1 с формулой и в C2 стоит 1, то с 3й строки формула 47 без =

upd.


для 2007 60, для 2003 64
для таблицы справа
для 2007 63, для 2003 69
все без =


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Пятница, 25.12.2015, 16:44
 
Ответить
Сообщение а чего не 14?

если со ссылкой на C1 с формулой и в C2 стоит 1, то с 3й строки формула 47 без =

upd.


для 2007 60, для 2003 64
для таблицы справа
для 2007 63, для 2003 69
все без =

Автор - krosav4ig
Дата добавления - 25.12.2015 в 14:17
krosav4ig Дата: Суббота, 26.12.2015, 21:47 | Сообщение № 898 | Тема: Порядок страниц в буклете
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
уменьшил свои формулы на 1 символ


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеуменьшил свои формулы на 1 символ

Автор - krosav4ig
Дата добавления - 26.12.2015 в 21:47
krosav4ig Дата: Суббота, 26.12.2015, 23:35 | Сообщение № 899 | Тема: Активная нумерация значений таблицы
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
вариант с доп. столбцами, должны быть включены итеративные вычисления
К сообщению приложен файл: 0045020.xlsx (11.8 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениевариант с доп. столбцами, должны быть включены итеративные вычисления

Автор - krosav4ig
Дата добавления - 26.12.2015 в 23:35
krosav4ig Дата: Воскресенье, 27.12.2015, 19:59 | Сообщение № 900 | Тема: Как упростить формулу подсчёта факт. отработанного времени
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
формула для C13:AG14
Код
=$P$10+СТОЛБЕЦ(A13)-1

формула для C15:AG15
Код
=ВПР(ДЕНЬНЕД(C$13;2);{0;8:6;5};2)

AH15
Код
=СЧЁТЕСЛИ(C15:AG15;8)

AJ15 =СЧЁТЕСЛИ(C15:AG15;5)
+ УФ
К сообщению приложен файл: 7211742.xlsx (15.0 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеформула для C13:AG14
Код
=$P$10+СТОЛБЕЦ(A13)-1

формула для C15:AG15
Код
=ВПР(ДЕНЬНЕД(C$13;2);{0;8:6;5};2)

AH15
Код
=СЧЁТЕСЛИ(C15:AG15;8)

AJ15 =СЧЁТЕСЛИ(C15:AG15;5)
+ УФ

Автор - krosav4ig
Дата добавления - 27.12.2015 в 19:59
Поиск:

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