Профессиональные приемы работы в Microsoft Excel

Выпуск 2
от 2008-01-18

Подписчиков: 5915

Рассылка сайта "Профессиональные приемы работы в Microsoft Excel"

Основные разделы сайта

Статьи

Форум

Новости сайта в формате RSS
Новые сообщения форума в формате RSS

Порекомендуйте нашу рассылку друзьям

Обратная связь
Поддержка
(форум рассылки)

Наши рассылки:

Наши сайты

Профессиональные приемы работы в Microsoft Excel
Excel от новичка до эксперта

bonifatiy.narod.ru
В помощь выздоравливающим алкоголикам и наркоманам

Собор Смоленских святых. Жития, иконы, календарь памятных дат Смоленской епархии.

StudentTools.Narod.Ru Для тех, кто любит учиться

Наши друзья

VBAtips.ru -
подсказки и решения на VBA

wordexpert.ru
Профессиональная работа с текстом

planetaexcel.ru
Когда заешь - все просто

Новые сообщения форума "Профессиональные приемы работы в Microsoft Excel"

Тема: Отв: сводные таблицы‚ формулы‚ финансовые функции - : Шпец Докапыч
2008-01-11 09:28
Загляни в Издательский дом Вильямс по адресу: В этом доме к анонсируемым книгам часто приложены файлы для скачивания (часть книги и(или) авторские примеры кода): Сводные таблицы в Microsoft Office Excel 2007, Билл Джелен, Майкл Александер; 74,7Мб Сводные таблицы в Microsoft Excel, Билл Джелен, Майкл Александер; 13,6Мб + 0,5Мб Формулы и функции в Microsoft Office Excel 2003, Пол Мак-Федрис; 0,4Мб + 0,2Мб Подробное руководство по созданию формул в Microsoft Office Excel 2003, Дж...

Тема: Отв: Закрытие отчёта при выполнении условия! - : Шпец Докапыч
2008-01-11 09:28
Попытка помочь с решением №0: Код следует поместить в модуль ЭтаКнига [code:1]Sub Workbook_BeforeClose(Cancel As Boolean) Dim i As Integer, YAchka As Range, Kon1 As String, Kon2 As String For Each YAchka In [D39: D53] If YAchka.Value > 0 And Not YAchka.Offset(0, -1).Value Like [0-3][0-9].[01][0-9].#### Then i = i + 1 Next If i > 0 Then If i = 1 Then Kon1 = у : Kon2 = ки Else Kon1 = ы : Kon2 = ок ...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Сергей Барабанов
2008-01-11 10:29
Неплохо бы уточнить что здесь закрытая книга. Может речь идёт об неактивной книге. Закрытая книга это просто файл и записать что либо в него не открывая вроде как нельзя (если кто знает как это сделать пусть обязательно поделиться) Вот извлечь инфу из закрытой книги, не открывая её можно - основа это использование в формуле ссылки на закрытую книгу. Поскольку средствами VBA можно назначить ячейке формулу (при назначении ячейке формулы содержащей ссылку на закрытую книгу ексель сам прочтет необходимые да...

Тема: Отв: Научите считать заданные значения в ячейках - : Дмитрий C
2008-01-11 10:29
благодарю, но башка с утра тугая, не понял, как это применить. Есть столбец с тясячами ячеек, в каждой абсолютное значение возраста человека. Нужно сосчитать колличество людей в разных возрастных категориях и отобразить это все на круговой диаграмме....

Тема: Помогите разобраться с защитой - : Игорь Куликов
2008-01-11 11:36
Попался на глаза интересный файлик. Головоломка внутри с просьбой разгадать абревиатуры. Но суть не в этом. Дело в том что этот файл очень интересно защищён - при попытке просмотреть содержимое ячейки оно просто напросто не показывается в строке правки, при двойном клике по ячейке выводится сообщение что ячейка или диаграмма защищена.... Иду в Сервис-Защита .. и что вижу? все строки неактивны, то есть нет даже возможности снять защиту. Что это может быть????...

Тема: Отв: Переварачивание данных - : Richard Ral
2008-01-11 13:32
а каким образом можно транспонировать вставку с сохранением связей? Т.е. чтобы вставлялись не значения, а ссылки....

Тема: Помогите разобраться с защитой - : Игорь Куликов
2008-01-11 13:32
Попался на глаза интересный файлик. Головоломка внутри с просьбой разгадать абревиатуры. Но суть не в этом. Дело в том что этот файл очень интересно защищён - при попытке просмотреть содержимое ячейки оно просто напросто не показывается в строке правки, при двойном клике по ячейке выводится сообщение что ячейка или диаграмма защищена.... Иду в Сервис-Защита .. и что вижу? все строки неактивны, то есть нет даже возможности снять защиту. Что это может быть???? [file]...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Сергей Барабанов
2008-01-11 18:37
в данном случае получается структура уже задана в которую через ado добавляется запись -- эксель сам решает что и куда поэтому вопрос:: а задать- изменить с помощью ado структуру(таблицу) можно? и можно ли просто записать в такуюто ячейку такое то значение?...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Владимир .
2008-01-11 18:37
Сергей М писал(а): Никак. ну вот ... ОПЯТЬ ... :P ну ПОЧЕМУ же? КТО ADO отменил? http://support.microsoft.com/kb/247412/EN-US/ Transfer data to a worksheet by using ADO Using the Microsoft Jet OLE DB Provider, you can add records to a table in an existing Excel workbook. A table in Excel is merely a range with a defined name. The first row of the range must contain the headers (or field names) and all subsequent rows contain the records. The following steps illustrate how you can cre...

Тема: Небольшая работа (1000р) Excel - : ferdinand magellan
2008-01-11 22:43
Есть экселевский файл для составления плана развоза товаров по точкам и инкассирования их же. Выглядит примерно так: http://s1.imgdb.ru/2008-01/11/1-JPG_n39apfcw.gif В верхней части водители, справа находится ежедневно меняющийся отчет 1С'ки. Логист проставляя единички, сопоставляет первое со вторым и в результате образуется индивидуальный план развоза для каждого водителя и ведомость на инкасс (вкладки внизу окна). Проблема состоит в том, что файл может обрабатывать не более 255 (реально еще минус...

Тема: Отв: Научите считать заданные значения в ячейках - : Алексей Шмуйлович
2008-01-12 01:26
На основании этого солбца строите сводную таблицу. В область строк св. табл. помещаете поле возраста. В область данных - его же, но в параметрах поля указываете не сумму, а количество значений. При желании в дополнительных вычислениях - % к итогу. Таблица готова. Теперь на ее основе строите круговую диаграмму....

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Игорь М
2008-01-12 14:08
Извиняюсь что долго не реагировал. Не совсем понятно как это осуществить. Приложу пример. Рабочей формой является Пример-3, а Book1 это та закрытая не активная книга в которой необходимо обновлять данные при изменении их Журнале. Журнал обновляется после акцептирования нового акта по кнопке. Заранее спасибо за совет и за помощь. ...

Тема: Как разделить текст на две ячейки - : Андрей Хухка
2008-01-12 16:43
Подскажите, как разделить текст на две ячейки. Например есть список по отелям: ROYAL CROWN PHUKET [ Deluxe Palm Building ] THE BAY [ Studio,PHUKET ] AT PANTA [ Deluxe Resort ] BAAN BOA [ ROH ] BEST WESTERN PHUKET OCEAN RESORT SPA [ Superior ] KARON PRINCESS [ Superior Garden ] THE PHULIN RESORT [ De–Luxe ] CENTARA KARON RESORT PHUKET [ The Terraces Superior ] Требуется: что в квадратных скобках вынести в отдельную ячейку и оставшуюся левую часть в другую ячейку....

Тема: помощь - : Валерий D
2008-01-12 20:44
Нужна помощь помогите найти ошибку в функции ВПР к артинку прикрепил...

Тема: Отв: Как разделить текст на две ячейки - : Андрей Х.
2008-01-13 00:47
Спасибо большое! Помогли, работает:)...

