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

Вход

Регистрация

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

 

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

Старая форма входа
Мир MS Excel » Записи участника » krosav4ig [2343]
Результаты поиска
krosav4ig Дата: Воскресенье, 28.06.2015, 20:03 | Сообщение № 801 | Тема: Импорт исторических биржевых данных
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Цитата Vostok, 28.06.2015 в 15:15, в сообщении № 122
[vba]
Код
DATA = Split((Split(XMLHTTP.responsetext, "(")(1)), ")")(0)
[/vba]

ну так не интересно :p
[vba]
Код
With CreateObject("vbscript.regexp")
     .Pattern = "(\(.*\))": DATA = IIf(.test(DATA), .Execute(DATA)(0), "")
End With
[/vba]

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение
Цитата Vostok, 28.06.2015 в 15:15, в сообщении № 122
[vba]
Код
DATA = Split((Split(XMLHTTP.responsetext, "(")(1)), ")")(0)
[/vba]

ну так не интересно :p
[vba]
Код
With CreateObject("vbscript.regexp")
     .Pattern = "(\(.*\))": DATA = IIf(.test(DATA), .Execute(DATA)(0), "")
End With
[/vba]
Автор - krosav4ig
Дата добавления - 28.06.2015 в 20:03
krosav4ig Дата: Понедельник, 29.06.2015, 10:59 | Сообщение № 802 | Тема: Протянуть формулу по разного размерам ячейкам
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Как вариант. Выделяем J12:J20, жмем F2>Ctrl+Enter

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеКак вариант. Выделяем J12:J20, жмем F2>Ctrl+Enter
Автор - krosav4ig
Дата добавления - 29.06.2015 в 10:59
krosav4ig Дата: Понедельник, 06.07.2015, 14:17 | Сообщение № 803 | Тема: Пропажа
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
думается, что установка Microsoft Visual Studio 2005 Tools for the 2007 Microsoft Office System должна помочь
или VSTA SDK

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

Сообщение отредактировал krosav4ig - Понедельник, 06.07.2015, 14:19
 
Ответить
Сообщениедумается, что установка Microsoft Visual Studio 2005 Tools for the 2007 Microsoft Office System должна помочь
или VSTA SDK
Автор - krosav4ig
Дата добавления - 06.07.2015 в 14:17
krosav4ig Дата: Вторник, 07.07.2015, 13:24 | Сообщение № 804 | Тема: Функция поиска текстового значения при выполнении условий.
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Добрый день
Код
=ВПР(B4;F3:G8;2;)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеДобрый день
Код
=ВПР(B4;F3:G8;2;)
Автор - krosav4ig
Дата добавления - 07.07.2015 в 13:24
krosav4ig Дата: Вторник, 07.07.2015, 13:38 | Сообщение № 805 | Тема: Получить сумму по ключу
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Здравствуйте
если не отсортированы
Код
=ЕСЛИ(СЧЁТЕСЛИ(A3:$A$12;A2);"";СУММЕСЛИ($A$2:$A$11;A2;$B$2:$B$11))
К сообщению приложен файл: 111-1-.xlsx (8.5 Kb)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеЗдравствуйте
если не отсортированы
Код
=ЕСЛИ(СЧЁТЕСЛИ(A3:$A$12;A2);"";СУММЕСЛИ($A$2:$A$11;A2;$B$2:$B$11))
Автор - krosav4ig
Дата добавления - 07.07.2015 в 13:38
krosav4ig Дата: Вторник, 07.07.2015, 15:54 | Сообщение № 806 | Тема: Поиск в ячейке части текста по нескольким совпадениям
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
еще так можно
Код
=--ИЛИ(СЧЁТЕСЛИ(F5;{"*дог*":"*гпд*":"*гк*"}))

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

Сообщение отредактировал krosav4ig - Вторник, 07.07.2015, 15:55
 
