| ← Май 2012 → | ||||||
|
1
|
2
|
3
|
5
|
6
|
||
|---|---|---|---|---|---|---|
|
7
|
8
|
9
|
10
|
12
|
13
|
|
|
14
|
15
|
16
|
17
|
19
|
20
|
|
|
21
|
22
|
23
|
24
|
26
|
27
|
|
|
28
|
29
|
30
|
31
|
|||
За последние 60 дней ни разу не выходила
Сайт рассылки:
http://msexcel.ru
Открыта:
17-06-2006
Адрес
автора: job.education.exl-owner@subscribe.ru
Статистика
3.831 подписчиков
0 за неделю
0 за неделю
Dimchiko>> Неправильная работа функции ВПР
Профессиональные приемы работы в Microsoft Excel Выпуск 20 Подписчиков: 5983 Рассылка сайта "Профессиональные приемы работы в Microsoft Excel"
Новости сайта в формате RSS Порекомендуйте нашу рассылку друзьям Обратная связь Наши рассылки: Наши сайты Профессиональные приемы работы в Microsoft Excel bonifatiy.narod.ru Собор Смоленских святых. Жития, иконы, календарь памятных дат Смоленской епархии. StudentTools.Narod.Ru Для тех, кто любит учиться Наши друзья VBAtips.ru - wordexpert.ru planetaexcel.ru |
Новые сообщения форума "Профессиональные приемы работы в Microsoft Excel"
Serge 007>> Re: Неправильная работа функции ВПР 2012-05-17 16:06 http://forum.msexcel.ru/profiles/serge_007-u25260.html Код: =ВПР(B18;маршруты!$D$2:$E$28;2;) shamilganiev>> Re: как создать макрос для поиска строки по условиям 2012-05-17 16:06 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html Так? Только есть ограничения: 1. Лист2 должен быть пустой (иначе данные перепишутся), 2. книга ЮЛ должна быть закрыта (хотя можно и открытую держать, только надо в коде закомментировать строку с workbook open), 3. поменяй свои точки в колонке Q на запятые, иначе эксель не сможет делать с данными математические операции Barbarian12>> Re: Неправильная работа функции ВПР 2012-05-17 16:07 http://forum.msexcel.ru/profiles/barbarian12-u139204.html Код: =ВПР(B18;маршруты!$D$2:$E$28;2;ЛОЖЬ) nick31>> Re: как создать макрос для поиска строки по условиям 2012-05-17 16:09 http://forum.msexcel.ru/profiles/nick31-u142101.html А У НАС ПРОХОДИТ ТАКАЯ ВЫГРУЗКА! НИКАК ИЗМЕНИТЬ НЕЛЬЗЯ? shamilganiev>> Re: как создать макрос для поиска строки по условиям 2012-05-17 16:24 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html попробуй это nick31>> Re: как создать макрос для поиска строки по условиям 2012-05-17 16:29 http://forum.msexcel.ru/profiles/nick31-u142101.html ПОЛУЧАЕТСЯ, ЧТО ОН НЕ КОПИРУЕТ СТРОКУ! ТАМ ПРОИСХОДИТ ПРЕОБРАЗОВАНИЕ В ОБЩИЙ ФОРМАТ, А МОЖНО ОСТАВИТЬ ПРИ КОПИРОВАНИИ КАК ЕСТЬ? ShAM>> Re: как создать макрос для поиска строки по условиям 2012-05-17 16:35 http://forum.msexcel.ru/profiles/sham-u106530.html nick31, у Вас что Caps Lock запал. Мигель>> Удаление части текста из ячейки до четвертого пробела 2012-05-18 07:47 http://forum.msexcel.ru/profiles/migel-u84558.html Помогите пожалуйста, какую формулу нужно применить, для того чтобы удалить часть текста из ячейки до 4-го пробела. Файл прилагаю Serge 007>> Re: Удаление части текста из ячейки до четвертого пробела 2012-05-18 09:11 http://forum.msexcel.ru/profiles/serge_007-u25260.html Например так: Код: =ПРАВСИМВ(A2;ДЛСТР(A2)-НАЙТИ(" ";A2;НАЙТИ(" ";A2;НАЙТИ(" ";A2;НАЙТИ(" ";A2)+1)+1)+1))
Мигель>> Re: Удаление части текста из ячейки до четвертого пробела 2012-05-18 09:21 http://forum.msexcel.ru/profiles/migel-u84558.html СПАСИБО БОЛЬШОООООЕ!!!  Serge 007>> Re: Удаление части текста из ячейки до четвертого пробела 2012-05-18 09:29 http://forum.msexcel.ru/profiles/serge_007-u25260.html Ещё пара вариантов во вложении _Boroda_>> Re: Удаление части текста из ячейки до четвертого пробела 2012-05-18 10:16 http://forum.msexcel.ru/profiles/boroda-u12234.html А вот еще вариантик: Код: =ПРАВСИМВ(A2;ДЛСТР(A2)-ПОИСК(A2;ПОДСТАВИТЬ(A2;" ";A2;4)))
Poltava>> Как избежать ошибку "Число сохранено как текст" 2012-05-18 11:35 http://forum.msexcel.ru/profiles/poltava-u39021.html Есть база в ней есть поле код наименования состоящее из цифр. Соответственно эксель понимает это поле как числовое и разрешает применять к нему только числовые фильтры. Но вот при поиске это очень неудобно поскольку обычно знаешь только какую либо часть кода соответственно тут идеальным является поиск как по тексту по критерию содержит. Для этого в формате ячейки выставляю значение Текстовый и применяю соответствующий [url=http://msexcel.ru/content/view/27/2/]_автофильтр_[/url]. Все работает но есть один момент, а именно когда выберешь формат текстовый эксель в углу каждой ячейки выводит предупреждение о том что число сохранено как текст можно конечно в ручную выбрать весь диапазон и ручками нажать пропустить ошибку но база довольно большая и периодически обновляется а при обновлении в углу ячейки опять высвечивается это предательское предупреждение. Отсюдова вопрос как можно программно заставить эксель пропустить эту ошибку. То есть обновилась база и потом сработал код который выбрал пропустить эту ошибку для диапазона. Пытался за... Barbarian12>> Макрос, отображающий значения из таблицы 2012-05-18 12:10 http://forum.msexcel.ru/profiles/barbarian12-u139204.html Добрый день! Помогите, пожалуйста, составить макрос, делающий следующее: Есть две большие таблицы, дебиторская и кредиторская задолженность. Данные у таблиц примерно одинаковые: сумма, контрагент, дата и т.д. Необходимо составить макрос, который в одной таблице отображал всю задолженность контрагента из другой таблицы. Я это вижу примерно так: выделяю ячейку J2 из "таблицы 1" вложенного файла, нажимаю комбинацию клавиш, запускающий макрос, который осуществляет поиск значения ячейки Н1 в столбце D "таблицы 2". Поиск должен происходить по частичному совпадению. Если совпадении находится, то макрос выводит диалоговое окно (желательно, чтобы из него можно было копировать значения, но за неимением сойдет и msgbox), где отображается все строки с найденными значениями. Например, при поиске ячейки Н7 ("ИКСТРИМ"), выводилось следующее: 0531687757 01.06.2010 31.05.2011 ООО "ИКСТРИМ" 1584.000 RUR 0.000 1584.000 0531687966 22.07.2010 21.07.2011 ООО "ИКСТРИМ" 3956.750 RUR 0.000 3956.750 Т.е. вс... bzzzu>> Re: Как избежать ошибку "Число сохранено как текст" 2012-05-18 12:10 http://forum.msexcel.ru/profiles/bzzzu-u85011.html Если я правильно поняла проблему, то хочется чтобы просто не отображалась ошибка? Тогда может просто отключить ее, убрав соответствующую галочку в Файл->Параметры->Формулы->Правила контроля ошибок->Числа отформатированные как текст. Hugo121>> Re: как создать макрос для поиска строки по условиям 2012-05-18 12:13 http://forum.msexcel.ru/profiles/hugo121-u30647.html Ответил http://www.excelworld.ru/forum/2-1705-1#18953 Poltava>> Re: Как избежать ошибку "Число сохранено как текст" 2012-05-18 13:02 http://forum.msexcel.ru/profiles/poltava-u39021.html Да но сделать это на каждом компьютере где будет открываться файл невозможно. Да и к тому же это относиться ко всем файлам и частенько оказывается полезной вещью. Именно потому и возник вопрос как это сделать программно для известного заранее диапазона shamilganiev>> Re: Макрос, отображающий значения из таблицы 2012-05-18 13:03 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html вот попробуй без макросов пока что ZORRO2005>> Re: Удаление части текста из ячейки до четвертого пробела 2012-05-18 13:13 http://forum.msexcel.ru/profiles/zorro2005-u4225.html Еще один: Код: =ЗАМЕНИТЬ(A2;1;ПОИСК("`";ПОДСТАВИТЬ(A2;" ";"`";4));"")
Hugo121>> Re: Макрос, отображающий значения из таблицы 2012-05-18 13:14 http://forum.msexcel.ru/profiles/hugo121-u30647.html Можно так попробовать: Код: Sub Macro1() Columns("K:R").ClearContents With Sheets(2) Dim Rng As Range .[D:D].AutoFilter Field:=1, Criteria1:="=*" & Selection.Value & "*" Set Rng = .UsedRange.SpecialCells(xlCellTypeVisible) Intersect(Rng, .Columns("A:H")).Copy [k2] .[D:D].AutoFilter End With End Sub Только сперва на втором листе добавьте сверху строку с заголовками или хотя бы с пробелом в D1. Да, рассчитано на то, что в момент запуска активна ячейка с критерием (например "ИКСТРИМ") _Boroda_>> Re: Удаление части текста из ячейки до четвертого пробела 2012-05-18 14:11 http://forum.msexcel.ru/profiles/boroda-u12234.html Еще один: Точно! Так интереснее!Код: =ЗАМЕНИТЬ(A2;1;ПОИСК("`";ПОДСТАВИТЬ(A2;" ";"`";4));"") Но тогда уж 1) на 2 символа короче и 2) не зависит от наличия в А2 символа ' Код: =ЗАМЕНИТЬ(A2;1;ПОИСК(A2;ПОДСТАВИТЬ(A2;" ";A2;4));"")
Poltava>> Ошибка при объявлении переменной 2012-05-18 14:30 http://forum.msexcel.ru/profiles/poltava-u39021.html Добрый день в приложении файл в нем три макроса 1)Рабочий 2)Нерабочий 3)Очистка форматов Макрос рабочий от макроса нерабочий отличается только объявлением переменных. Но после этого он напрочь отказывается работать. В чем причина для меня пока загадка. Третий макрос служит для отмены действия макросов (то есть убирает поставленную ранее рабочим макросом заливку) Помогите разобраться где я напартачил Wasilic>> Re: как создать макрос для поиска строки по условиям 2012-05-18 14:31 http://forum.msexcel.ru/profiles/wasilic-u24852.html И тоже не работает!  Вот, надеюсь, рабочий и последний мой вариант. ЗЫ Файл, по просьбе nick31 переделал, перевложил. Hugo121>> Re: как создать макрос для поиска строки по условиям 2012-05-18 14:46 http://forum.msexcel.ru/profiles/hugo121-u30647.html Проверил последний файл от ТС с excelworld - у меня всё отрабатывает как нужно. Возможно, косяк в десятичных разделителях - у меня в системе/Экселе используются точки. Wasilic>> Re: как создать макрос для поиска строки по условиям 2012-05-18 14:52 http://forum.msexcel.ru/profiles/wasilic-u24852.html У меня работает если так! Poltava>> Re: Как избежать ошибку "Число сохранено как текст" 2012-05-18 14:53 http://forum.msexcel.ru/profiles/poltava-u39021.html В принципе можно и не менять на текст но тогда вопрос сменяется обратным как в столбце с числами с помощью расширенного фильтра выбрать те что содержат 5 или 025. Мои попытки копать в этом направлении пока бесполезны. Приложу файл может кто знает как должно выглядеть условие Allaire>> Помогите разобраться с датой (преобразование) 2012-05-18 15:14 http://forum.msexcel.ru/profiles/allaire-u26105.html Добрый день коллеги! Дело вот в чем - у меня есть файл экселя, где на одном листе я ввожу данные, на втором они мапятся на печатную форму (см. вложенный файл). Т.е. на листе "форма вводе" есть поле АР2 (с типом данных "дата"). Она должна мапится в поле (клеточки) на печатной форме CZ2 по DN2. Но вместо этого я получаю значение 40940 - проблема выходит с преобразованием данных... помогите "распарсить" корректно, так чтобы нужная цифра попадала в нужную клетку. Спасибо! iron priest>> Re: Помогите разобраться с датой (преобразование) 2012-05-18 15:20 http://forum.msexcel.ru/profiles/iron_priest-u20725.html Код: =ПСТР(ТЕКСТ('Форма ввода'!$AP$2;"ДДММГГГГ");1;1) и так далее MCH>> Re: Удаление части текста из ячейки до четвертого пробела 2012-05-18 15:41 http://forum.msexcel.ru/profiles/mch-u48782.html Код: =ЗАМЕНИТЬ(A2;1;ПОИСК(A2;ПОДСТАВИТЬ(A2;" ";A2;4));"") Код: =ЗАМЕНИТЬ(A2;1;ПОИСК(A2;ПОДСТАВИТЬ(A2;" ";A2;4));) и еще на два:Код: =ПСТР(A2;ПОИСК(A2;ПОДСТАВИТЬ(A2;" ";A2;4))+1;99)
RAN>> Re: Ошибка при объявлении переменной 2012-05-18 15:51 http://forum.msexcel.ru/profiles/ran-u99256.html Здесь Код: Function LastCol(RowNumber As Integer) As Integer и здесьКод: Dim LCol As String
Dim LRow As Long LCol = LastCol(9) 'Получаем последнюю колонку Allaire>> Re: Помогите разобраться с датой (преобразование) 2012-05-18 16:01 http://forum.msexcel.ru/profiles/allaire-u26105.html Код: =ПСТР(ТЕКСТ('Форма ввода'!$AP$2;"ДДММГГГГ");1;1) и так далее Allaire>> Re: Помогите разобраться с датой (преобразование) 2012-05-18 16:13 http://forum.msexcel.ru/profiles/allaire-u26105.html Спастбо за пример, но почему-то в поле вместо цифры появляется буква Д (т.е. ПСТР выгребает 1 знак из этой маски), что за? Спасибо, разобрался... надо было:=ПСТР(ТЕКСТ('Форма ввода'!$AP$2;"dd-mm-yyyy");1;1) - хз почему Hugo121>> Re: как создать макрос для поиска строки по условиям 2012-05-18 16:15 http://forum.msexcel.ru/profiles/hugo121-u30647.html Да, VAL() это даже проще - всё равно копеек нет и не интересуют ShAM>> Re: Как избежать ошибку "Число сохранено как текст" 2012-05-18 16:25 http://forum.msexcel.ru/profiles/sham-u106530.html Цитировать Да но сделать это на каждом компьютере где будет открываться файл невозможно. Да и к тому же это относиться ко всем файлам и частенько оказывается полезной вещью. Именно потому и возник вопрос как это сделать программно для известного заранее диапазона Можете сделать так.Код: Private Sub Workbook_Open() Application.ErrorCheckingOptions.NumberAsText = False End Sub Код: Private Sub Workbook_BeforeClose(Cancel As Boolean) Т.е. при открытии книги убираете галочку, перед закрытием ставите обратно.Application.ErrorCheckingOptions.NumberAsText = True End Sub Или лучше на Activate, Deactivate книги или листа. Wasilic>> Re: как создать макрос для поиска строки по условиям 2012-05-18 17:31 http://forum.msexcel.ru/profiles/wasilic-u24852.html Да, VAL() это даже проще - всё равно копеек нет и не интересуют И копейки будут, если будут.
Poltava>> Re: Как избежать ошибку "Число сохранено как текст" 2012-05-18 17:44 http://forum.msexcel.ru/profiles/poltava-u39021.html Да это вариант на активацию листа событие засунуть. В принципе пока наверно лучшее. Но все же мне уже стал интерес и обратный вопрос как отфильтровать числа как текст. Poltava>> Re: Ошибка при объявлении переменной 2012-05-18 17:50 http://forum.msexcel.ru/profiles/poltava-u39021.html Да а ларчик просто открывался. Спасибо а то как то уже глаза за мылились и не подумал туда глянуть. Точнее смотрел но в упор невидел Hugo121>> Re: как создать макрос для поиска строки по условиям 2012-05-18 18:17 http://forum.msexcel.ru/profiles/hugo121-u30647.html Ну копейки то конечно копирует. Но не анализирует. Там после разделителя хоть что может быть написано... nick31>> Re: как создать макрос для поиска строки по условиям 2012-05-18 18:19 http://forum.msexcel.ru/profiles/nick31-u142101.html и при добавлении строк, когда сам добавляешь пишет, что файл открыт. повторное открытие приведет к потере данных nick31>> Re: как создать макрос для поиска строки по условиям 2012-05-18 18:28 http://forum.msexcel.ru/profiles/nick31-u142101.html при удалении строк самому из файла ЮЛ и сразу же после нажатия макроса, он строки копирует не стирая, получается, что дубль происходит! можно сделать так, чтобы он очищал старые строки и записывал новые измененные туда? vvvsu>> Помогите составить формулу умножения 2012-05-18 18:50 http://forum.msexcel.ru/profiles/vvvsu-u142581.html Помогите составит формулу умножения на разные коэффиц, если значение ячейки больше или меньше заданного условия Wasilic>> Re: как создать макрос для поиска строки по условиям 2012-05-18 19:10 http://forum.msexcel.ru/profiles/wasilic-u24852.html и при добавлении строк, когда сам добавляешь пишет, что файл открыт. повторное открытие приведет к потере данных С проверкой на наличие открытого файла!
nick31>> Re: как создать макрос для поиска строки по условиям 2012-05-18 19:32 http://forum.msexcel.ru/profiles/nick31-u142101.html после макроса с 1 строки, а не с 5...посмотрите Wasilic>> Re: как создать макрос для поиска строки по условиям 2012-05-18 20:11 http://forum.msexcel.ru/profiles/wasilic-u24852.html после макроса с 1 строки, а не с 5...посмотрите Ну откуда ж мне знать, что шапки в новом списке не будет.Я еще много чего не знаю, поскольку не телепат. Посему, эта тема, видимо не скоро закроется. Последняя корректировка. PS: Вот, к примеру, не знаю, почему макрос должен быть в отдельном файле 1-1, а не может быть непосредственно в файле ЮЛ.  
Poltava>> Re: Помогите составить формулу умножения 2012-05-18 20:12 http://forum.msexcel.ru/profiles/poltava-u39021.html Как то странно стоит задачя! Что с чем сравнивать, где брать коэффициенты? Вот вам такой вариант к примеру если в a1 больше ста то умножиться на 1,2 иначе на 1,5 Код: =ЕСЛИ(A1>100;A1*1,2;A1*1,5)
shamilganiev>> Re: Помогите пожалуйста, не знаю как ввести математическую формулу в ячейку. 2012-05-19 05:57 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html Чё-то не могу открыть pdf файл. у всех так или только у меня? задание вроде бы не сложное (на первый взгляд) shamilganiev>> Re: Ошибка файла: данные могут быть утеряны 2012-05-19 06:03 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html Если тебе это поможет, то у меня такое тоже бывало на некоторых файлах, но я так и не смог найти закономерности такого поведения до того, как поведение исчезало. Может попробуешь скопировать все листы в другую, вновь созданную книгу например? Или несколько раз сделать "Сохранить как..." в различные форматы (xls, xlsx, xlsm, ...) и потом обратно в старый формат или остаться на том формате, на котором не глючит? Igor_Tr>> Зацепил, на свою голову, цвета заливки ячеек 2012-05-19 10:09 http://forum.msexcel.ru/profiles/igortr-u25564.html Нужно получить текстовое значение цвета заливки Например ActiveCell.Interior.ColorIndex = 6 mSring = <текстовое название цвета ("Желтый")> ActiveCell.Offset(0,1).Value = mString Спасибо. iron priest>> Re: Excel таблицы в Word 2012-05-21 19:05 http://forum.msexcel.ru/profiles/iron_priest-u20725.html где файлы? Гоанец>> Re: Цикл VBA, Excel 2012-05-21 19:13 http://forum.msexcel.ru/profiles/goanets-u143013.html Wasilic, огромное человеческое спасибо! Хорошего вечера -)) GoodLuck To All>> Re: Excel таблицы в Word 2012-05-21 19:14 http://forum.msexcel.ru/profiles/goodluck_to_all-u143032.html Дело в том, что при открытии этого файла на другом компьютере, все открывается совершенно без проблем. Видимо пострадал EXCEL или WORD именно на моем компьютере!!! Пробовал сносить с чисткой реестра и настроек (RevoUnistiler и CCleaner) - толку ноль. История повторялась. А на другом компьютере все читается без проблем. Могу прикрепить скрин _Boroda_>> Re: Excel таблицы в Word 2012-05-21 19:40 http://forum.msexcel.ru/profiles/boroda-u12234.html http://www.excelworld.ru/forum/2-1722-19028-16-1337614904 Гоанец>> Re: Цикл VBA, Excel 2012-05-21 19:48 http://forum.msexcel.ru/profiles/goanets-u143013.html нет, немножко не то- как быть, если я хочу суммировать не по отобранным значениям (=0), а по произвольному текстовому значению? вот есть у нас две колонки, в первой текст (покупатель1, 2, 3) а во второй суммы. нам нужно, скажем, получить сумму по покупатель1 и вывести ее куда-нибудь? вот что-то такое у меня получается, но нэ работает( Sub fdf() PS = Range("A" & Rows.Count).End(xlUp).Row X = 0 For I = 1 To PS If Cells(I, 1) Like Range("c5") Then X = X + Cells(I, 2) End If Next I Cells(1, 3) = X End Sub Гоанец>> Re: Цикл VBA, Excel 2012-05-21 20:09 http://forum.msexcel.ru/profiles/goanets-u143013.html Спасибо, сам дошел ребята, огромное спасибо за такой ресурс, где можно задать вопрос и очень быстро получить компетентный ответ! asada>> Комбинирование данных и гистограммы. Нужна помощь 2012-05-21 21:14 http://forum.msexcel.ru/profiles/asada-u141915.html Уважаемые эксперты Excel, У меня неразрешимая задача. Для наглядности в прикрепленном файле исходные данные и изображение гистограммы, которую нужно получить на выходе. Помогите, пожалуйста!! Роман_ВП>> Округление 2012-05-21 22:22 http://forum.msexcel.ru/profiles/romanvp-u104524.html Здравствуйте! Возможно ли сделать такое округление? Необходимо округлить число кратно 5 или 0, по таким параметрам: если число входит в первую единицу после 5 или 0(325,3; 325,9; 320,9; 320,5), то округлить на уменьшение до 5 или 0 соответственно(325; 325; 320; 320), всё остальное должно округлятся вверх до 5 или 0 (на увеличение), например как в ОКРВВЕРХ Файл во вложении. ZORRO2005>> Re: Округление 2012-05-21 23:28 http://forum.msexcel.ru/profiles/zorro2005-u4225.html Код: =ЕСЛИ(ОСТАТ(A2;5)<1;ОКРВНИЗ(A2;5);ОКРВВЕРХ(A2;5)) Wasilic>> Re: Округление 2012-05-21 23:33 http://forum.msexcel.ru/profiles/wasilic-u24852.html А если так: =ОКРВВЕРХ(ЦЕЛОЕ(A2);5) ZORRO2005>> Re: Округление 2012-05-21 23:36 http://forum.msexcel.ru/profiles/zorro2005-u4225.html У Wasilic симпатичнее! Роман_ВП>> Re: Округление 2012-05-21 23:49 http://forum.msexcel.ru/profiles/romanvp-u104524.html У Wasilic симпатичнее! То что надо! Спасибо ZORRO2005, спасибо Wasilic! kurkova>> Анализ строк, алгоритм Хиршберга 2012-05-22 00:07 http://forum.msexcel.ru/profiles/kurkova-u143060.html Помогите, пожалуйста, написать функцию для рассчета алгоритма Хиршберга. http://program.rin.ru/cgi-bin/print.pl?id=863 en.wikipedia.org/wiki/Hirschberg's_algorithm То есть берем две ячейки в Excel и при помощи функции рассчитываем меру близости между ними, в алгоритме Хиршберга - нахождение наибольшей общей подпоследовательности. Есть пример, как реализовано расстояние Левенштейна: Здесь ArrN - функция, которая обрезает пробелы и переводит строку в нижний регистр. Public Function Levenshtein(prmT1 As String, prmT2 As String) As Long 'вычисляем расстояние Левенштейна между 2умя преобразованными строками prmT11 = ArrN(prmT1) prmT21 = ArrN(prmT2) Dim D() As Long M = Len(prmT11) N = Len(prmT21) ReDim D(M, N) D(0, 0) = 0 For j = 1 To N D(0, j) = D(0, j - 1) + 1 ' Вставка Next j For i = 1 To M D(i, 0) = D(i - 1, 0) + 1 ' Удаление For j = 1 To N 'D(i, j) = Min(D(i - 1, j) + Ci, D(i, j - 1) + Cd, D(i - 1, j - 1) + Cr) ... Magyar>> Перенос динамически изменяющихся данных в таблицу через равные интервалы времени 2012-05-22 00:24 http://forum.msexcel.ru/profiles/magyar-u143061.html Добрый вечер! Есть данные, выводимые через DDE-сервер в Excel, постоянно изменяющиеся (в приложенном рисунке - в красном круге). Есть необходимость заносить их в таблицу, чтоб каждую минуту (2 минуты, десять и т.п.) новые данные записывались в новой строке. Выполнимо ли и как? Спасибо! STEROID>> КАК присвоить ячейке с ЛИСТА2 формульный результат с ЛИСТА1 2012-05-22 00:30 http://forum.msexcel.ru/profiles/steroid-u114348.html РЕБЯТА выручайте! Есть список из наименований на ЛИСТЕ1 стобец А, столбец Б количество планируемого расхода, столбец С - свободный остаток = остаток с ЛИСТА2 (ищется по формуле ВПР, критерии поиска на ЛИСТЕ2 разбросаны по столбцу и группировать - ЛОГИЧЕСКИ НЕЛЬЗЯ)-количество к покупке ЗАДАЧА: Как видно из примера свободный остаток на ЛИСТЕ1 посчитал, но необходимо прописать такой же результат на ЛИСТЕ2 в соответствующей ячейке, это необходимо осуществить формульно с ЛИСТА1, а именно из формул со столбца С! не получилось, так как абсолютно не сталкивался с формулами поиска адресов ячеек, а с чем и сталкивался, ума не приложу как применить... Помогите пожалуйста! Poltava>> Re: КАК присвоить ячейке с ЛИСТА2 формульный результат с ЛИСТА1 2012-05-22 01:05 http://forum.msexcel.ru/profiles/poltava-u39021.html Не совсем понятно что вы хотели! То как понял во вложении Poltava>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени 2012-05-22 01:46 http://forum.msexcel.ru/profiles/poltava-u39021.html Ну это смотря как вы эти данные туда записываете! Самый примитив пришедший в голову накидал в файле ниже. Отлавливаем событие изменение на листе -- проверяем входит ли диапазон в контролируемую область -- считываем данные в таблицу. И еще не совсем понятно что писать в первый столбец посему сделал как представил себе. Нужно же с чего то начинать STEROID>> Re: КАК присвоить ячейке с ЛИСТА2 формульный результат с ЛИСТА1 2012-05-22 02:55 http://forum.msexcel.ru/profiles/steroid-u114348.html Спасибо за ответ, видимо действительно неправильно объяснил, хочу сделать что-то вроде: на листе 1 записать формулу в чистом остатке: И(ВПР(A2;ОСТАТОК!$A$2:B$6;2;ЛОЖЬ)-B2;***присвоить это же значение в соответствующую ячейку (критерий А2) столбца "свободный остаток" на листе 2***) - именно такая форма - значение должно считаться в ячейке ЛИСТА1 и одновременно присваиваться с ЛИСТА1 в соответствующую ячейку по заданному критерию на ЛИСТ2, вопрос - каким способом найти эту нужную ячейку, а именно СТОЛБЕЦ "СВОБОДНЫЙ ОСТАТОК" согласно критерия отбора и как же присвоить вычисленное значение свободного остатка (ВПР(A2;ОСТАТОК!$A$2:B$6;2;ЛОЖЬ)-B2) с ЛИСТА1 в найденную ячейку в ЛИСТ2 ЗНАЧЕНИЯ НЕ МОГУТ ВЫТЯГИВАТЬСЯ с ЛИСТА1, путем записи формул в столбце "свободный остаток" ЛИСТА2, в ЛИСТЕ2 должен быть список динамических значений, динамику которых будут задавать множество условий с других ЛИСТОВ! Затеял разработку глобального проекта резервирования материалов на складах, вроде как все з... Andrii>> Re: Поиск одинаковых значений 2012-05-22 09:16 http://forum.msexcel.ru/profiles/andrii-u143152.html Стоит задача найти и выделить в двух листах одинаковые значения ячеек. Если бы не "в двух листах", то самое простое решение этой части задачи - выделение дубликатов цветом ([url=http://msexcel.ru/content/view/116/2/]условное_форматирование[/url]). Например,
Wasilic>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени 2012-05-22 09:35 http://forum.msexcel.ru/profiles/wasilic-u24852.html Есть необходимость заносить их в таблицу, чтоб каждую минуту (2 минуты, десять и т.п.) новые данные записывались в новой строке. Так можно.
Выполнимо ли и как? Poltava>> Re: КАК присвоить ячейке с ЛИСТА2 формульный результат с ЛИСТА1 2012-05-22 10:49 http://forum.msexcel.ru/profiles/poltava-u39021.html Цитировать ЗНАЧЕНИЯ НЕ МОГУТ ВЫТЯГИВАТЬСЯ с ЛИСТА1, путем записи формул в столбце "свободный остаток" ЛИСТА2, в ЛИСТЕ2 должен быть список динамических значений, динамику которых будут задавать множество условий с других ЛИСТОВ! От этих слов мой мозг опух! я перечитал раз 10 но так и не понял ПОЧЕМУ нельзя формулой! Что в вашем понимании значит динамические значения. Это же противоречит вопросу! Я не понимаю какая разница между записью в ячейку откуда то и считыванием данных формулой в туже ячейку!Ну а если по существу вопроса то я о таких способах не знаю, по крайне мере стандартными средствами. Если можно использовать VBA то тогда решение есть причем довольно не сложное. Но оно вам надо Barbarian12>> Re: Комбинирование данных и гистограммы. Нужна помощь 2012-05-22 11:26 http://forum.msexcel.ru/profiles/barbarian12-u139204.html Нужно что-то подобное? Наложил две диаграммы друг на друга и в самой таблице добавил по пустой строке между брендами. Poltava>> Как узнать текущие параметры сортировки 2012-05-22 11:40 http://forum.msexcel.ru/profiles/poltava-u39021.html Добрый день. Захотел реализовать функцию чтоб при двойном клике по шапке таблицы она сортировалась по этому столбцу. Уперся в то что не могу получить текущие параметры сортировки То есть клацнул два раза отсортировало от A до Я клацнул опять два раза отсортировало от Я до А Вопрос в том как определить что уже произведена сортировка от A до Я и отсортировать теперь уже нужно от Я до А Цитировать ActiveWorkbook.Worksheets(1).Sort.SortFields.Clear Сортировку делаю таким макросомActiveWorkbook.Worksheets(1).Sort.SortFields.Add Key:=Range("E10:E4032") _ , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal With ActiveWorkbook.Worksheets(1).Sort .SetRange Range("A10:H4032") .Header = xlYes .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With Barbarian12>> Re: Макрос, отображающий значения из таблицы 2012-05-22 11:57 http://forum.msexcel.ru/profiles/barbarian12-u139204.html Можно так попробовать: Спасибо. Парочка замечаний:Только сперва на втором листе добавьте сверху строку с заголовками или хотя бы с пробелом в D1. Да, рассчитано на то, что в момент запуска активна ячейка с критерием (например "ИКСТРИМ") - Нужно, чтобы данные начинали отображаться не со строки 2, а с той же строки, из которой осуществляется поиск. Т.е. если искомое значение находится в строке 152, то и значений из таблицы должны отображаться с ячейки К152; - При каждом поиске сейчас отображается вторая строка, что неверно (см. пример); - При следующем запуске макроса, предыдущие результаты поиска должны удаляться. Magyar>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени 2012-05-22 12:20 http://forum.msexcel.ru/profiles/magyar-u143061.html Ну это смотря как вы эти данные туда записываете! Самый примитив пришедший в голову накидал в файле ниже. Отлавливаем событие изменение на листе -- проверяем входит ли диапазон в контролируемую область -- считываем данные в таблицу. И еще не совсем понятно что писать в первый столбец посему сделал как представил себе. Нужно же с чего то начинать Дело в том, что данные поступают через DDE постоянно, каждую секунду. А заносить в таблицу нужно раз в минуту, остальные 59 секунд данные пропускаются Adar>> Ускорения работы Excel файла 2012-05-22 12:24 http://forum.msexcel.ru/profiles/adar-u8942.html Здравствуйте, у меня есть довольно массивный файл Excel, который даже на мощном компьютере загружается заметное время, тоже самое при сохранении. Меня интересуют варианты ускорения работы макроса. Мне в голову приходят несколько вариантов: а) отключить автоматический расчёт функций и сделать его ручным с запуском макроса б) сделать все расчёты через макрос в) другие варианты? Буду признателен различным решения для ускорения. И непосредственно меня интересует такое решение (если оно даёт эффект): макрос, где: перед выходом из книги, отключается пересчёт в ячейках, что я так понимаю может ускорить сохрание/выход и загрузку файла снова. макрос при запусе которого наоборот будет обратно включится автоматический пересчёт <- прийдётся ли мне тогда ждать N-ное время равное времени загрузки файла при уже включённом автоматическом расчёте или оно будет всё же заметно меньше? Magyar>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени 2012-05-22 12:29 http://forum.msexcel.ru/profiles/magyar-u143061.html Есть необходимость заносить их в таблицу, чтоб каждую минуту (2 минуты, десять и т.п.) новые данные записывались в новой строке. Так можно.Выполнимо ли и как? Моя недоработка - не сказал, что постоянно изменяющиеся данные в ячейках - формулы, берущие данные из других ячеек. А как я понял .ClearContents чистит ячейки. С формулами вместе. А еще... Спасибо, ребята, за активное участие! На другом форуме программеров просто показали, что я лузер, и на том конец Poltava>> Re: Ускорения работы Excel файла 2012-05-22 13:34 http://forum.msexcel.ru/profiles/poltava-u39021.html Почитайте здесь Несколько советов по работе с VBA в Excel У меня был такой файл в нем было около 100000 строк и порядка 10 колонок. Данные в этот лист через разные формулы вытягивались из остальных листов книги где их было около 10 и в каждом еще тысяч по 10000-30000 строк и порядка 4 колонок. Он жутко долго открывался и сохранялся. каждый пересчет занимал минут 5!!! Работать было почти невозможно любое нажатие на ентер порождало пересчет и так далее. Для работы отключал автопересчет реакцию на события прогрес бар. потом поменяв все включал обратно и минут через 5 наблюдал нужный мне результат. В итоге и от этого метода ушел как от пагубного. Написал макрос который по кнопке обновляет данные на первом листе. то есть нажал кнопку подождал 30 секунд все на 1 лист записаны значения с остальных листов нет формул нет проблем с пересчетом и кстати размер файла стал поменьше когда ушел от формул ссылок и динамических диапазонов. nick31>> сравнение 2 х файлов по определенным столбцам 2012-05-22 15:57 http://forum.msexcel.ru/profiles/nick31-u142101.html у нас есть 2 файла "списание" и "реквизиты"! Нужно создать макрос, чтобы при сравнении столбцов по реквизитам из файла "реквизиты" данные копировались в файл "списание" по определенным столбцам! Например если бик банка столбца U файла "реквизиты" совпадает с бик банком столбца Y "списание" и № счета столбца W файла "реквизиты" совпадает с № счета столбца U "списания", то данные файла "реквизиты" B,C,D,E,F,G,H копируются в файл "списание" по столбцу C,D,E,F,G,H,I. Данные V копируются в AV, данные I,J,K,L,M,N,O,P,Q,R,S,T копируются в AJ,AK,AL,AM,AN,AO,AP,AQ,AR,AS,AT,AU соответственно. Затем если U совпадает с N и W совпадает с R, то данные копируются с B,C,D,E,F,G,H в AC,AD,AE,AF,AG,AH,AI после V копируется в BI и I,J,K,L,M,N,O,P,Q,R,S,T, КОПИРУЕТСЯ В AW,AX,AY,AZ,BA,BB,BC,BD,BE,BF,BG,BH , А ЕСЛИ ДАННЫХ НЕТ ПО ЭТОМУ КЛИЕНТУ, ТО НИЧЕГО НЕ ПРОИСХОДИТ, ПОЛЯ НИЧЕМ НЕ ЗАПОЛНЯЮТСЯ Wasilic>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени 2012-05-22 16:08 http://forum.msexcel.ru/profiles/wasilic-u24852.html постоянно изменяющиеся данные в ячейках - формулы, берущие данные из других ячеек Какие формулы? В каких ячейках? В ячейках обведенных кругом? Так оттуда берется только результат и заносится в таблицу. А таблица очищается при каждом следующем открытии книги. Не надо очищать, сообщите. Откуда мне или другим знать, как надо. В данном случае, это был пример для решения поминутного выполнения какой либо задачи. А в остальном - думайте. Правильно будет, если будет пример, а не картинка, как положено согласно п.2 [url=http://forum.msexcel.ru/pravila_foruma/pravila_foruma-t129.0.html]правил_форума[/url] и четко поставлена задача! Poltava>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени 2012-05-22 16:29 http://forum.msexcel.ru/profiles/poltava-u39021.html На сколько я понял человека ему нужен макрос который будет срабатывать раз в t секун и писать время и данные из этих ячеек в таблицу. Но у меня вопрос у вас эти данные пишутся в то время как файл открыт или закрыт или в любом случае и данные обязательно в этот файл или можно в другой???KuklP>> Re: Как узнать текущие параметры сортировки 2012-05-22 16:56 http://forum.msexcel.ru/profiles/kuklp-u39713.html Очень просто: Код: f = IIf([a1] > [a2], xlAscending, xlDescending) Или короче:Код: f = ([a1] > [a2]) + 2 А в сорт:Код: Order:=f
Poltava>> Re: Как узнать текущие параметры сортировки 2012-05-22 17:32 http://forum.msexcel.ru/profiles/poltava-u39021.html Да но это скорее обход проблемы а не ее решение. Подойдет если нас интересует именно параметр Order: а если нужно узнать SortOn: то тогда как или если данные вообще не сортированы??? тогда чистый рандом получается.Quixotic>> Автоматический выбор коэффициента по дате. 2012-05-22 17:43 http://forum.msexcel.ru/profiles/quixotic-u143043.html Уважаемые участники форума, подскажите пожалуйста как организовать автоматическую подстановку коэффициента для заданной даты для последующих расчетов с учетом подставленного коэффициента. Во вложении примерный вариант таблицы... В первую таблицу вводятся данные и происходит деление числа на коэффициент. Во второй предоставлен список коэффициентов для дат расчета. Задача в том, чтобы человек мог указать дату вычисления, а программа сама выбрала нужный коэффициент и произвела деление, с отражением каждого значения в своем поле (наглядность обязательна). Коэффициенты изменяются не каждый день и поэтому нужно как то сделать, чтобы программа выбирала коэффициент ближайшей прошедшей даты для каждой операции (если конечно такое возможно). К сожалению мои знания эксель не позволяют мне на данный момент сообразить как это все осуществить, поэтому очень прошу местных гуру помочь разобраться в данном вопросе. Заранее благодарен. KuklP>> Re: Как узнать текущие параметры сортировки 2012-05-22 17:43 http://forum.msexcel.ru/profiles/kuklp-u39713.html Дерзайте. Может Вам удастся найти то, чего нет. Poltava>> Re: Как узнать текущие параметры сортировки 2012-05-22 17:55 http://forum.msexcel.ru/profiles/poltava-u39021.html Это намек на то что невозможно узнать отсортированы данные или нет или на то что вообще нельзя ничего узнать??? ZORRO2005>> Re: Комбинирование данных и гистограммы. Нужна помощь 2012-05-22 17:56 http://forum.msexcel.ru/profiles/zorro2005-u4225.html Barbarian12, как вы сделали бренды разными цветами? ZORRO2005>> Re: Автоматический выбор коэффициента по дате. 2012-05-22 18:01 http://forum.msexcel.ru/profiles/zorro2005-u4225.html В ячейку С2: Код: =ВПР(A2;Коэффициенты!$A$2:$B$14;2) Только есть ограничение:даты на листе "Коэффициенты" должны быть расположены в возрастающем порядке. KuklP>> Re: Как узнать текущие параметры сортировки 2012-05-22 18:10 http://forum.msexcel.ru/profiles/kuklp-u39713.html Это не намек:) Такие вопросы уже задавались на форумах. "невозможно узнать отсортированы данные" - почему, возможно. Принцип такой же, как я предложил. А узнавать по каким полям группированы данные... можно, но хлопотно. Да и в жизни не нужно. На самом деле всегда нужно сортировать по каким-то условиям. А как оно было отсортировано ранее - какая разница? Poltava>> Re: Как узнать текущие параметры сортировки 2012-05-22 18:25 http://forum.msexcel.ru/profiles/poltava-u39021.html Ну по сути задача такая. Всего возможны 4 варианта сортировки для одного и того же поля! от А до Я; от Я до А; от большего к меньшему и от меньшего к большему если с параметром от до можно сравнить то вот как понять как отсортировано сейчас как числа или как текст. То есть по алфавиту или по порядку номеров даже не представляю. Хотя если все так сложно то может просо вывести пользователю окно сортировки а там сам пусть думает! но опять таки как вывести пользователю окно сортировки KuklP>> Re: Как узнать текущие параметры сортировки 2012-05-22 18:37 http://forum.msexcel.ru/profiles/kuklp-u39713.html Попробуйте: Код: Application.Dialogs(39).Show Или Код: Application.Dialogs(192).Show
Magyar>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени 2012-05-22 18:53 http://forum.msexcel.ru/profiles/magyar-u143061.html На сколько я понял человека ему нужен макрос который будет срабатывать раз в t секун и писать время и данные из этих ячеек в таблицу. Но у меня вопрос у вас эти данные пишутся в то время как файл открыт или закрыт или в любом случае и данные обязательно в этот файл или можно в другой???Все именно так! Данные пишутся только при открытом файле. Можно и в другой файл ZORRO2005>> Re: Комбинирование данных и гистограммы. Нужна помощь 2012-05-23 00:19 http://forum.msexcel.ru/profiles/zorro2005-u4225.html Можно сделать и без наложения-в настройках пустых ячеек выбрать линию. asada>> Re: Комбинирование данных и гистограммы. Нужна помощь 2012-05-23 01:00 http://forum.msexcel.ru/profiles/asada-u141915.html Спасибо!!! Два шока за 1 вечер! ) А есть ли возможность автоматически убирать с диаграммы те продукты, цены на которые в таблице Excel отсутствуют? Можно ли связать цвет бар с конкретными группами ячеек, а то при добавлении/удалении строк в таблицу все цвета баров сбиваются? boa>> Re: Выгрузка данных из Excel в XML (vba макрос?) 2012-05-23 02:30 http://forum.msexcel.ru/profiles/boa-u4698.html если вы собираетесь сделать ХМЛьку в формате для сдачи в "органы", то даже не "заморачивайтесь"... но если очень хочется, посмотрите здесь: выгрузка (экспорт) в XML boa>> Re: Сортировка данных в EXCEL в расшаренном файле 2012-05-23 02:47 http://forum.msexcel.ru/profiles/boa-u4698.html поставить на запуск функцию, которая будет приводить в порядок ваши таблицы  Пример: Код: Private Sub Workbook_Open()
For Each ws In ThisWorkbook.Worksheets With ThisWorkbook.Worksheets(ws.Name) ObrabotkaLista End With Next End Sub Private Sub ObrabotkaLista() With ThisWorkbook.ActiveSheet ND = .Range("Начало_диапазона").Row ' от... KD = .Range("Конец_диапазона").Row ' до... On Error Resume Next .ShowAllData iRow = .Cells(Rows.Count, 1).End(xlUp).Row iCol = .Cells(1, 1).End(xlToRight).Column 'найдем последнюю колонку в таблице с результирующими данными .Range(.Cells(1, 1), .Cells(iRow, iCol)).AutoFilter Field:=1 'Установка [url][url=http://msexcel.ru/content/view/27/2/]_автофильтр_[/url][/url] .Outline.ShowLevels RowLevels:=1 'Скрытие уровней End With End Sub boa>> Re: запрет на окрытие файла определенным пользователем 2012-05-23 02:58 http://forum.msexcel.ru/profiles/boa-u4698.html поэксперементируйте с этой функцией: Environ P.S. Environ() — возвращает абсолютный путь для переменных окружения компьютера (полный список переменных, доступных на Вашем компьютере, можно просмотреть, если в командной строке выполнить команду SET). Например, Вам нужно записать что-то в файл во временном каталоге. Абсолютный путь к временному каталогу на вашем компьютере можно получить так: MsgBox Environ("TEMP") P.P.S. в Вашем случае Environ("UserName") boa>> Re: Анализ строк, алгоритм Хиршберга 2012-05-23 03:13 http://forum.msexcel.ru/profiles/boa-u4698.html LTrim, RTrim, and Trim Functions Returns a Variant (String) containing a copy of a specified string without leading spaces (LTrim), trailing spaces (RTrim), or both leading and trailing spaces (Trim). - что бы оборезать справа/слева(из хэлпа) LCase() и UCase() — перевести строку в нижний/ерхний регистры. Часто используется для подготовки значения к сравнению, когда при сравнении регистр не важен (фамилии, названия фирм, городов и т.п.). Libelle>> Получение числовых значений из разных столбцов любыми функциями 2012-05-23 04:34 http://forum.msexcel.ru/profiles/libelle-u143278.html Здравствуйте. Помогите, пожалуйста, с задачами. К теме прикреплен файл. Нужно получить заданное число, используя различные столбцы. Заданное число нужно получить, используя самые различные функции. Первые два задания решены с помощью функции СЧЕТЕСЛИ: СЧЁТЕСЛИ(C3:C12;">=40") и СЧЁТЕСЛИ(B3:B12;"в*"). Дальше - ступор. Раньше Excel изучала, сейчас всё забылось, но пришлось столкнуться опять.. Может, кто поможет. Спасибо заранее  cheshiki1>> Re: Получение числовых значений из разных столбцов любыми функциями 2012-05-23 09:25 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html а файл экселя приложить никак? Poltava>> Re: Как узнать текущие параметры сортировки 2012-05-23 11:10 http://forum.msexcel.ru/profiles/poltava-u39021.html Вы прям как в старом анекдоте: Цитировать Словили бандиты зажиточного мужика связали, отвезли на реку Значит не те вопросы задавали редактору и давай пытать.Окунают его в воду головой. Через 5 секунд вытаскивают: - Деньги есть?! - Неет! Опять окунают. Через 10 секунд вытаскивают: - Драгоценности есть?! - Неет!! Снова в воду. Через 15 секунд вытаскивают: - Золото есть?!! - Нееет!! Вы или фонарик дайте, или опускайте глубже - дна вообще не видно!! Так сказать вот вам фонарикЦитировать ActiveWorkbook.Worksheets(1).Sort.SortFields.Add Key:=Range("C10:C110") _
, SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal ActiveWorkbook.Worksheets(1).Sort.SortFields.Add Key:=Range("C10:C110") _ , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortTextAsNumbers Serge 007>> Re: запрет на окрытие файла определенным пользователем 2012-05-23 11:13 http://forum.msexcel.ru/profiles/serge_007-u25260.html как сделать запрет на открытие файла excel от определенного пользователя? Я как-то задавался таким вопросом
Poltava>> Re: Получение числовых значений из разных столбцов любыми функциями 2012-05-23 11:15 http://forum.msexcel.ru/profiles/poltava-u39021.html Да задачки не сложные но вот пере набирать ваши таблицы тут никто не собирается. А писать формулы по картинке хлопотно и опять таки лень. Так что давайте файл!!! Libelle>> Re: Получение числовых значений из разных столбцов любыми функциями 2012-05-23 12:27 http://forum.msexcel.ru/profiles/libelle-u143278.html Поняла-поняла. Вот файл Sorry Barbarian12>> Re: Макрос, отображающий значения из таблицы 2012-05-23 13:36 http://forum.msexcel.ru/profiles/barbarian12-u139204.html Hugo121, спасибо! Сначала написал, а потом посмотрел, что все работает. И последний вопрос: как сделать, чтобы значения искались в двух столбцах: D и Е? Работая_в_Excel>> В ячйке при вводе не отображаются данные 2012-05-23 14:09 http://forum.msexcel.ru/profiles/rabotayavexcel-u143331.html При вводе значения отображаются только в строке формул, а не в ячейке, а после "фиксации" значения удаляются Какие настройки приложения нужно сделать в этом случае? Serge 007>> Re: В ячйке при вводе не отображаются данные 2012-05-23 14:18 http://forum.msexcel.ru/profiles/serge_007-u25260.html Проверьте цвет шрифта, валидацию (данные - проверка данных) и блокировку листа. Лучше скинуть кусок файла (до 100 кб) сюда ЗЫ Что такое "фиксация"? Fedbul>> Re: В ячйке при вводе не отображаются данные 2012-05-23 14:47 http://forum.msexcel.ru/profiles/fedbul-u31035.html Если я понял Параметры Дополнительно Разрешить редактирование в ячеках (поставте галочку) runner>> Re: Получение числовых значений из разных столбцов любыми функциями 2012-05-23 15:09 http://forum.msexcel.ru/profiles/runner-u31387.html То есть, изначальная задача - не поиск числовых значений, а поиск зависимостей?! Есть "Дано" и есть "Ответ", а задачку придумайте сами! Так? Libelle>> Re: Получение числовых значений из разных столбцов любыми функциями 2012-05-23 15:17 http://forum.msexcel.ru/profiles/libelle-u143278.html Да. Именно так. Дана таблица с разными значениями, с разными типами данных. И нужно отыскать какую-то зависимость, чтобы получилась заданная цифра, используя в разных случаях разные столбцы. Функции можно использовать на своё усмотрение. Dmitr68>> Re: Получение числовых значений из разных столбцов любыми функциями 2012-05-23 15:20 http://forum.msexcel.ru/profiles/dmitr68-u18737.html Вот навскидку 4 варианта формул, приводящих к нужному результату (задание 3): Код: =СУММ(--(ЧАСТОТА(ПОИСКПОЗ(A3:A12&C3:C12;A3:A12&C3:C12;);СТРОКА(A3:A12)-2)=1)) Код: =СУММПРОИЗВ(--((A3:A12<>"соль")+(C3:C12<>40)>0)) Код: =ЧАСТОТА((A3:A12<>"соль")+(C3:C12<>40);{9;0}) Код: =СЧЁТЕСЛИ(A3:A12;"соль")+СЧЁТЕСЛИ(C3:C12;"<>40")
iron priest>> Re: В ячйке при вводе не отображаются данные 2012-05-23 15:27 http://forum.msexcel.ru/profiles/iron_priest-u20725.html формат ячеек еще следует проверить Adar>> Re: Ускорения работы Excel файла 2012-05-23 17:33 http://forum.msexcel.ru/profiles/adar-u8942.html Спасибо! Обязательно почитаю Hugo121>> Re: Макрос, отображающий значения из таблицы 2012-05-23 21:09 http://forum.msexcel.ru/profiles/hugo121-u30647.html Код: Sub Macro2() Columns("K:R").ClearContents With Sheets(2) With .[D:E] .AutoFilter 1, "=*" & Selection.Value & "*" .AutoFilter 2, ">1600" End With Intersect(.UsedRange.SpecialCells(xlCellTypeVisible), _ .Columns("A:H")).Copy Cells(ActiveCell.Row, "k") .[D:E].AutoFilter End With End Sub Как будете задавать второй параметр - это уже следующий вопрос. А последний уже был
Adar>> Ошибка при разархивации Method 'NameSpace' of object 'IShellDispatch5' failed 2012-05-24 00:01 http://forum.msexcel.ru/profiles/adar-u8942.html Есть у меня VBA код, который при запуске скачивает .zip файл и разархивировает его в папку. Но на одном из компьютеров при попытке разархивировать файл появляется ошибка: Runtime error Method 'NameSpace' of object 'IShellDispatch5' failed При нажатии Debug желтым подсвечивает следующую часть VBA: ShellApp.Namespace(ZipFolder).CopyHere _ ShellApp.Namespace(TargetFile).items Чем может быть вызвана эта ошибка. boa>> Re: Ошибка при разархивации Method 'NameSpace' of object 'IShellDispatch5' failed 2012-05-24 01:32 http://forum.msexcel.ru/profiles/boa-u4698.html Чем может быть вызвана эта ошибка. вероятнее всего - антивируспопробуйте его отключить, если получится выполнить операцию, то "поройтесь" в настройках антивируса Libelle>> Re: Получение числовых значений из разных столбцов любыми функциями 2012-05-24 03:34 http://forum.msexcel.ru/profiles/libelle-u143278.html Dmitr68, спасибо большое за помощь. Появились хоть какие-то идеи Не скажу, что всё поняла, но буду разбираться. Mikhalya>> При смене версии MS Office на 2010 перестал работать макрос 2012-05-24 06:02 http://forum.msexcel.ru/profiles/mikhalya-u122552.html При смене пакета Ms Ofice перестал работать макрос. Открывает слудеющую ощибку; If fLocaleInfo(LOCALE_SDATE) <> "." And fLocaleInfo(LOCALE_SDECIMAL) <> "," Then Dim Response Response = MsgBox("Для работы программы нужно установить Россия(Russian) в региональных настройках. Пуск(Start)>>Установки(Settings)>>Контрольная Панель(Control Panel)>>Региональные и Языковые настройки(Regional and Language Options)", vbCritical, "Ошибка") Exit Sub End If Form.Show vbModeless End Sub На сегодня все. До встречи на следующей неделе. |
||||||||
| В избранное | ||