Тема: Отв: Как разделить текст на две ячейки - : Pavel Pupkin
2008-01-13 00:47
Выделите свой текст, далее меню Данные - Текст по столбцам... В появившемся окне: Укажите формат данных: с разделителями кнопка Далее Символом-разделителем является: Другой в окошке пишите [ кнопка Далее Поместить в: можете оставить тот же А1 , но тогда ваш текст замениться, либо укажите другую ячейку, например D1 кнопка Готово У вас получится так ROYAL CROWN PHUKET и Deluxe Palm Building ] теперь давайте уберём символ ] Допустим, что надпись Deluxe Palm Building ] у вас з...

Тема: Экспорт нескольких таблиц из Excel в XML - : Александр NL
2008-01-13 13:49
Здравствуйте! Есть следующая задача: В Excel есть много таблиц, к примеру около 50-100. Все разные, т.е. количество столбцов постоянно и одинаково, а вот количество строк разное. К примеру столбцы: id, товар, количество. Но в последней строке всегда пишется клиент (ФИО, координаты). Нужно все это дело экспортить в XML макросом (xml потом представить в web). Подскажите, пожалуйста, как лучше реализовать экспорт в целом. В частности, как привязать элемент xml к последней строке каждой таблицы (если все...

Тема: Небольшая работа (1000р) Excel - : ferdinand magellan
2008-01-13 13:49
del. P.S. Спасибо, работа выполнена...

Тема: Сводные таблицы, но считать не нужно(!) - : Александр САмускевич
2008-01-13 14:49
Доброе время суток, господа! Поздравляю всех с накатывающим (а для многих, кто будет учитать, уже с накатившим) Старым Новым Годом! (надесь на ответы не к Нестарому Новому, т.е. 2009 Году;) ) Итак есть исходные данные для сводной таблицы, например содержащие следующие столбцы: - компания - город - тип подразделения - наименование подразделения - квартал - руководитель подразделения (в этом квартале) Обычно еще есть какие-то числовые данные, но в том-то и дело, что здесь они не требуются! ...

Тема: Отв: Сводные таблицы, но считать не нужно(!) - : Алексей Шмуйлович
2008-01-14 00:53
Это, собственно, несложно. Можете выложить пример в архиве - я сделаю запрос....

Тема: Отв: Сводные таблицы, но считать не нужно(!) - : Алексей Шмуйлович
2008-01-14 00:53
Боюсь, что именно так в сводной таблице не получится. Можно попробовать подготовить исходные данные в сводной - вывести все по строкам. А потом скопировать данные из сводной в обычную таблицу и выбрать нужные данные с помощью ВПР() / ГПР(). Можно пойти другим путем - использовать перекрестные запросы Access, но это, если умеете....

Тема: Отв: Сводные таблицы, но считать не нужно(!) - : Александр Самускевич
2008-01-14 03:52
Спасибо, Алексей за совет и готовность попробовать что-то сделать! Предположение уместное в условии неописания мною необходимости перехода к сводной таблице. Предполага, что в результате реализации Вашего предложения получится таблица, которая у меня является отправной. Однако есть потребность в просмотре срок с группировками - первоначально по типу подразделений, потом где они находятся, потом какими ридическими лицами представлены; - первоначально по городам, потом по юрлицам, потом по типам под...