Ответить
Сообщениееще так можно
Код
=--ИЛИ(СЧЁТЕСЛИ(F5;{"*дог*":"*гпд*":"*гк*"}))
Автор - krosav4ig
Дата добавления - 07.07.2015 в 15:54
krosav4ig Дата: Среда, 08.07.2015, 14:49 | Сообщение № 807 | Тема: посчитать кол-во пустых яйчеек и заполненных и вывести сумму
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
или
Код
=(C36-B33)/СЧИТАТЬПУСТОТЫ(B2:B32)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеили
Код
=(C36-B33)/СЧИТАТЬПУСТОТЫ(B2:B32)
Автор - krosav4ig
Дата добавления - 08.07.2015 в 14:49
krosav4ig Дата: Воскресенье, 12.07.2015, 03:06 | Сообщение № 808 | Тема: Список листов книги
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
А можно немного поизвращаццо? :)
в модуле листа
[vba]
Код
Sub SheetsList()
     With CreateObject("adodb.connection")
         .Open "Provider=microsoft.ace.oledb.12.0;" & _
                 "data source=" & Parent.FullName & ";" & _
                 "extended properties=excel 12.0 macro;"
         .cursorlocation = 3
         With .OpenSchema(19)
             .Filter = "table_name like '*$*' and cardinality=0 and table_name<>'" & Me.Name & "$'"
             [A1].Resize(.RecordCount) = Application.Transpose(.getrows(-1, 0, 2))
             .Close
         End With
         .Close
     End With
End Sub
[/vba]

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеА можно немного поизвращаццо? :)
в модуле листа
[vba]
Код
Sub SheetsList()
     With CreateObject("adodb.connection")
         .Open "Provider=microsoft.ace.oledb.12.0;" & _
                 "data source=" & Parent.FullName & ";" & _
                 "extended properties=excel 12.0 macro;"
         .cursorlocation = 3
         With .OpenSchema(19)
             .Filter = "table_name like '*$*' and cardinality=0 and table_name<>'" & Me.Name & "$'"
             [A1].Resize(.RecordCount) = Application.Transpose(.getrows(-1, 0, 2))
             .Close
         End With
         .Close
     End With
End Sub
[/vba]
Автор - krosav4ig
Дата добавления - 12.07.2015 в 03:06
krosav4ig Дата: Воскресенье, 12.07.2015, 20:22 | Сообщение № 809 | Тема: Расчет количества ингредиентов в коктейлях(расход за период)
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
еще вариант, массивная формула
Код
=СУММ($I$3:$I$12*($H$3:$H$12=C3)*ПРОСМОТР(ПОИСКПОЗ(ПРОСМОТР(ПРОСМОТР(СТРОКА($G$3:$G$12);НАИМЕНЬШИЙ(ЕСЛИОШИБКА(ПОИСКПОЗ($G$3:$G$12;$G$1:$G$12;);"");СТРОКА($A$1:ИНДЕКС($A:$A;СЧЁТЗ($G$3:$G$12)))));СТРОКА($G$3:$G$12);$G$3:$G$12);$A$3:$A$18;);СТРОКА($B$3:$B$18)-2;$B$3:$B$18))
К сообщению приложен файл: 8301047-2.xlsx (11.8 Kb)

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

Сообщение отредактировал krosav4ig - Воскресенье, 12.07.2015, 21:02
 
Ответить
Сообщениееще вариант, массивная формула
Код
=СУММ($I$3:$I$12*($H$3:$H$12=C3)*ПРОСМОТР(ПОИСКПОЗ(ПРОСМОТР(ПРОСМОТР(СТРОКА($G$3:$G$12);НАИМЕНЬШИЙ(ЕСЛИОШИБКА(ПОИСКПОЗ($G$3:$G$12;$G$1:$G$12;);"");СТРОКА($A$1:ИНДЕКС($A:$A;СЧЁТЗ($G$3:$G$12)))));СТРОКА($G$3:$G$12);$G$3:$G$12);$A$3:$A$18;);СТРОКА($B$3:$B$18)-2;$B$3:$B$18))
Автор - krosav4ig
Дата добавления - 12.07.2015 в 20:22
krosav4ig Дата: Понедельник, 13.07.2015, 14:07 | Сообщение № 810 | Тема: Размножаюшаяся нумерация разделов
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Может я чего-то не так понял...
У мну немассивная формула (c еслиошибка) 136 без "=" (или 105 без "=" с форматом "0;;")

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

