Форум по Microsoft Excel

Выпуск 3
от 2008-01-17

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

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

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

Статьи

Форум

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

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

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

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

Наши сайты

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

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

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

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

Наши друзья

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

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

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

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

Тема: Отв: Как из VBA обратиться к ScrollBar по его имени? - : Шпец Докапыч
2008-01-10 09:07
Всё достаточно просто! Смотри пример: [code:1]Sub Test_ScrBar_SHpetsStyle() Dim strName As String, iValue As Integer, i As Integer With ActiveSheet strName = .ScrollBars.Add(192, 42.75, 22.5, 243).Name MsgBox Имя созданной полосы прокрутки strName With .ScrollBars(strName) iValue = .Value MsgBox Teкущее положение strName = iValue For i = 1 To 4 iValue = iValue + 25: .Value = iValue ...

Тема: Отв: Как из VBA обратиться к ScrollBar по его имени? - : Шпец Докапыч
2008-01-10 09:07
Всё достаточно просто! Смотри пример: [code:1]Sub Test_ScrBar_SHpetsStyle() Dim strName As String, iValue As Integer, i As Integer With ActiveSheet strName = .ScrollBars.Add(192, 42.75, 22.5, 243).Name MsgBox Имя созданной полосы прокрутки strName With .ScrollBars(strName) iValue = .Value MsgBox Teкущее положение strName = iValue For i = 1 To 4 iValue = iValue + 25: .Value = iValue ...

Тема: Отв: 1С и Excel - : Шпец Докапыч
2008-01-10 11:39
Можно сохранить сформированный 1С отчёт в формате .xls или .txt и связать в Excel несколько отчётов между собой в отдельном файле, собирающем отчёт(ы) в требуемом виде с помощью VBA . Кстати, на этом специализируется Если ты спрашивал об этом, то можешь выложить образец(цы) с описанием; если же хочешь связать Excel с 1С для передачи информации из первого в последний, то ищи соответствующие внешние компоненты для 1С ; но, вдруг, ты хочешь замутить проект интегрированной среды разработк...

Тема: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Игорь М
2008-01-10 12:25
Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2...

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Сергей М
2008-01-10 16:47
Никак. Разве что открыть автоматически Workbooks.Open Filename:= _ C:\Мои документы\Книга3.xls Перенести данные и закрыть, сохранив изменения Workbooks( Книга3.xls ).Save Workbooks( Книга3.xls ).Close...

Тема: Научите считать заданные значения в ячейках - : Дмитрий C
2008-01-10 18:47
Есть табличка - 7000 записей. Имя - пол - возраст Нужно получить сводные данные по числу людей в возрасте 3 лет, 4 лет, 5 лет... И более сложная задача. Сначала определить пол человека, а уже затем посчитать колличество в разных возрастных группах. Подскажите пожалуйста, как это лучше сделать?...

Тема: Отв: Научите считать заданные значения в ячейках - : Алексей Шмуйлович
2008-01-11 01:41
Сводные данные? Вы абсолютно правы. Вам нужны именно сводные таблицы. Вот статья: http://msexcel.ru/content/view/34/2/...

Тема: Отв: сводные таблицы‚ формулы‚ финансовые функции - : Шпец Докапыч
2008-01-11 08:42
Загляни в Издательский дом Вильямс по адресу: В этом доме к анонсируемым книгам часто приложены файлы для скачивания (часть книги и(или) авторские примеры кода): Сводные таблицы в 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 08:42
Попытка помочь с решением №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:44
Неплохо бы уточнить что здесь закрытая книга. Может речь идёт об неактивной книге. Закрытая книга это просто файл и записать что либо в него не открывая вроде как нельзя (если кто знает как это сделать пусть обязательно поделиться) Вот извлечь инфу из закрытой книги, не открывая её можно - основа это использование в формуле ссылки на закрытую книгу. Поскольку средствами VBA можно назначить ячейке формулу (при назначении ячейке формулы содержащей ссылку на закрытую книгу ексель сам прочтет необходимые да...

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

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

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

Тема: Отв: Как автоматически при нажатии кнопки перенести данные листа 2 книги 1 на лист 3 закрытой книги 2 - : Владимир .
2008-01-11 16:45
Сергей М писал(а): Никак. ну вот ... ОПЯТЬ ... :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...

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

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

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

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

Тема: Как разделить текст на две ячейки - : Андрей Хухка
2008-01-12 17:38
Подскажите, как разделить текст на две ячейки. Например есть список по отелям: 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 22:03
Нужна помощь помогите найти ошибку в функции ВПР к артинку прикрепил...

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

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

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

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

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

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

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

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

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

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

Тема: Отв: Выбор общих значений из двух столбцов - : Шпец Докапыч
2008-01-14 15:06
Решение №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:06
Формула будет выглядеть так: =ВПР(5;R[-19]C[-1]:R[-4]C[1];3;ИСТИНА)...

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

Тема: Отв: Макрос по удалению строк с пустыми ячейками - : Пайгусов Михаил
2008-01-14 15:06
У меня в коде формы прописано: 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 15:06
Решение №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 18:49
Что если все модули поместить в личную книгу макросов ( personal.xls в папке XLStart )?...

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

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

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

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

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

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

Тема: Отв: подрузка модулей - : Шпец Докапыч
2008-01-15 14:05
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 15:54
чего-то ерунДА .... еще раз ... ... НЕ грузятся файлы ... :( НИ ZIP, НИ RAR .... еще разок ... нда .... ТЕПЕРЬ можно ТОЛЬКО файл изображения отослать ... ВО как ... ...

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

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

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

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

Тема: Разборка текстового файла по строчкам - : Вася Пуговкин
2008-01-15 15:54
имеется некоторый текстовый фаил с таким содержанием : 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, ...

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

Тема: Чего-то форум ОПЯТЬ ... - : Владимир .
2008-01-15 18:06
эт только МНЕ так везет сегодня ... или ГДЕ ... возможность прикрепить ФАЙЛ? НЕ картинку а ФАЙЛ ... и на 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:06
Решение №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:06
В крайнем случае можно передать параметры через значение ячеек, но лучше так: ...

Тема: сохранить файл в макросе - : Stas Leva
2008-01-15 18:06
Еть проблемка... Написал макрос, руками добавил закрытие приложения, а вот как сделать чтобы в конце обработки данного макроса небыло вопроса Сохранить изменения в *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 23:05
что посоветуете еще?...

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

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

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

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

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

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

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

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

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

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

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

Тема: Отв: передача управления в другой файл - : Oleg X
2008-01-16 13:13
Вот пример. Здесь из файла 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 13:13
спасибо а в случае процедуры? чтобы передавалисть/возвращались несколько параметров Public Sub sss(a, Optional sq, Optional kub) sq = a ^ 2 kub = a ^ 3 End Sub вычислить сразу и квадрат и куб?...

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

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

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

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

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

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

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

Тема: Отв: передача управления в другой файл - : Oleg X
2008-01-16 18:18
Тогда чуть больше ' в файле 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 18:18
[file] без ВБА не обойтись, вот файл где программка на разбиение строки по твоему примеру а вообще не очень понятна структура исходного файла...

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

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

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

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

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

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

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

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

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

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

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

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

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

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

На форуме Вы можете получить совет по любым вопросам работы в Microsoft Excel.

Добро пожаловать на форум!