Тема: Отв: Макрос по удалению строк с пустыми ячейками - : Пайгусов Михаил
2008-01-14 10:52
У меня в коде формы прописано: Private Sub UserForm_Initialize() ComboBox1.AddItem ( 50 ) ComboBox1.AddItem ( 70 ) ComboBox1.AddItem ( 90 ) ComboBox2.AddItem ( 50 ) ComboBox2.AddItem ( 70 ) ComboBox2.AddItem ( 90 ) ComboBox3.AddItem ( 1 ) ComboBox3.AddItem ( 2 ) ComboBox3.AddItem ( 3 ) ComboBox3.AddItem ( 4 ) ComboBox3.AddItem ( 5 ) End Sub Private Sub CommandButton1_Click() P = CDbl(TextBox1.Text) G = CDbl(TextBox2.Text) af = CDbl(TextBox3.Text) Hef = CDbl(TextBox4.Text) h = CDbl(TextB...

Тема: Отв: Флажки ко всему столбцу - : Шпец Докапыч
2008-01-14 10:52
Решение №0: Выдели диапазон ячеек (можно несмежный) и выполни следующий код: [code:1]Sub Flazhki_SHpetsStyle() Dim YAchka As Range, nRange As Range, Flag As String Dim Koor1 As Long, Koor2 As Long, CWEach As Integer, FRC As String Dim x As String, y As Integer, Bukva As String, Diapazon As String For Each YAchka In Selection On Error Resume Next x = Left(Right(Bukva, Len(Bukva) - 1), 1) / 1 If x = Then y = 1 Else y = 2 Koor1 = ...

Тема: Отв: Помощь (ошибка в функции ВПР) - : Шпец Докапыч
2008-01-14 11:52
Формула будет выглядеть так: =ВПР(5;R[-19]C[-1]:R[-4]C[1];3;ИСТИНА)...

Тема: Выбор общих значений из двух столбцов - : Sergey Zun
2008-01-14 11:52
Добрый день! К сожалению воспользовавшись поиском не нашел ни чего похожего. Проблема заключается в следующем: В Экселе есть два столбца с числовыми данными, необходимо в третий столбец занести те значения которые есть и в первом и во втором столбце....

Тема: Отв: Выбор общих значений из двух столбцов - : Шпец Докапыч
2008-01-14 15:38
Большое пожалуйста. Только ошибка #Н/Д смущает при отсутствии совпадения. Хотя, может, это не суть важно;)...

Тема: Отв: Выбор общих значений из двух столбцов - : Sergey Zun
2008-01-14 15:38
Большое спасибо за ответ. Проблема уже решена. Друг подсказал решение: =ЕСЛИ(ПОИСКПОЗ(A1;B:B;0)=0; ;A1) может быть кому нибудь тоже пригодиться....

Тема: Отв: Выбор общих значений из двух столбцов - : Шпец Докапыч
2008-01-14 15:38
Решение №0: Пусть A1:B100 - столбцы с данными, тогда C1: =ЕСЛИ(СЧЁТЕСЛИ($B$1:$B$100;A1)>0;A1; ) C2: =ЕСЛИ(И(СЧЁТЕСЛИ($B$1:$B$100;A2)>0;СЧЁТЕСЛИ($C$1:$C1;A2)<1);A2; ) C2 копировать, С3:C100 вставить +Дополнение (для красоты): C1:C100 выделить, копировать, спец.вставка, вставить значения, сортировка....

Тема: подрузка модулей - : Андрей Ковальчук
2008-01-14 15:54
всем привет. вопрос по vba: можно ли как-то подгружать модули (те, которые *.bas) средствами vba (допустим, при открытии книги)? если непонятно написал, объясню, для чего нужно: есть достаточно большое количество книг с макросами, в которых используются одинаковые переменные с определенными значениями (в моем случае это даты праздничных дней). мысль такая - чтобы не менять их в каждой книге, завести модуль в определенном месте, где это дело будет жить. тогда изменять надо будет в одном месте, ошибки и...

Тема: Отв: подрузка модулей - : Шпец Докапыч
2008-01-14 16:57
Что если все модули поместить в личную книгу макросов (.../XLStart/ personal.xls )?...

Тема: Отв: подрузка модулей - : Шпец Докапыч
2008-01-14 17:56
Что если все модули поместить в личную книгу макросов ( personal.xls в папке XLStart )?...

Тема: Отв: подрузка модулей - : Андрей Ковальчук
2008-01-15 10:48
а разве можно обращатся из одной книги к модулям другой? по-моему нет. да и макросы используются не не одной машине, а на нескольких......

Тема: Отв: подрузка модулей - : Шпец Докапыч
2008-01-15 12:50
1) Т.к. personal.xls будет запускаться при каждом запуске Excel , то лучше сделай в нём м. О кно -п. Скр ы ть . 2) Рецепт для запуска макросов другой (открытой) книги: 3) На клиентских машинах используй автозапуск следующего кода: [code:1] ChDir \\Server Workbooks.Open Filename:= \\Server\XLStart\personal.xls Windows( Лист1 «»).Activate[/code:1] Естественно, папка XLStart должна быть в общем доступе с правом на правку (извини за тавтологию), если ты хочешь добавлять/редак...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Владимир .
2008-01-15 14:52
чего-то ерунДА .... еще раз ... ... НЕ грузятся файлы ... :( НИ ZIP, НИ RAR .... ...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Сергей Барабанов
2008-01-15 14:52
>>>ерунда Похоже конфликт при почти одновременном добавлении записей в форум...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Сергей Барабанов
2008-01-15 14:52
Владимир . писал(а): просто НАДО поэкспериментировать ... и ВСЁ (ну или ПОЧТИ ... :-)) все ) ... получится ... Так вопрос и заключается в том насколько целесообразно использование ADO (и не к ночи будут упомянуты adox,xml,ole db,da sdk,odbc dsn,mdac,rds и всяких *script) на машине XP только со встроенными редакторами VBA для оффиса и в моём случае для ещё ряда программ поддерживающих VBA???????? Ну а в целом буду благодарен если выложете пару строк кода демонстрирующих обмен данными между кн...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Владимир .
2008-01-15 14:52
Игорь М писал(а): Владимир, а Вы можете объяснить на примере. Заранее благодарю. вот Ваш пример ... файл Book1.xls ДОЛЖЕН лежать на диске С ... в корне...