Сообщение отредактировал krosav4ig - Понедельник, 13.07.2015, 14:13
 
Ответить
СообщениеМожет я чего-то не так понял...
У мну немассивная формула (c еслиошибка) 136 без "=" (или 105 без "=" с форматом "0;;")
Автор - krosav4ig
Дата добавления - 13.07.2015 в 14:07
krosav4ig Дата: Вторник, 14.07.2015, 12:33 | Сообщение № 811 | Тема: перевод цифры в месяц
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Код
=ТЕКСТ(A1*30;"МММ")

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение
Код
=ТЕКСТ(A1*30;"МММ")
Автор - krosav4ig
Дата добавления - 14.07.2015 в 12:33
krosav4ig Дата: Четверг, 16.07.2015, 00:48 | Сообщение № 812 | Тема: Извлечение данных числового формата из текста
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
еще вариант
Код
=ЕСЛИОШИБКА(ПСТР(A8;ПРОСМОТР(1;1/ПСТР(A8;СТРОКА($1:$200);6)/ЕОШ(ПОИСК(".";ПСТР(A8;СТРОКА($1:$200);6)));СТРОКА($1:$200));9);ПСТР(A8;ПОИСК("??.??.??";A8);8))

Мурад, нужно было еще в 1 посте уточнить, что код состоит из фиксированного количества цифр (6+2 или 2+2+2) разделенных точками, да и в названиях специальностей и направлений чисел не встречается
[p.s.]Мурад, посмотри аттач, вдруг пригодится
[/p.s.]
К сообщению приложен файл: xml10.zip (54.3 Kb)

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

Сообщение отредактировал krosav4ig - Четверг, 16.07.2015, 00:48
 
Ответить
Сообщениееще вариант
Код
=ЕСЛИОШИБКА(ПСТР(A8;ПРОСМОТР(1;1/ПСТР(A8;СТРОКА($1:$200);6)/ЕОШ(ПОИСК(".";ПСТР(A8;СТРОКА($1:$200);6)));СТРОКА($1:$200));9);ПСТР(A8;ПОИСК("??.??.??";A8);8))

Мурад, нужно было еще в 1 посте уточнить, что код состоит из фиксированного количества цифр (6+2 или 2+2+2) разделенных точками, да и в названиях специальностей и направлений чисел не встречается
[p.s.]Мурад, посмотри аттач, вдруг пригодится
[/p.s.]
Автор - krosav4ig
Дата добавления - 16.07.2015 в 00:48
krosav4ig Дата: Четверг, 16.07.2015, 01:00 | Сообщение № 813 | Тема: удалить ненужные строки при использовании функции если
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
как-то так
Код
=ЕСЛИОШИБКА(ИНДЕКС(E:E;НАИМЕНЬШИЙ(ЕСЛИ($G$7:$G$12>0,4;СТРОКА($G$7:$G$12);"");СТРОКА(E1)));"")
К сообщению приложен файл: 9335943.xls (27.5 Kb)

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

Сообщение отредактировал krosav4ig - Четверг, 16.07.2015, 02:18
 
Ответить
Сообщениекак-то так
Код
=ЕСЛИОШИБКА(ИНДЕКС(E:E;НАИМЕНЬШИЙ(ЕСЛИ($G$7:$G$12>0,4;СТРОКА($G$7:$G$12);"");СТРОКА(E1)));"")
Автор - krosav4ig
Дата добавления - 16.07.2015 в 01:00
krosav4ig Дата: Четверг, 16.07.2015, 02:20 | Сообщение № 814 | Тема: удалить ненужные строки при использовании функции если
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
[offtop]Александр, извиняюсь. Я исправлюсь. Честно ... yes

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение[offtop]Александр, извиняюсь. Я исправлюсь. Честно ... yes
Автор - krosav4ig
Дата добавления - 16.07.2015 в 02:20
krosav4ig Дата: Четверг, 16.07.2015, 17:46 | Сообщение № 815 | Тема: удалить ненужные строки при использовании функции если
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
вариант с расширенным фильтром, в I7 формула
Код
=G7>0,43
К сообщению приложен файл: 1410003.gif (15.7 Kb) · 7190500.xls (26.5 Kb)

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