Тема: передача управления в другой файл - : MAV MAV
2008-01-15 14:52
как реализовать следующую ситуацию... есть файл .. в нем запустили макрос он открыл другой файл запустил в нем процедуру ,которая закрыла первый файл и продолжила заниматься своими делами ...

Тема: Разборка текстового файла по строчкам - : Вася Пуговкин
2008-01-15 14:52
имеется некоторый текстовый фаил с таким содержанием : security_rule,Any,Any,Any,Any,Drop,Log,Any,Any, rulebase_header,Wap security_rule,Any,Deny,Any,Any,Drop,Log,Any,Any, security_rule,WapGateway_WS_Ericsson;WapGateway_WS_Nokia1;WapGateway_WS_Nokia2;WapGateway_WS_Nokia3;WapGateway_WS_Nokia4,Any,Any,http;https;TCP_8080,Accept,None,Any,Any, security_rule,AdmGroup,Any,Any,Any,Accept,Log,Any,Any, security_rule,galimed-rti,WAP-SPLAT-SKL,Any,ssh,Accept,Log,Any,Any, ...

Тема: Отв: подрузка модулей - : Андрей Ковальчук
2008-01-15 14:52
ага! но получить/передать параметры из одного модуля в другой в разных книгах у меня не получается :( допустим, в одной книге есть функция подсчета квадрата Public Function sq(a) sq = a ^ 2 End Function как мне из другой книги вычислить корень пяти, например?...

Тема: Отв: подрузка модулей - : Андрей Ковальчук
2008-01-15 14:52
спасибо, попробую...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Игорь М
2008-01-15 14:52
Владимир, а Вы можете объяснить на примере. Заранее благодарю....

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Владимир .
2008-01-15 14:52
Сергей Барабанов писал(а): в данном случае получается структура уже задана в которую через ado добавляется запись -- эксель сам решает что и куда поэтому вопрос:: а задать- изменить-- с помощью ado структуру(таблицу) можно? и можно ли просто записать в такуюто ячейку такое то значение? ну Не Excel ... а SQL ... :) и НЕ ADO, а опять же SQL ... :P потому как Insert into - оператор SQL есть и другие операторы ... например ALTER TABLE ... просто НАДО поэкспериментиров...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Владимир .
2008-01-15 16:07
чего-то ерунДА .... еще раз ... ... НЕ грузятся файлы ... :( НИ ZIP, НИ RAR .... еще разок ... нда .... ТЕПЕРЬ можно ТОЛЬКО файл изображения отослать ... ВО как ... ...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Владимир .
2008-01-15 18:53
а в новом сообщении ЕСТЬ ... бббблин ... ну ЧЁ за ... :evil: [img]...

Тема: Чего-то форум ОПЯТЬ ... - : Владимир .
2008-01-15 18:53
эт только МНЕ так везет сегодня ... или ГДЕ ... возможность прикрепить ФАЙЛ? НЕ картинку а ФАЙЛ ... и на ZIP и на RAR ругнулся, что МОЖНО прикреплять только ZIP или RAR ... :woohoo: а потом ТАКАЯ возможность ПРОПАЛА совсем ... хм ... а в ЭТОМ сообщении ... ЭТО есть ... а вот при ПОТЫТКЕ редактирования своего последнего сообщения в http://forum.msexcel.ru/component/option,com_joomlaboard/Itemid,32/func,view/id,4147/catid,21/ ЭТОГО НЕТУ ... ...

Тема: Отв: Как вводить время точнее ? Например до тысячных долей секунды ! - : Шпец Докапыч
2008-01-15 18:53
Решение №0: [code:1]Sub Time_SHpets() Dim Start As Single, Finish As Single, Pro As Single, ZHdyom As Single ZHdyom = 2.001 Start = Timer While Pro < ZHdyom Finish = Timer Pro = Finish - Start Wend MsgBox ( Вы просили подождать Int(ZHdyom) с CInt((ZHdyom - Int(ZHdyom)) * 1000) _ мс, а прошло Int(Pro) с CInt((Pro - Int(Pro)) * 1000)) мс:«»-) End Sub[/code:1]...

Тема: Отв: подрузка модулей - : Шпец Докапыч
2008-01-15 18:53
В крайнем случае можно передать параметры через значение ячеек, но лучше так: ...

Тема: сохранить файл в макросе - : Stas Leva
2008-01-15 18:53
Еть проблемка... Написал макрос, руками добавил закрытие приложения, а вот как сделать чтобы в конце обработки данного макроса небыло вопроса Сохранить изменения в *opt.xls* файле? - незнаю.... текст кода рабочего: [code:1] Sub mak1() ' ' Сочетание клавиш: Ctrl+q ' Workbooks.Open Filename:= ....\price_srok.xls Rows( 2:38 «»).Select Selection.Copy Windows( opt.xls «»).Activate Rows( 2:2 «»).Select Selection.Insert Shift:=xlDown ActiveWorkbook.Save ...

Тема: Отв: сохранить файл в макросе - : Stas Leva
2008-01-15 21:56
что посоветуете еще?...

Тема: Отв: сохранить файл в макросе - : Stas Leva
2008-01-15 21:56
1) не действует вставить где именно? 2) может нужно играться не с Workbooks, а с ActiveWindow ??????...

Тема: Отв: сохранить файл в макросе - : Шпец Докапыч
2008-01-15 21:56
Всё будет хорошо, если добавишь такую строчку: ...

Тема: Как суммировать значения в опр. диапазоне - : Константин Константинов
2008-01-16 07:00
Здравствуйте! Для многих тут сидящих я думаю не затруднит мой вопрос)) Дело вот в чем: Могу ли я подитожить колонку с данными, например 1-ая ячейка содержит: 1, 38, L, XL 2-ая ячейка содержит: 38, 40, 1 и т.д. мне нужно в конце списка подвести итог сколько всего значений после , соответственно если брать эти 2 ячейки сумма равна 7... Напишите с помощью каких формул могу я такое сделать и как)) заранее спасибо!...

Тема: Отв: Как суммировать значения в опр. диапазоне - : Сергей Барабанов
2008-01-16 09:20
для подсчёта числа слов в строке, если в качестве разделителя слов используется запятая, можно воспользоваться тем что при замене запятой на (пустую строку) длина строки уменьшается на число запятых. Соответственно количество слов в ячейке = ДЛСТР(A1)-ДЛСТР(ПОДСТАВИТЬ(A1; , ; ))+1 Вводите данную формулу рядом с первой ячейкой вашей колонки - заменяя А1 на соответствующий адрес. Протягиваете формулу вдоль всей колонки. Внизу находите количество слов в вашей колонке как сумму слов в каждой ячейке....

Тема: Отв: Как суммировать значения в опр. диапазоне - : Константин Константинов
2008-01-16 09:58
Серега, огромное те спасибо!)) Выручил!...

Тема: Отв: сохранить файл в макросе - : Stas Leva
2008-01-16 12:14
Андрей Ковальчук - СУПЕР! РАБОТАЕТ.. НАКОНЕЦТО спасибо. вопрос 2 - у меня щас нужный файл открывается и я по комбинации клавиш выполняю макрос Экселя.... как можно при запуске именно opt.xls выполнить АВТОматически нужный макрос (он прописан в PERSONAL.xls). может в *.bat открывающий opt.xls прописать какойто параметр ???...

Тема: Отв: сохранить файл в макросе - : Stas Leva
2008-01-16 12:14
Андрей Ковальчук - СУПЕР! РАБОТАЕТ.. НАКОНЕЦТО спасибо. вопрос 2 - у меня щас нужный файл открывается и я по комбинации клавиш выполняю макрос Экселя.... как можно при запуске именно opt.xls выполнить АВТОматически нужный макрос (он прописан в PERSONAL.xls). может в *.bat открывающий opt.xls прописать какойто параметр ???...

Тема: Отв: передача управления в другой файл - : Oleg X
2008-01-16 12:14
Вот пример. Здесь из файла 1.xls вызвается файл 2.xls Private Sub CommandButton1_Click() Dim MyXL As Object Set MyXL = Workbooks.Open( c:\2.xls ) Workbooks( 1.xls ).Close End Sub Чтобы не было запроса на сохранение при закрытии можно добавить Application.DisplayAlerts = False...

Тема: Отв: подрузка модулей - : Андрей Ковальчук
2008-01-16 12:14
спасибо а в случае процедуры? чтобы передавалисть/возвращались несколько параметров Public Sub sss(a, Optional sq, Optional kub) sq = a ^ 2 kub = a ^ 3 End Sub вычислить сразу и квадрат и куб?...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Игорь М
2008-01-16 12:14
Владимир, может попробуете еще раз прикрепить пример....

Тема: Отв: сохранить файл в макросе - : Андрей Ковальчук
2008-01-16 12:14
Workbooks( opt.xls ).Close savechanges:=true...

Тема: Отв: сохранить файл в макросе - : Stas Leva
2008-01-16 12:14
))))) sorry, эту строчку кода я зря выдал... она само собой не нужна. но проблема так и не исчезла... макрос спрашивает сохранить файл, а не должен....

Тема: Отв: сохранить файл в макросе - : Владимир .
2008-01-16 12:14
Stas Leva писал(а): Еть проблемка... Написал макрос,. а ЧТО вот ЭТО такое - ActiveWindow.Save = True ...

Тема: Отв: передача управления в другой файл - : MAV MAV
2008-01-16 13:03
вопрос состоит в том чтобы в другом файле например 2.xls начал бы работу макрос другой который...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Владимир .
2008-01-16 13:03
Игорь М писал(а): Владимир, может попробуете еще раз прикрепить пример. смотрите почту ... :)...