Сообщение отредактировал krosav4ig - Четверг, 16.07.2015, 17:49
 
Ответить
Сообщениевариант с расширенным фильтром, в I7 формула
Код
=G7>0,43
Автор - krosav4ig
Дата добавления - 16.07.2015 в 17:46
krosav4ig Дата: Четверг, 16.07.2015, 18:15 | Сообщение № 816 | Тема: Клавиатура в EXCELL не печатает текст
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Titansy, проверьте, не включена ли функция залипания клавиш (WIN+R --> rundll32.exe shell32.dll,Control_RunDLL access.cpl,,1 -->Enter)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеTitansy, проверьте, не включена ли функция залипания клавиш (WIN+R --> rundll32.exe shell32.dll,Control_RunDLL access.cpl,,1 -->Enter)
Автор - krosav4ig
Дата добавления - 16.07.2015 в 18:15
krosav4ig Дата: Пятница, 17.07.2015, 16:18 | Сообщение № 817 | Тема: Не стандартный СУММЕСЛИМН
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
еще вариант, для исходного файла
Код
=СУММПРОИЗВ(ЕЧИСЛО(ПРОСМОТР(Дата;$B$9-ЛЕВБ(A3;2)*{1;0}+1;1))*(Артикул=$C$1)*Кол_во)

К сообщению приложен файл: temple_2.xlsx (44.4 Kb)

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

Сообщение отредактировал krosav4ig - Пятница, 17.07.2015, 16:19
 
Ответить
Сообщениееще вариант, для исходного файла
Код
=СУММПРОИЗВ(ЕЧИСЛО(ПРОСМОТР(Дата;$B$9-ЛЕВБ(A3;2)*{1;0}+1;1))*(Артикул=$C$1)*Кол_во)

Автор - krosav4ig
Дата добавления - 17.07.2015 в 16:18
krosav4ig Дата: Суббота, 18.07.2015, 03:14 | Сообщение № 818 | Тема: Создать Диаграмму, размером с экран активного монитора
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
[vba]
Код
With ActiveSheet.ChartObjects(1)
     .Height = ActiveWindow.VisibleRange.Height
     .Width = ActiveWindow.VisibleRange.Width
End With
[/vba]

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

Сообщение отредактировал krosav4ig - Суббота, 18.07.2015, 03:14
 
Ответить
Сообщение[vba]
Код
With ActiveSheet.ChartObjects(1)
     .Height = ActiveWindow.VisibleRange.Height
     .Width = ActiveWindow.VisibleRange.Width
End With
[/vba]
Автор - krosav4ig
Дата добавления - 18.07.2015 в 03:14
krosav4ig Дата: Воскресенье, 19.07.2015, 01:04 | Сообщение № 819 | Тема: Макрос вместо выборки значений из массива
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
iRustem, а так формулы файл грузят?
К сообщению приложен файл: 6270266.xlsm (97.8 Kb)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеiRustem, а так формулы файл грузят?
Автор - krosav4ig
Дата добавления - 19.07.2015 в 01:04
krosav4ig Дата: Понедельник, 20.07.2015, 11:37 | Сообщение № 820 | Тема: Использование в формуле название листа из списка
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
TsibON, Здравствуйте, вот тут посмотрите

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеTsibON, Здравствуйте, вот тут посмотрите
Автор - krosav4ig
Дата добавления - 20.07.2015 в 11:37
Мир MS Excel » Записи участника » krosav4ig [2343]
Поиск:

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