Тема: Эксперты, помогите решить задачу!! - : Константин Константинов
2008-01-16 13:03
Нужно с помощью формул в столбце конечный остаток вывести итог, т.е. к остатку + приход 1 + приход2 - продано. В данном примере конечный остаток должен иметь вид: 38, XL, 38, 38, S, 40 (без разницы в каком порядке это будет распологаться). Огромная просьба помогите пожалуйста!!! ...

Тема: Отв: сохранить файл в макросе - : Андрей Ковальчук
2008-01-16 13:03
надо в модуль книги ( Эта книга ) добавить процедурку Private Sub Workbook_Open() Application.Run personal!ИмяМакроса End Sub правда, по поводу application.run я еще не совсем разобрался :) в разделе подгрузка модулей меня активно учит Шпец Докапыч, спасибо ему за это...

Тема: Отв: Эксперты, помогите решить задачу!! - : Сергей Барабанов
2008-01-16 15:04
Константин, прежде всего нужно подумать над более хорошим структурированием данных. Я конечно понимаю что вводить набор данных через запятую удобно. Но ведь потом для исключения чего то из набора данных нужно разбить его на элементы, проверить есть ли удаляемый элемент, удалить элемент, заново собрать список. А вы хотите вдобавок еще вычитать не один элемент а список элементов. Плюс к этому как исходный так и вычитаемый список - произвольного размера и могут содержать повторяющиеся элементы. Это совсем ...

Тема: Отв: сохранить файл в макросе - : Stas Leva
2008-01-16 15:04
Превед))) спсб, буду свой под такой манер подстраивать...

Тема: Отв: сохранить файл в макросе - : Андрей Ковальчук
2008-01-16 15:04
смотри пример ...

Тема: Отв: сохранить файл в макросе - : Stas Leva
2008-01-16 15:04
для автоматического запуска Sub auto_open() 'тело проце-дуры End Sub тоже непомогает.......

Тема: Отв: сохранить файл в макросе - : Stas Leva
2008-01-16 15:04
после добавления и сохранения .... просто файл открывается и все... макрос сам не выполняется, в редакторе тоже запись удаляется... может я не туда пишу процедуру?...

Тема: Отв: передача управления в другой файл - : Oleg X
2008-01-16 17:06
Тогда чуть больше ' в файле 1.xls на первом листе для кнопки CommandButton1 Private Sub CommandButton1_Click() Dim MyXL As Object Set MyXL = Workbooks.Open( c:\2.XLS ) Workbooks( 2.XLS ).Sheets( Лист1 ).Kill_1 End Sub ' в файле 2.xls на первом листе Public Sub Kill_1() MsgBox OK! Workbooks( 1.xls ).Close End Sub...

Тема: Отв: Разборка текстового файла по строчкам - : Oleg X
2008-01-16 17:06
[file] без ВБА не обойтись, вот файл где программка на разбиение строки по твоему примеру а вообще не очень понятна структура исходного файла...

Тема: Отв: Эксперты, помогите решить задачу!! - : Myckolah Myckolah
2008-01-16 17:06
Решение в прикреплённом файле. Замечания. Все списки — даже пустые — должны заканчиваться знаком «,», он же служит разделителем. Списки можно вводить без пробелов. Впрочем, можно и с пробелами — тогда они будут частью данных. Решение рассчитано на 10 итераций, если надо больше — надо растянуть соотв. ячейки и перенаправить формулу в ячейке «конечныйостаток» на последнюю ячейку. ...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Игорь М
2008-01-16 17:06
Огромное спасибо. В очередной раз помогли....

Тема: Отв: сохранить файл в макросе - : Stas Leva
2008-01-16 17:06
такой вариант не подходит... у меня макросы сохранены как PERSONAL.XLS!opt , а не в данной книге - т.к. файл программой формируется и наполняется заново... макросы можно использовать только из ПЕРСОНАЛ. Private Sub Workbook_Open() Application.Run PERSONAL.XLS!opt End Sub не работает тоже...

Тема: Отв: Разборка текстового файла по строчкам - : Вася Пуговкин
2008-01-16 20:09
Скинь пожалуйста мне на мыло файл с ВБА - gizm0@mail.ru, а то тут не открывается что-то :(...

Тема: Рассмотреть случаи целесообразного использования макросов - : Оля Кукушкина
2008-01-16 23:16
Привет!!! ПОМОГИТЕ ПОЖАЛУЙСТА.... Рассмотреть на примерах случаи целесообразного использования макросов: 1) ввод значений в несколько ячеек большой таблицы и пересчет формул.. 2) сохранение форматирования сводной таблицы... 3) формирование сводной диаграммы и программное изменение ее заголовков при смене страниц... 4) автозаполнение при работе с базой данных большого размера.. 5) автоматизированное формирование отчетов при консолидации... ПОМОГИТЕ.....:( :( :( :( :( :( :(...

Тема: Отв: Разборка текстового файла по строчкам - : Myckolah Myckolah
2008-01-16 23:53
исходный текст: слово,предложение;состояние,проблема,сервис;гоголь какими должны стать строчки после анализа?...

Тема: Отв: Помогите разобраться с защитой - : Myckolah Myckolah
2008-01-16 23:53
Лист защитили от просмотра с помощью макросов....

Тема: Отв: Как найти точку пересечения кривых? - : Myckolah Myckolah
2008-01-16 23:53
Это не вопрос по Экселю, разберитесь, как бы вы решали ту же задачу на листике бумаги — в экселе всё будет точно так же....

Тема: Отв: Как найти точку пересечения кривых? - : Myckolah Myckolah
2008-01-16 23:53
Это не вопрос по Экселю, разберитесь, как бы вы решали ту же задачу на листике бумаги — в экселе всё будет точно так же....

Тема: Отв: сохранить файл в макросе - : Myckolah Myckolah
2008-01-17 01:14
1) непонятно, зачем закрывать какоре-то активное окно, когда можно закрыть нужную книгу 2) в макросе есть строчки ActiveWindow.Close ActiveWindow.Close вы закрываете две книги? а вторую предварительно сохранили? AFAIK, лучше пользоваться workbook’ами....

Тема: Отв: Как суммировать значения в опр. диапазоне - : Myckolah Myckolah
2008-01-17 01:14
действительно, очень красиво :) спасибо...

Тема: Отв: Как суммировать значения в опр. диапазоне - : Myckolah Myckolah
2008-01-17 01:14
действительно, очень красиво :) спасибо...

Тема: Отв: График может строиться по динамически добавляемым данным? - : Myckolah Myckolah
2008-01-17 01:14
стройте график на основании листа ИсходныеДанные а там эти самые данные пусть появляются из листа с результатом отработки макроса пусть они появляются автоматически, и именно те, что вам надо...

Тема: Отв: Эксперты, помогите решить задачу!! - : Константин Константинов
2008-01-17 06:14
Спасибо за помощь Вам!!! сейчас буду разбираться)...

Тема: Отв: передача управления в другой файл - : MAV MAV
2008-01-17 09:11
к сожалению я так делал... если заменить во втором файле Public Sub Kill_1() MsgBox не OK! Workbooks( 1.xls ).Close MsgBox все еще работает End Sub видно что при закрытии первой книги макрос прекращает свою работу и сообщения MsgBox все еще работает мы не получим...

Тема: Отв: Эксперты, помогите решить задачу!! - : Сергей Барабанов
2008-01-17 12:12
Приветствую Константин, к сожалению, пока только общие соображения. А в целом если разберётесь с предложенным Миколой решением, научитесь им пользоватьсяи и оно вас устроит, то лучше и не замарачиваться. От прописанной там последовательности действий всё равно не уйти. Кстати приведенные там формулы позволяют преобразовать строку из слов с разделителем запятой в столбец слов (формулы выделяющие первое слово в строке) А так я бы всё таки использовал проводкув форме таблицы (например 30 строк на N сто...

Тема: Отв: Выбор общих значений из двух столбцов - : Сергей Барабанов
2008-01-17 12:12
Я уже начал говорить о необходимости правильной структуры данных, скажу пару слов применительно к данной задаче. Решения приведённые выше основываются на идеологии протягивания формул. То есть длина сравниваемых столбцов формально неизвестна, но при необходимости после вставки этих столбцов мы можем вручную (или макросом) протянуть расчётные формулы на длину этих столбцов, что позволит обработать все значения в столбцах. А теперь посмотрим что можно выиграть если мы знаем длину столбца. Структура данн...

Тема: Отв: передача управления в другой файл - : Владимир .
2008-01-17 12:12
MAV MAV писал(а): как реализовать следующую ситуацию... есть файл .. в нем запустили макрос он открыл другой файл запустил в нем процедуру пока ВСЕ правильно ... :) которая закрыла первый файл а вот это НЕ правильно ... :( первый макрос должен ЗАКРЫТЬ свой файл, из которого выполняется ... :P а второй ... продолжил заниматься своими делами :-))...

Тема: Отв: Булевый массив - : Myckolah Myckolah
2008-01-17 12:12
В ваших терминах нужная формула описывается так: Вы ведь знаете, что фигурные скобки вводить с клавиатуры не надо, просто так обозначается формула массива »как такая формула работает она для каждого элемента в массиве Данные рассчитывает три множителя — (Данные>300) (Данные<600) ((Данные-300) и перемножает их, при этом первые два переводятся из булевого типа данных в целый — вместо ИСТИНА значение становится равным 1, вместо ИСТИНА значение становится равным 0. Таким образом, кажд...

Тема: Отв: Чего-то форум ОПЯТЬ ... - : Алексей Шмуйлович
2008-01-17 12:12
Как я уже писал, все этьи глюки связаны с большой нагрузкой на сервер и, видимо, не очень совершенным кодом форума. Своими силами я ничего с этим поделать не могу....

Тема: Отв: Разборка текстового файла по строчкам - : Вася Пуговкин
2008-01-17 12:12
конечный результат : - слово,предложение,проблема,сервис - слово,предложение,проблема,гоголь - слово,состояние,проблема,сервис - слово,состояние,проблема,гоголь Что-то типа того.......

Тема: Отв: сохранить файл в макросе - : Stas Leva
2008-01-17 12:12
да с закрытием всё норм. уже... да там 2 файла из одного в другой перекопировали все, сохранили изменения, потом сохр. файл и закрыли окна.. всё гуд.... Вопрос - как обратиться к макросам из PERSONAL.XLS ?????????? и использовать их при авто запуске файла...

Тема: Отв: Эксперты, помогите решить задачу!! - : Константин Константинов
2008-01-17 12:12
Сергей, а как бы ты посоветовал сконструировать файл, чтоб было легче делать вычисления?...

Тема: Отв: передача управления в другой файл - : Oleg X
2008-01-17 15:09
Да задачка, может тогда не закрывать файл 1, а скрывать его до конца выполнения файла 2 Public Sub Kill_1() MsgBox OK! Workbooks( 1.XLS ).Windows(1).Visible = False MsgBox все еще работает Workbooks( 1.xls ).Close End Sub...

Тема: Отв: График может строиться по динамически добавляемым данным? - : Сергей Барабанов
2008-01-17 15:09
В качестве исходных данных для графика можно использовать ячейки вычисляемые по формуле массива =СМЕЩ(C3;СЧЁТЗ(C3:C1000)-10;0;10;1) выдаёт последние 10 не пустых значений из столбца C3:C1000 ...

Тема: Отв: Эксперты, помогите решить задачу!! - : Константин Константинов
2008-01-17 15:09
Да, хотелось бы это сделать красиво.... вот только у меня косячекс с решением Миколы... если будут пусты приход1 приход2 продано то получается косячекс......

Тема: Отв: Проблема с разметкой страницы - : Алексей Шмуйлович
2008-01-17 20:10
Дарья, скорее всего, дело в принтере. Разные принтеры имеют разную минимальную ширину полей. В качестве выхода могу предложить автомасштабирование страниц с помощью меню Файл - Параметры страницы - закладка Страница - флажок Разместить не более чем на 1 стр. в ширину, 1 стр. в высоту. Эти цифры можно подобрать по обстоятельствам....

Тема: Отв: передача управления в другой файл - : Владимир .
2008-01-17 20:10
теперь кажется понял ... ЧТО Вы хотели сказать ... :) Передавая управление в другой файл, Вы продолжаете выполнять ЭТОТ макрос (первичный) и он, ЭТОТ макрос ЖДЕТ, когда управление к нему вернется (из другого файла) ... Если этот процесс ПРЕРВАТЬ (закрыть первый файл=ПРЕРВАТЬ выполнение макроса) , то , я так понимаю, прерывается выполнение и ТОГО файла, начиная с оператора, следующего за оператором ЗАКРЫТИЯ первого файла ... :( выполнение НЕСКОЛЬКИХ макросов - это не НЕЗАВИСИМЫЕ потоки выполнения .......

Тема: Отв: передача управления в другой файл - : MAV MAV
2008-01-17 20:10
да пусть первый сам себя закроет не важно.. главное чтоб макрос во втором продолжил свою работу... а он умирает как только закрывается первый файл...

Тема: Проблема с разметкой страницы - : Дарья Романова
2008-01-17 20:10
Здравствуйте! Возникла проблема с разметкой страницы в Excel. Там, где всегда был один лист, стало печататься в два листа. При попытке перенести границы страницы Excel ругается, что поля не соответствуют размеру страницы . На других компьютерах файл открывается нормально. Пробовала переустановить офис несколько раз, но даже это не помогает. Может, необходимо провести какие-то изменения в реестре?...

Тема: Отв: Уменьшение размера Excel файла - : Сергей Барабанов
2008-01-17 20:10
Попробуйте макрос Выполняется из модуля открытой книги ***взято с http://vbaexpress.com/**** (английский) Помогает если причина распухания пустые ячейки которые ексель считает значащими Option Explicit Sub ExcelDiet() Dim j As Long Dim k As Long Dim LastRow As Long Dim LastCol As Long Dim ColFormula As Range Dim RowFormula As Range Dim ColValue As Range Dim RowValue As Range Dim ...

Тема: Отв: График может строиться по динамически добавляемым данным? - : Oleg X
2008-01-17 20:10
Да формула правильная, но можно ее засунуть в имя Меню\Вставка\Имя\Присвоить например X, который равен СМЕЩ(C3;СЧЁТЗ(C3:C1000)-10;0;10;1) и Х вставить в исх.данные графика...

Тема: Отв: Макрос по удалению строк с пустыми ячейками - : Пайгусов Михаил
2008-01-17 20:10
все узнал! Просто нужно написать код в Книга1 Private Sub Workbook_Open() Load UserForm1 UserForm1.Show End Sub...

Тема: Уменьшение размера Excel файла - : Стас К
2008-01-17 20:10
Дамы и господа. У меня абсолютно не обоснованно пухнут файлы Excel. Файлы, которые должны весить не более 10-15 метров весят около 100 метров. Подскажите как можно уменьшить размер файла? Пустые ячейки я удалял, вроде находил в инете объяснение, что такие огромные файлы получаются из-за того, что в файле пишутся логи (типа кто, что и когда менял, сколько было входов и так далее). Как с этим бороться?...

Тема: Формула выбора значений - : Андрей Гаврилов
2008-01-18 00:59
Помогите пожалуйста решить задачку. Необходимо получить результат, при выборе значения из открывающегося списка, соответствующий выбору своей группы. Подробнее в примере. Большое спасибо. ...

Тема: Отв: Уменьшение размера Excel файла - : Myckolah Myckolah
2008-01-18 00:59
Если Excel 2007, то последнюю ячейку надо заменить: вместо IV65536 надо XFD1048576 Но я верно понял — скрипт удаляет столбцы и строки вне области данных? Я тоже так делаю (при необходимости, ессно — бывает, что Ctrl+End перемещает куда-то слишком далеко), но вручную. Вряд ли файл растёт из-за таких ячеек — там счёт не идёт на мегабайты. Скрытые листы? Сводные таблицы? Может, кто-то хрант в этом файле свою медиа-коллекцию — рисунки, пару песен?...

Тема: Отв: Эксперты, помогите решить задачу!! - : Myckolah Myckolah
2008-01-18 00:59
Константин Константинов писал(а): косячекс с решением Миколы... если будут пусты приход1 приход2 продано то получается косячекс... Повторюсь: Все списки — даже пустые — должны заканчиваться знаком «,» Пустые приходы и расходы — значит, в соотв. строках стоит только по запятой....

На сегодня все. До встречи на следующей неделе.