Все выпуски  

Сергей Логинов>> Защита листа но с правом выбора варианта ответа в тесте


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

Выпуск 11
от 2014-03-21

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

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

Основные разделы сайта
Статьи
Форум

Новости сайта в формате RSS
Новые сообщения форума в формате RSS
Читать в Яндекс.Ленте

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

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

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

Рассылки Subscribe.Ru
Православные:
Ежедневные библейские чтения
Смоленский календарь
Для выздоравливающих алкоголиков и наркоманов
Книга "День за днем"
Книга "24 часа в сутки"
Ежедневные размышления анонимного алкоголика
Самообразование:
"Профессиональные приемы работы в Microsoft Excel"

Наши сайты

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

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

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

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

Наши друзья

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

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

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

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



Сергей Логинов>> Защита листа но с правом выбора варианта ответа в тесте
2014-03-10 20:20 http://forum.msexcel.ru/index.php?action=profile;u=
Здравствуйте. Создал тест, теперь необходимо установить защиту на все листы, что бы тот кто будет его проходить кроме как выбор одного из вариантов ответа и нажатия кнопок не мог ничего сделать с листом, ни изменение, ни внесение данных. Защита книги защитит от переименования листов, защита листа не дает возможность выбрать вариант ответа. Прошу помочь. Файл образец теста прикрепляю.


cheshiki1>> Re: Защита листа но с правом выбора варианта ответа в тесте
2014-03-11 09:49 http://forum.msexcel.ru/index.php?action=profile;u=
у вас переключатели связаны с ячейкой О1 становимся на неё [abbr=клик правой кнопкой мыши]ПКМ[/abbr] - формат ячеек - защита-убираем галочку защищаемая ячейка. Я бы ещё скрыл не нужные ячейки(выделяем все столбцы правее G - [abbr=клик правой кнопкой мыши]ПКМ[/abbr]-скрыть, со строчками также), сетку, заголовки. Ставим защиту на лист с нужными настройками.
к-во правильных смотрите ф-цию СЧЕТЕСЛИ.

Prist>> Re: Удаление информации из ячейки
2014-03-11 23:28 http://forum.msexcel.ru/index.php?action=profile;u=
Не хватает небольших шаманств:
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim sh As Worksheet
    If Target.Address = "$E$6" Then
       Set sh = Workbooks("Книга1.xlsm").Sheets("Лист1")
       PS = sh.Range("A" & sh.Cells.Rows.Count).End(xlUp).Row + 1
       sh.Cells(PS, 1) = Target
       Target.Value = Empty 'это лучше, чем "". Т.к. "" - это строка нулевой длины, а Empty действительно пустая ячейка. Иногда играет роль в вычислениях
    End If
End Sub


lovko>> Re: Удаление информации из ячейки
2014-03-12 11:00 http://forum.msexcel.ru/index.php?action=profile;u=
К сожалению, оба варианта срабатывают через раз.
Если поставить Range ("E6") = "", то пишет: Method '_Default' of object 'Range' failed.
Если поставить Empty, то Method 'Value' of object 'Range' failed.
Мне кажется, что здесь есть такая зависимость. Если работать с клавишей Tab, то ошибка выскакивает реже, если делать ввод значения через Enter, - чаще.
И еще: на выполнение макроса уходит несколько секунд. Если вводить в ячейку Е6 значение в то время, когда выполняется макрос, оно будет введено после его завершения, но потом выскакивает сообщение об ошибке. Может быть, в этом есть какая-то связь?


penb>> Построение графика по нескольким однотипным таблицам.
2014-03-12 17:56 http://forum.msexcel.ru/index.php?action=profile;u=
Приветствую!

Чтобы понять суть вопроса лучше сразу открыть приложенный файл.

Всем остальным попробую обрисовать.
Каждый день заполняется таблица типа такой:

10 мартобря 3012 г.
             
              Рыжих  Белых Остальных Всего
Кошечек    1          2            3            6
Собачек     2         1            0             3
Попугаев    0          0           5             5

=======

11 мартобря 3012 г.
             
              Рыжих  Белых Остальных Всего
Кошечек    1          2            3            6
Собачек     2         1            0             3
Попугаев    0          0           5             5

==========

и т.д.

Допустим, я хочу построить график изменения количества рыжих кошечек во времени.

Как это сделать самым простым способом, чтобы не надо было два часа с зажатым ctrl при выборке данных для графика выделять каждую ячейку?

Для Excel 2010.

Андрей Письменский>> Гиперссылка
2014-03-12 19:40 http://forum.msexcel.ru/index.php?action=profile;u=
Уважаемые, подскажите, пожалуйста, как занести адрес гиперссылки в текстовую переменную в макросе VBA и выделить из нее имя файла? Например, ячейка A1 содержит гиперссылку на файл C:\МояФотография.jpg. Как занести  текст "МояФотография.jpg" в текстовую переменную?

Заранее благодарен!

KuklP>> Re: Гиперссылка
2014-03-13 07:33 http://forum.msexcel.ru/index.php?action=profile;u=
Андрей Письменский, Вы принципиально не желаете читать правил форумов?
Кросс:
http://www.excelworld.ru/forum/10-9530-1

Андрей Письменский>> Re: Гиперссылка
2014-03-13 09:21 http://forum.msexcel.ru/index.php?action=profile;u=
Андрей Письменский, Вы принципиально не желаете читать правил форумов?
Кросс:
http://www.excelworld.ru/forum/10-9530-1
KuklP, Я не совсем понял... Это ссылка на какое-то правило форума? Или ответ не по существу на мой вопрос?

Попробовал сварганить пример с макросом, который не работает. Может подскажите где моя ошибка?

cheshiki1>> Re: Построение графика по нескольким однотипным таблицам.
2014-03-13 10:49 http://forum.msexcel.ru/index.php?action=profile;u=
вариант сводная по диапазонам консолидации, а уж на основе её (после применения фильтров) график.

sergo44441>> Re: макрос для проверяки значений в столбце и при нахождении одинаковых
2014-03-13 16:05 http://forum.msexcel.ru/index.php?action=profile;u=
отфильтровывать каждого для печати...
Вы хотите каждого повторившегося клиента на отдельном листе выводить?

RAN>> Re: Гиперссылка
2014-03-13 21:41 http://forum.msexcel.ru/index.php?action=profile;u=
Конечно можно! Создаешь макрос, вкладываешь цикл в цикл и готово!

Берешь гиперссылку, вытаскиваешь из нее имя файла, помещаешь в переменную - и готово.
Например
a=Split(s,"\",2)(1)

Сашаа>> Re: макрос для проверяки значений в столбце и при нахождении одинаковых
2014-03-13 22:21 http://forum.msexcel.ru/index.php?action=profile;u=
да. но каждого клиента, если повторился то с повторами. а после на печать.

Андрей Письменский>> Re: Гиперссылка
2014-03-13 22:27 http://forum.msexcel.ru/index.php?action=profile;u=
Совет хороший, но чтобы извлечь из гиперссылки имя файла надо саму гиперссылку в текстовую переменную загнать, как я понимаю. А вот как это сделать? Я попытался в приложенном файле, но так не получается. Макрос не отрабатывает...

exceleved>> Re: Гиперссылка
2014-03-14 00:33 http://forum.msexcel.ru/index.php?action=profile;u=
Function Hlnk(r As Range) As String
Dim x$()
Application.Volatile
x = Split(r.Hyperlinks(1).Address, "\")
If UBound(x) Then
  Hlnk = x(UBound(x))
End If
End Function


Андрей Письменский>> Re: Гиперссылка
2014-03-14 00:46 http://forum.msexcel.ru/index.php?action=profile;u=
Мощно! Спасибо! А можно немного разжевать? А можно это использовать не в функции, а в процедуре?

exceleved>> Re: Гиперссылка
2014-03-14 01:07 http://forum.msexcel.ru/index.php?action=profile;u=
На самом деле даже проще, гиперссылка в вашем файле без пути (файл лежал в папке с книгой)

Function Hlnk(r As Range) As String
Dim x$()
Application.Volatile
x = Split(r.Hyperlinks(1).Address, "\")
Hlnk = x(UBound(x))
End Function

Жевать тут особо нечего - в функцию передается диапазон r, r.Hyperlinks(1).Address - адрес 1-й гиперссылки из диапазона, функция Split разбивает строку по символу "\" на элементы массива, берется последний элемент массива.
Вставляйте на лист =Hlnk(B2) , протягивайте как любую другую функцию.

Ktulu>> Re: Не показывается уравнение линии тренда
2014-03-14 04:41 http://forum.msexcel.ru/index.php?action=profile;u=
Возможно, файл или скрин приблизит нас к ответу на вопрос

Алёна Гинько>> ПОМОГИТЕ как суммировать цифры в одной ячейке
2014-03-14 07:36 http://forum.msexcel.ru/index.php?action=profile;u=
Доброго дня, подскажите как суммировать в нескольких ячейках сначала первые цифры, затем вторые цифры, а затем все вместе .

Андрей Письменский>> Re: Гиперссылка
2014-03-14 10:02 http://forum.msexcel.ru/index.php?action=profile;u=
Спасибо большое за помощь!
По мотивам сообщения я соорудил простую процедурку, которая выполняет то, что мне нужно:
Sub ОбработкаГиперссылки8()

Dim ТекстСсылки As String

ТекстСсылки = Range("B2").Hyperlinks(1).Address

End Sub
Все мое непонимание было в единичке после Hiperlinks. Я полумал, что в ячейке одно свойство Hiperlink и можно сразу к нему обращаться и был не прав. Еще раз спасибо!

Johnny>> Re: Подсчет отработанных часов за определенный месяц
2014-03-14 15:00 http://forum.msexcel.ru/index.php?action=profile;u=
Прошу Вашей помощи.

Доброго дня!
Могу предложить такой вариант решения задачи...
Разложил время работы на 3 столбца. Из первого суммируется время работы бригады, которое начиналось и заканчивался в текущем месяце. Во 2 и 3 соответственно разбитые части, когда время работы бригады разбито на 2 месяца.

Baton>> Re: Подсчет отработанных часов за определенный месяц
2014-03-14 19:12 http://forum.msexcel.ru/index.php?action=profile;u=
БОЛЬШОЕ ВАМ СПАСИБО !!!
Если честно, Я вообще на разбираюсь в макросах, в будущем есть планы начать осваивать, да и форма разрабатывается для «тяжелых пользователей», а excel с макросами почему то ругается при открытии файла, всем объяснять что и как настраивать, тяжеловато будет, поэтому нужна формула с функциями. Касаемо моей таблицы, долго выдумывал формулу и вот что получилось (см.пример), маленько не то, что хотел. А хотел Я чтобы часы считались сразу в таблицу (отмеченная желтым), которая будет располагаться на отдельном листе, а тут получается с промежуточными столбцами (отмеченные зеленым).
Может есть какая ни будь мысль в дополнении формулы при условии:
1.   Таблица отмеченная желтым будет находиться на отдельном листе, и значения будут не за 3 месяца а за год.
2.   Заполнение ремонтов ведется постоянно, путем элементарной вставки строк и заполнением данных, соответственно бригады не располагаются по прядку, и ремонтов примерно получается 400 в месяц.
3.   Возможно по мимо критер...

Сергей Логинов>> Re: Защита листа но с правом выбора варианта ответа в тесте
2014-03-14 21:45 http://forum.msexcel.ru/index.php?action=profile;u=
у вас переключатели связаны с ячейкой О1 становимся на неё [abbr=клик правой кнопкой мыши]ПКМ[/abbr] - формат ячеек - защита-убираем галочку защищаемая ячейка. Я бы ещё скрыл не нужные ячейки(выделяем все столбцы правее G - [abbr=клик правой кнопкой мыши]ПКМ[/abbr]-скрыть, со строчками также), сетку, заголовки. Ставим защиту на лист с нужными настройками.
к-во правильных смотрите ф-цию СЧЕТЕСЛИ.
Спасибо разобрался. Теперь другая проблема, ставлю защиту книги, перестают работать макросы.

clere>> суммирование данных по нескольким условиям с отображением на другом листе
2014-03-14 22:12 http://forum.msexcel.ru/index.php?action=profile;u=
подскажите, пожалуйста, как можно просуммировать данные, находящиеся на 1 листе по нескольким двум критериям и отобразить результат на другом листе? НА странице отчет менеджера страница 2 в ячейке R5 просуммировать данные с листа ведомость столбец L по критериям: специалист Васильева, данные из столбца P -ду

Wasilic>> Re: Удаление информации из ячейки
2014-03-14 23:56 http://forum.msexcel.ru/index.php?action=profile;u=
Private Sub Worksheet_Change(ByVal Target As Range)
  Application.EnableEvents = False
  If Target.Address = "$E$6" Then
     Dim PS&
     PS = Sheets("Лист1").Range("A" & Rows.Count).End(xlUp).Row + 1
     Sheets("Лист1").Cells(PS, 1) = Target
     Target.Value = Empty
  End If
  Application.EnableEvents = True
End Sub


NightSpirit>> не срабатывает функция "если"
2014-03-15 10:44 http://forum.msexcel.ru/index.php?action=profile;u=
Добрый день, уважаемые форумчане!
Подскажите новичку совсем не знающего Excel.
Дан набор цифр, нужно: если число <7.6, то значение =1,  число > 7.6 но < 15 , то 2, если > 15, то 3.
Как будет выглядеть сама формула? Я перепробовал все вариации, формула работает только частично. Может я что-то не так делаю?

Johnny>> Re: суммирование данных по нескольким условиям с отображением на другом листе
2014-03-15 13:08 http://forum.msexcel.ru/index.php?action=profile;u=
=СУММЕСЛИМН(ведомость!L:L;ведомость!C:C;"васильева";ведомость!P:P;"ду")

AleksSid>> Re: суммирование данных по нескольким условиям с отображением на другом листе
2014-03-15 15:00 http://forum.msexcel.ru/index.php?action=profile;u=
суммесли

cheshiki1>> Re: Защита листа но с правом выбора варианта ответа в тесте
2014-03-15 16:10 http://forum.msexcel.ru/index.php?action=profile;u=
http://www.excel-vba.ru/chto-umeet-excel/kak-zashhitit-list-ot-polzovatelya-no-ne-ot-makrosa/

clere>> Re: суммирование данных по нескольким условиям с отображением на другом листе
2014-03-15 16:54 http://forum.msexcel.ru/index.php?action=profile;u=
суммесли
для СУММЕСЛИ предусмотрено три аргумента: Диапазон, Критерий, Диапазон_Суммирования., а в моем случае это выглядело бы так:  Диапазон, Критерий, Диапазон, Критерий, Диапазон_Суммирования.

gling>> Re: не срабатывает функция &quot;если&quot;
2014-03-15 19:21 http://forum.msexcel.ru/index.php?action=profile;u=
Будет так =ЕСЛИ(A1>15;3;ЕСЛИ(A1>7,6;2;1))

exceleved>> Re: не срабатывает функция &quot;если&quot;
2014-03-15 19:31 http://forum.msexcel.ru/index.php?action=profile;u=
Или так (легче добавлять условия)

=1-СУММ(-(A1>{7,6;15}))

gling>> Re: суммирование данных по нескольким условиям с отображением на другом листе
2014-03-15 19:34 http://forum.msexcel.ru/index.php?action=profile;u=
Пропишите в столбец R формулу =СУММПРОИЗВ((ведомость!$C$5:$C$62=$A5)*(ведомость!$P$5:$P$62="ду")*(ведомость!$L$5:$L$62))

NightSpirit>> Re: не срабатывает функция &quot;если&quot;
2014-03-15 19:38 http://forum.msexcel.ru/index.php?action=profile;u=
Получилось :)! Спасибо большущее!

Сергей Логинов>> Re: Защита листа но с правом выбора варианта ответа в тесте
2014-03-15 19:44 http://forum.msexcel.ru/index.php?action=profile;u=
Защита КНИГИ требуется а не листа.

gling>> Re: Защита листа но с правом выбора варианта ответа в тесте
2014-03-15 20:13 http://forum.msexcel.ru/index.php?action=profile;u=
Цитировать
ставлю защиту книги, перестают работать макросы.
покажите какие.

clere>> Re: суммирование данных по нескольким условиям с отображением на другом листе
2014-03-15 20:49 http://forum.msexcel.ru/index.php?action=profile;u=
Пропишите в столбец R формулу =СУММПРОИЗВ((ведомость!$C$5:$C$62=$A5)*(ведомость!$P$5:$P$62="ду")*(ведомость!$L$5:$L$62))
Большое спасибо, все получилось.
 

clere>> Re: суммирование данных по нескольким условиям с отображением на другом листе
2014-03-15 21:13 http://forum.msexcel.ru/index.php?action=profile;u=
Этот вопрос решился, но теперь возник другой... как просуммировать по нарастающему итоги достижения сотрудников на странице " отчет менеджера стр 2"  в таблице рейтинги года исходя из условий, что каждый месяц заполняется новый отчет. Делать сводную книгу не хочется, так как сотрудники, которые будут заполнять таблицу, с экселем не дружат совсем и любое неправильное действие, которое повлечет за собой уничтожение формулы, будет для них проблемой, ну и соответственно для меня. Я думаю, что на каждого специалиста, нужно создать свою сводную таблицу на 12 месяцев и заполнять её в течение года, но при этом встает проблема, если менеджеры будут вносить туда информацию сами, то велика вероятность ошибки, хотелось бы, чтобы информация переносилась в таблицы в автоматически....Ну или чтобы можно было копировать строчку, например: с листа    "отчет менеджера стр 2"  строка 5 в лист ведомость строка 73. У меня при копировании в ячейках получаются нули.....и я думаю, что так как в следующем ме...

gling>> Re: суммирование данных по нескольким условиям с отображением на другом листе
2014-03-15 22:14 http://forum.msexcel.ru/index.php?action=profile;u=
Не понятно что хотите. Сначала из "ведомость" собираете в ".......2 стр", теперь из ".......2 стр" опять в "ведомость". Какая таблица у вас самая первая заполняется? Думаю что это "ведомость", так пусть она ведется только с датами. А в ".....2 стр" все будет пересчитываться в зависимости от выбранного месяца в ячейке F1.
Цитировать
Может у кого то есть мысли как реализовать мои задумки?
Такие мои мысли. Только не знаю правильно ли понял порядок заполнения документов.

Benoit>> найти заданную разницу
2014-03-15 22:31 http://forum.msexcel.ru/index.php?action=profile;u=
Здравствуйте!
Помогите пожалуйста

Сколько необходимо строк (максимум, минимум) чтоб найти ближайшее число к заданному в столбце "С" по логике в столбце "D" по данным в столбцах "А","В".

(файл с примером прилагается)

clere>> Re: суммирование данных по нескольким условиям с отображением на другом листе
2014-03-15 23:55 http://forum.msexcel.ru/index.php?action=profile;u=
Не понятно что хотите. Сначала из "ведомость" собираете в ".......2 стр", теперь из ".......2 стр" опять в "ведомость". Какая таблица у вас самая первая заполняется? Думаю что это "ведомость", так пусть она ведется только с датами. А в ".....2 стр" все будет пересчитываться в зависимости от выбранного месяца в ячейке F1.
Цитировать
Может у кого то есть мысли как реализовать мои задумки?
Такие мои мысли. Только не знаю правильно ли понял порядок заполнения документов.
Тогда во всем документе придется анализировать еще и даты, и в итоговой таблице  месяца на листе отчет менеджера стр 2 выводить данные только за последний месяц, а в итоговой ведомости за год ( на той же странице) данные за текущий год...Это для меня очень сложно(((((
Попробую сформулировать вопрос иначе....Можно ли путем копирования и вставки  переносить строки, в которых не только данные но и формулы, использующие массивы и чтобы при...

gling>> Re: суммирование данных по нескольким условиям с отображением на другом листе
2014-03-16 02:40 http://forum.msexcel.ru/index.php?action=profile;u=
Мои предложения в столбце В листа "...2 стр", при смене месяца в ячейке F1, данные меняются. Счетает конечно не то что нужно, это только принцип подсчета, потом формулой можно сослаться на нужные диапазоны и ячейки. Из одной таблицы можно вытащить данные в любой момент за любой месяц и с начала года до текущего месяца. Один раз заморочиться и потом не плодить кучу файлов. А впрочем вам решать, это просто предложение. По поводу переноса можно только значения. При переносе формул на другой лист путаются ссылки.

ShAM>> Re: ПОМОГИТЕ как суммировать цифры в одной ячейке
2014-03-16 05:08 http://forum.msexcel.ru/index.php?action=profile;u=
Почему в разделе "Общение"?


ShAM>> Re: Объединение формул
2014-03-16 05:25 http://forum.msexcel.ru/index.php?action=profile;u=
http://www.excelworld.ru/forum/2-9472-1


Артем Ким>> Re: Списки в Excel
2014-03-16 10:21 http://forum.msexcel.ru/index.php?action=profile;u=
Здравствуйте, уважаемые, магистры!  :)  Помогите пожалуйста, создать "Дополняющийся" выпадающий список из списка находящегося на другом листе + к тому же, при выборе нужного значения в списке, справа от него (т.е. списка)  в той же строке появлялась таблица, необходимая для заполнения параметров "выбранного из списка". Подробнее в примечаниях в файле. 3 дня мучаюсь, надеюсь на вашу помощь, ребята.

clere>> Re: суммирование данных по нескольким условиям с отображением на другом листе
2014-03-16 12:00 http://forum.msexcel.ru/index.php?action=profile;u=
спасибо, попробую разобраться :)


lovko>> Re: Удаление информации из ячейки
2014-03-16 14:01 http://forum.msexcel.ru/index.php?action=profile;u=
К сожалению, не работает.

Wasilic>> Re: Удаление информации из ячейки
2014-03-16 15:12 http://forum.msexcel.ru/index.php?action=profile;u=
К сожалению, не работает.
Зто у кого как! :) У меня работает.

exceleved>> Re: найти заданную разницу
2014-03-16 23:08 http://forum.msexcel.ru/index.php?action=profile;u=
"Логику в столбце "D" не понял :(
Наиболее близкие к 200 значения находятся в А57 и В55, номер строки можно определить так ([abbr=Вводится через Ctrl+Shift+Enter]формула массива[/abbr]):

=МИН(ЕСЛИ(ABS(C2-$A$2:$A$71)=МИН(ABS(C2-$A$2:$A$71));СТРОКА($A$2:$A$71)))

Валерия Марьина>> Re: Скопировать лист с формулами из одной книги в другую
2014-03-16 23:45 http://forum.msexcel.ru/index.php?action=profile;u=
Хоть и походит на некропостинг, но вдруг кому-то пригодится.
В Excel 2007: данные - в подключениях "изменить связи" - изменить - и выбираете новую книгу.

Benoit>> Re: найти заданную разницу
2014-03-17 09:34 http://forum.msexcel.ru/index.php?action=profile;u=
Пример для D42: ABS((ABS(МИН(А42:А42)-МАКС(В42:В42)))-С42);ABS((ABS(МИН(А42:А41)-МАКС(В42:В41)))-С42);ABS((ABS(МИН(А42:А40)-МАКС(В42:В40)))-С42); ABS((ABS(МИН(А42:А39)-МАКС(В42:В39)))-С42)... и т.д. до ABS((ABS(МИН(А42:А2)-МАКС(В42:В2)))-С42)

далее среди этих всех разниц, необходимо найти минимальное значение т.е. это и будет максимально близкое число к ячейке С42
далее считаем кол-во строк которое потребовалось для нахождения максимально близкого числа в данном примере для 42 строки это 38 строк, в случае если максимально близких чисел к С42 получилось несколько (несколько одинаковых минимальных чисел но по кол-ву строк разные) мы записываем в Е42 минимальное кол-во строк, которых потребовалось для нахождения максимально близкого числа к С42, а в F42 максимальное кол-во строк, которых потребовалось для нахождения максимально близкого числа к С42 , если кол-во строк как в нашем примере только 38 т.е. оно является и максимальным и минимальным кол-вом строк то мы записываем его и в Е4...

lovko>> Re: Удаление информации из ячейки
2014-03-17 10:01 http://forum.msexcel.ru/index.php?action=profile;u=
Действительно работает. Большое вам спасибо!

Aqil_f>> Фильтрация и инкрементный поиск
2014-03-17 13:08 http://forum.msexcel.ru/index.php?action=profile;u=
Уже несколько дней не могу решить некоторые вопросы. Помогите пожалуйста
1. При нажатие CheckBox2 в листе выбирается только вакантное место, Но эти данные не могу отображать на листбоксе
2. При нажатие на комбобокс программа должен искать по имени по буквам (Инкрементный поиск) . Это у меня получается, если во всех строках TNR и FIO заполнена.
Но, если в каких то строках TNR и FIO пусто, тогда программа тоже ищет по имени. Но, в листбоксе видно то что мы ищем + все строки где TNR и FIO пусто.

Потом я что-то изменила. Сейчас если искать по 1-м буквам (допустим "X" ) все правильно находит ( Aaaaa Xssss Ddddddddd и Zzzzz Xxerxx Cccccc). Но если в текстбокс добавить 2-ю буквы (допустим "x" или "s" ) все исчезает. Помогите пожалуйста, в чем здесь моя ошибка?

Aqil_f>> Re: Фильтрация и инкрементный поиск
2014-03-17 13:10 http://forum.msexcel.ru/index.php?action=profile;u=
Файл

NooBasTiK>> Re: найти заданную разницу
2014-03-17 13:25 http://forum.msexcel.ru/index.php?action=profile;u=
Вот может поможет вам статейка
http://www.planetaexcel.ru/techniques/11/179/

clere>> Как задать критерий выбирать не пустые строки в формуле CУММПРОИЗВ?
2014-03-17 15:42 http://forum.msexcel.ru/index.php?action=profile;u=
Как задать критерий выбирать не пустые строки в формуле CУММПРОИЗВ, и еще один вопрос- как задать условие :выбрать  поля с текстом?

На странице отчет менеджера 3 в ячейке E7 необходимо вывести результат суммирования: лист ведомость, ячейки столбца R, содержащие любой текст и относящиеся к гуркина
Заранее спасибо за помощь-))


cheshiki1>> Re: Как задать критерий выбирать не пустые строки в формуле CУММПРОИЗВ?
2014-03-17 15:50 http://forum.msexcel.ru/index.php?action=profile;u=
=СУММПРОИЗВ((ведомость!$C$5:$C$62=$A6)*(ведомость!$R$5:$R$62<>"")*ведомость!$L$5:$L$62)

clere>> Re: Как задать критерий выбирать не пустые строки в формуле CУММПРОИЗВ?
2014-03-17 16:06 http://forum.msexcel.ru/index.php?action=profile;u=
Спасибо за помощь! Мистика какая-то-)))) я так пробовала, но у меня выдавало ошибку Н/Д.
И еще маленький вопросик, а как задать условие- выбтрать ячейки с текстом...ну например у меня в этом столбце будут еще и другие данные, как я смогу выбрать только все тестовые ячейки?

cheshiki1>> Re: Как задать критерий выбирать не пустые строки в формуле CУММПРОИЗВ?
2014-03-17 16:23 http://forum.msexcel.ru/index.php?action=profile;u=
смотрите ЕТЕКСТ(диапазон)

clere>> Re: Как задать критерий выбирать не пустые строки в формуле CУММПРОИЗВ?
2014-03-17 16:34 http://forum.msexcel.ru/index.php?action=profile;u=
спасибо)))

Pterodahtil>> фильтр не по столбцам, а по строкам
2014-03-17 17:00 http://forum.msexcel.ru/index.php?action=profile;u=
День добрый.
Можно сделать так, что бы фильтр отображал содержимое строки, а не столбца?

Спасибо

gling>> Re: фильтр не по столбцам, а по строкам
2014-03-17 18:22 http://forum.msexcel.ru/index.php?action=profile;u=
Фильтр сделан только по столбцам. Попробуйте транспонировать и фильтруйте, но опять по столбцам.

Benoit>> Re: найти заданную разницу
2014-03-17 19:03 http://forum.msexcel.ru/index.php?action=profile;u=
видимо не простую задачу я задал...

может быть необходимо материально заинтересовать?

кто-то сможет мне помочь?

Диана Железнова>> Таблица подстановки
2014-03-17 19:46 http://forum.msexcel.ru/index.php?action=profile;u=
Ребят, у меня срочный вопрос, помогите пожалуйста, что-то затупила)

Порядок действий
Запустите программу Ехсеl
1.   Откройте свою рабочую книгу. Вставьте в неё новый рабочий лист.
2.   Переименуйте его как Подбор параметра.
3.   Создайте таблицу следующей структуры:
        
        
        
    Размер вклада:   
        
    Срок вклада:   
        
    Процентная ставка:   
        
    Коэффициент наращивания:   
        
        
    Сумма выплат:   
4.   Введите размер вклада (С4), срок вклада (С6) и процентную ставку (С8).
5.   Определите сумму выплат в конце периода.
6.   Коэффициент наращения определяется в ячейке C10 с помощью формулы самостоятельно. Сумма выплат вычисляется в ячейке С13 по формуле.
Примечание: При изменении значений размера вклада, срока вклада или процентной ставки изменяется и значение суммы выплат. Пользуясь этой моделью, можно установить, как влияют исходные значения на конечный результат. Задача несколько усложняется при необходимости определить исходные данные на основе суммы выплат. В Ехсеl для ре...

AlexKK>> Макрос сортировка строк по алфавиту
2014-03-17 20:34 http://forum.msexcel.ru/index.php?action=profile;u=
Здравствуйте. Сформировал клиентскую базу через [abbr=Вводится через Ctrl+Shift+Enter]формулу массива[/abbr], отлично работала, пока не перешел границу за 1500 строк, происходит загрузка процессора минут на 20, понял что нужно переходить на макрос, но я его не знаю. Нашел приблизительно такую тему http://www.cyberforum.ru/vba/thread1077774.html  но у меня не получается. Не могли бы помочь. Пример: В Листе1 есть имена в произвольной форме, нужно в листе2  начиная с А14 эти имена выстроить по алфавиту.   

Aqil_f>> Re: Фильтрация и инкрементный поиск
2014-03-17 21:22 http://forum.msexcel.ru/index.php?action=profile;u=
Помогите пожалуйста, очень нужно.

clere>> Поиск максимального значения по нескольким критериям
2014-03-17 22:18 http://forum.msexcel.ru/index.php?action=profile;u=
Поиск максимального значения по нескольким критериям. Необходимо вычислить максимальное значение на листе "ведомость" в  столбец L соблюдая следующие критерии : по специалисту  Васильева найти максимальную сделку в столбце L по рекомендации (столбец R). Заранее спасибо)

NosovAlexey>> Автоматизация заполнения таблицы/ ЗА ПОМОЩЬ ГОТОВ ОТБЛАГОДАРИТЬ!
2014-03-17 23:34 http://forum.msexcel.ru/index.php?action=profile;u=
Помогите пожалуйста, все перерыл.
Нужно сделать автоматизацию заполнения таблицы.

Подробнее: Есть простая таблица - ФИО, телефон, адрес, регистрационный номер.
Есть список, где в строку указаны: ФИО-N1 - телефон-N1 - адрес-N1 - регистрационный номер-N1
ФИО-N2 - телефон-N2 - адрес-N2 - регистрационный номер-N2
ФИО-N3 - телефон-N3 - адрес-N3 - регистрационный номер-N3
...
И так далее.

Так вот задача превратить каждую такую строку списка в соответствующую таблицу.
Все уже из гуглил, все форумы перечесал, но не могу найти решение. Хотя по идее оно должно быть простейшее. Просто видимо знаний не хватает.
Готов даже отблагодарить за помощь.

ShAM>> Re: Макрос сортировка строк по алфавиту
2014-03-18 05:13 http://forum.msexcel.ru/index.php?action=profile;u=
Так, вроде, работает:
Sub Макрос1()
    With Worksheets("Лист2")
        Worksheets("Лист1").Range("A3:A" & Cells(Rows.Count, 1).End(xlUp).Row).Copy .[a14]
        With .Sort
            .Orientation = xlTopToBottom
            .Apply
        End With
    End With
End Sub


AlexKK>> Re: Макрос сортировка строк по алфавиту
2014-03-18 08:22 http://forum.msexcel.ru/index.php?action=profile;u=
Не совсем правильно работает. Мне нужно чтобы выстраивалась по алфавиту, а так просто копирует.

KuklP>> Re: фильтр не по столбцам, а по строкам
2014-03-18 08:30 http://forum.msexcel.ru/index.php?action=profile;u=
Или макросом.

Евгений Владимирович>> Переопределение ячеек
2014-03-18 08:58 http://forum.msexcel.ru/index.php?action=profile;u=
Подскажите, умные люди, как решить проблему:
Столбик А содержит различные названия материалов, которые часто повторяются (отличаются между собой пробелом/запятой/точкой), столбик С содержит норму этого материала в изделии. Необходимо на новом листе сделать что то вроде переопределения, различные вариации одного материала приравнять к оригинальному названию этого материала и при запуске макроса в столбце А названия материалов изменились бы до оригинальных.
P.S. более подробное описание-в файле

NooBasTiK>> Re: найти заданную разницу
2014-03-18 09:17 http://forum.msexcel.ru/index.php?action=profile;u=
видимо не простую задачу я задал...

может быть необходимо материально заинтересовать?

кто-то сможет мне помочь?
Вам сюда тогда http://forum.msexcel.ru/index.php/board,10.0.html

cheshiki1>> Re: Поиск максимального значения по нескольким критериям
2014-03-18 10:22 http://forum.msexcel.ru/index.php?action=profile;u=
МАКС((диапазон=условие)*(диапазон=условие)*диапазон) вводим как [abbr=Вводится через Ctrl+Shift+Enter]формулу массива[/abbr] ctrl+shift+enter

Anyuta>> несколько критериев авто фильтра
2014-03-18 19:56 http://forum.msexcel.ru/index.php?action=profile;u=
Здравствуйте!
Столкнулась с небольшой проблемой, помогите пожалуйста!
мне нужно макросом в экселе отфильтровать строки с датой текущего месяца и предыдущего, по отдельности макрорекодером записала:
Sub Фильтр_по_сроку()
ActiveSheet.Range("Срок_поставки").AutoFilter Field:=22, Criteria1:= _
xlFilterThisMonth, Operator:=xlFilterDynamic 'текущий месяц
ActiveSheet.Range("Срок_поставки").AutoFilter Field:=22, Criteria1:= _
xlFilterLastMonth, Operator:=xlFilterDynamic 'прошлый месяц
End Sub
Но как соединить эти два критерия, что бы код был примерно таким?...
Sub Фильтр_по_сроку2()
ActiveSheet.Range("Срок_поставки").AutoFilter Field:=22, Criteria1:=Array("xlFilterThisMonth", "xlFilterLastMonth"), Operator:=xlFilterDynamic
End Sub
видимо есть какие то тонкости в записи, никак не могу разобраться!
Заранее огромное спасибо любому совету!

KuklP>> Re: Переопределение ячеек
2014-03-18 19:58 http://forum.msexcel.ru/index.php?action=profile;u=
Если только
Цитировать
отличаются между собой пробелом/запятой/точкой
то можно сравнивать значения, предварительно удалив все эти знаки. Если же есть различия в написании обозначений, порядке написания, то только руками. Приводите все к единому виду. Машина не умеет абстрактно мыслить.

Wasilic>> Re: Макрос сортировка строк по алфавиту
2014-03-19 00:48 http://forum.msexcel.ru/index.php?action=profile;u=
А так?
Sub Сортировка()
    Range("A3:A" & Cells(Rows.Count, 1).End(xlUp).Row).Sort Key1:=Range("A3"), _
    Orientation:=xlTopToBottom
End Sub


Ktulu>> Таблица с данным из заданного листа
2014-03-19 02:41 http://forum.msexcel.ru/index.php?action=profile;u=
Существует несколько листов с данными в виде таблицы. На главной странице есть основная таблица, в которой отражаются данные именно с того листа, который выбран с помощью функции проверки.
Какую формулу необходимо прописать на главной странице?

ShAM>> Re: Таблица с данным из заданного листа
2014-03-19 06:24 http://forum.msexcel.ru/index.php?action=profile;u=
Так надо?
=ДВССЫЛ("'"&$A$1&"'!"&АДРЕС(СТРОКА();СТОЛБЕЦ()))

Ktulu>> Re: Таблица с данным из заданного листа
2014-03-19 09:46 http://forum.msexcel.ru/index.php?action=profile;u=
Шикарно!
То, что нужно. Благодарю!

AlexKK>> Re: Макрос сортировка строк по алфавиту
2014-03-19 10:04 http://forum.msexcel.ru/index.php?action=profile;u=
Огромное спасибо. Все работает

AlexKK>> Re: Макрос сортировка строк по алфавиту
2014-03-19 10:16 http://forum.msexcel.ru/index.php?action=profile;u=
Еще вопросик,  при защите листа кнопка макрос не работает, что можно сделать. Спасибо.

cheshiki1>> Re: Макрос сортировка строк по алфавиту
2014-03-19 10:22 http://forum.msexcel.ru/index.php?action=profile;u=
в коде прописать
снять защиту
выполнить код
поставить защиту
kak-zashhitit-list-ot-polzovatelya-no-ne-ot-makrosa/

cheshiki1>> Re: Автоматизация заполнения таблицы/ ЗА ПОМОЩЬ ГОТОВ ОТБЛАГОДАРИТЬ!
2014-03-19 10:37 http://forum.msexcel.ru/index.php?action=profile;u=
файл приложите Так есть так хочу получить.

Rita>> Пересечение столбцов и строк (индекс, поискпоз)
2014-03-19 11:50 http://forum.msexcel.ru/index.php?action=profile;u=
Всем доброго дня!
Помогите, пожалуйста, решить эту простую задачку.
Есть матрица тарифов по маршрутам. Есть таблица, в уоторой расписаны выполненные маршруты. Необходимо, чтобы при поездке, например, из Москвы в Эстонию и обратно (которая выводится двумя строками) в таблицу выполненных маршрутов подтягивался тариф на пересечении позиции "Москва" столбца российских городов и позиции "Эстония" иностранных тариф по маршруту Москва-Эстония, а в сл.строке - тариф по маршруту Эстония - Москва (см.пример).
Проблема в том, что я не могу прописать формулу на обратный маршрут в одну формулу. Пыталась черз "ИЛИ", не получается.


cheshiki1>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-19 12:26 http://forum.msexcel.ru/index.php?action=profile;u=
=ЕСЛИ(ЕНД(ПОИСКПОЗ(D3;Тарифы!$A$1:$D$1;0));ГПР(C3;Тарифы!$B$1:$D$3;ПОИСКПОЗ(D3;Тарифы!$A$1:$A$3;0););ВПР(C3;Тарифы!$A$2:$D$3;ПОИСКПОЗ(D3;Тарифы!$A$1:$D$1;0);))
или
=ЕСЛИОШИБКА(ГПР(C3;Тарифы!$B$1:$D$3;ПОИСКПОЗ(D3;Тарифы!$A$1:$A$3;0););ВПР(C3;Тарифы!$A$2:$D$3;ПОИСКПОЗ(D3;Тарифы!$A$1:$D$1;0);))
а еще лучше сделать нормальную таблицу тарифов и не нужно будет длинных формул.

Czeslaw>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-19 12:32 http://forum.msexcel.ru/index.php?action=profile;u=
Как Вам такой вариант?

Rita>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-19 12:37 http://forum.msexcel.ru/index.php?action=profile;u=
Как Вам такой вариант?

Спасибо. Но повторять в таблице тарифы таким способом неудобно из-за огромного количества маршрутов. Их более 200. Поскольку происходит их частое изменение, такой способ задваиват ввод изменений.  :(

Rita>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-19 12:41 http://forum.msexcel.ru/index.php?action=profile;u=
=ЕСЛИ(ЕНД(ПОИСКПОЗ(D3;Тарифы!$A$1:$D$1;0));ГПР(C3;Тарифы!$B$1:$D$3;ПОИСКПОЗ(D3;Тарифы!$A$1:$A$3;0););ВПР(C3;Тарифы!$A$2:$D$3;ПОИСКПОЗ(D3;Тарифы!$A$1:$D$1;0);))
или
=ЕСЛИОШИБКА(ГПР(C3;Тарифы!$B$1:$D$3;ПОИСКПОЗ(D3;Тарифы!$A$1:$A$3;0););ВПР(C3;Тарифы!$A$2:$D$3;ПОИСКПОЗ(D3;Тарифы!$A$1:$D$1;0);))
а еще лучше сделать нормальную таблицу тарифов и не нужно будет длинных формул.

Спасибо Вам огромное! В примере все работает. Буду пробовать на реальной базе.  ;)

Rita>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-19 12:44 http://forum.msexcel.ru/index.php?action=profile;u=
Уважаемый cheshiki1!
Подскажите, что Вы подразумеваете под "Нормальной базой тарифов"? Может мне и правда стоит что-то поменять.

cheshiki1>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-19 13:32 http://forum.msexcel.ru/index.php?action=profile;u=
Уважаемый cheshiki1!
Подскажите, что Вы подразумеваете под "Нормальной базой тарифов"? Может мне и правда стоит что-то поменять.
У Czeslaw таблица такого вида.
значения вводить дважды не нужно, в верхней правой части значения, в нижней левой формула если значения 100% одинаковые (формула ТРАНСП вводится на весь диапазон как [abbr=Вводится через Ctrl+Shift+Enter]формула массива[/abbr]).

Rita>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-19 14:44 http://forum.msexcel.ru/index.php?action=profile;u=
Уважаемый cheshiki1!
Подскажите, что Вы подразумеваете под "Нормальной базой тарифов"? Может мне и правда стоит что-то поменять.
У Czeslaw таблица такого вида.
значения вводить дважды не нужно, в верхней правой части значения, в нижней левой формула если значения 100% одинаковые (формула ТРАНСП вводится на весь диапазон как [abbr=Вводится через Ctrl+Shift+Enter]формула массива[/abbr]).

Тогда у меня второй вопрос. Я не умею так составлять таблицу автоматически.  ::)
Сейчас матрица примерно 50*50 (строк и столбцов соответственно). Как ее транспонировать (или что-то еще с ней сделать), чтобы она симметрично откопировалась?  :D
+ после того, как она примет нужный вид, мне, например, надо поменять в ней 100 тарифов. Мне придется каждый из этих 100 менять и в зеркальной части этой матрицы? Можете немного поподробнее нап...

cheshiki1>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-19 15:34 http://forum.msexcel.ru/index.php?action=profile;u=
покажите начальную матрицу.

Rita>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-19 15:56 http://forum.msexcel.ru/index.php?action=profile;u=
покажите начальную матрицу.

Во вложении. Я уже вставила туда Вашу формулу. В таком варианте все работает.

kill-out>> Создание функциональной кнопки
2014-03-19 17:36 http://forum.msexcel.ru/index.php?action=profile;u=
Всем привет!

Существует ли возможность создать "кнопку" на листе Excel, при нажатии на которую будет выполняться функция? В частности, необходимо, чтобы выдавался результат по функции СУММ

Или это уже в макросы ?

Prist>> Re: Создание функциональной кнопки
2014-03-19 18:00 http://forum.msexcel.ru/index.php?action=profile;u=
Выдавался результат куда?
А так есть кнопка СУММ, которая вписывает формулу СУММ в активную ячейку.
Если выдавать сообщение - то это уже да - макросы.

RAN>> Re: Автоматизация заполнения таблицы/ ЗА ПОМОЩЬ ГОТОВ ОТБЛАГОДАРИТЬ!
2014-03-19 21:08 http://forum.msexcel.ru/index.php?action=profile;u=
Не стоит пыхтеть.
Уже обсуждается в разделах фриланс.

RAN>> Re: несколько критериев авто фильтра
2014-03-19 21:18 http://forum.msexcel.ru/index.php?action=profile;u=
 Anyuta, бросьте вы это дело!
На днях сунулся - то тут не так, то тут не эдак, то при ошибке вместо игнорирования ошибки Excel вылетает...
Ей-ей, руками проще сделать. Да и труд не велик.
Я, по крайней мере, плюнул.

Criteria1:=Array("xlFilterThisMonth", "xlFilterLastMonth")

Макрорекордер 2007 пишет
Criteria2:=Array("xlFilterThisMonth", "xlFilterLastMonth")

Ну или что-то такое.

Ktulu>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-20 04:55 http://forum.msexcel.ru/index.php?action=profile;u=
Так?

kos92>> Работа с диапазонами (Задачи внутри)
2014-03-20 05:45 http://forum.msexcel.ru/index.php?action=profile;u=
Добрый день Господа и возможно Дамы.

Прошу вас помочь решить следующую задачу. 
Есть поле А1 в которое вводится значение "a" если "а" входит в диапазон от 1 до 5, то в ячейку А2 записывается значение "b" если "а" входит в диапазон от 5 до 10, то в ячейку А2 записывается значение "b" если "а" входит в диапазон от 10 до 5, то в ячейку А2 записывается значение "с", если не входит не в один из диапазонов то в А2 записывается "Е". Возможно это уложить в одну формулу?

Благодарю за внимание.



Anyuta>> Re: несколько критериев авто фильтра
2014-03-20 06:42 http://forum.msexcel.ru/index.php?action=profile;u=
RAN, ясно, спасибо за совет!

Еще вопрос по теме: возможно ли отфильтровать строки по нескольким критериям:
либо значение ячейки больше 90%, либо равно "-", либо с любым текстом?
или сюда тоже лучше не соваться?

Евгений Владимирович>> Re: Переопределение ячеек
2014-03-20 07:44 http://forum.msexcel.ru/index.php?action=profile;u=
абстрактно мыслить и не нужно, можно ведь где нибудь на отдельном листе приравнять все варианты написания одного наименования к оригиналу и при запуске макроса все не оригинальные названия заменялись на оригинальное. или это из области фантастики?:)

KuklP>> Re: Переопределение ячеек
2014-03-20 07:53 http://forum.msexcel.ru/index.php?action=profile;u=
Не вопрос, делайте таблицу подстановки, если уверены, что все варианты косяков сможете перечислить. Тогда через ВПР или Индекс Поискпоз забирайте правильные значения.

Евгений Владимирович>> Re: Переопределение ячеек
2014-03-20 08:35 http://forum.msexcel.ru/index.php?action=profile;u=
не совсем то, в прикрепленном в самом начале файле на листе "норма":
из 1С вставил нормы на изделие (A3:C33), столбец D ищет цены в материальном отчете по названию материалов и ед.изм. Ячейки A38:B43 необходимо приравнять к ячейкам D40:E40, написать макрос, который при запуске будет просматривать ячейки A3:C33 и сравнивать с ячейками A38:B43, при нахождении-заменять на ячейки D40:E40.
P.S. ед. измерения можно убрать, дабы облегчить поиск. Таких сопоставлений будет куча, но если их сделать, то можно не париться ещё пару лет, все как по маслу пойдет:)

kill-out>> Re: Создание функциональной кнопки
2014-03-20 09:38 http://forum.msexcel.ru/index.php?action=profile;u=
Выдавался результат куда?
А так есть кнопка СУММ, которая вписывает формулу СУММ в активную ячейку.
Если выдавать сообщение - то это уже да - макросы.

Приветствую!

Есть ли вариант, при котором, при нажатии на кнопку "Расчет" выдавался ответ, желательно, не в виде всплывающего окна, а в три близлежащие ячейки, общие суммы по трём категориям товаров?

Возможно ли составить такую формулу или только макрос?

Rita>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-20 10:17 http://forum.msexcel.ru/index.php?action=profile;u=
Так?

Да!!! Спасибо! Именно так!  :)
А может у Вас еще и макрос есть на транспонирование?   8)

cheshiki1>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-20 10:50 http://forum.msexcel.ru/index.php?action=profile;u=
скажем так одноразовый макрос, т.е. переделать таблицу текущую, после переделки он уже не нужен т.к. будет работать не так как нужно.
[code]Sub Переделка1()
Dim i&, H&, j&
Application.ScreenUpdating = False
Range(Cells(2, 3), Cells(2, Cells(Rows.Count, 2).End(xlUp).Row)).EntireColumn.Insert
Range(Cells(3, 2), Cells(3, 2).End(xlDown)).Copy
Range("C2").PasteSpecial Paste:=xlPasteAll, Transpose:=True
Range(Cells(2, 3), Cells(2, 3).End(xlToRight)).Copy
Range("B3").PasteSpecial Paste:=xlPasteAll, Transpose:=True
H = Cells(Rows.Count, 2).End(xlUp).Row
For i = 3 To H
   For j = i To H
   Cells(j, i).FormulaLocal = "=" & Cells(i, j).Address & ""
   Next j
Next
With Range(Cells(2, 2), Cells(H, H))
.Borders(xlEdgeRight).Linestyle="xlContinuous"
.Borders(xlInsideVertical).Linestyle="xlContinuous"
.Borders(xlInsideHorizontal).Linestyle="xlContinuous"
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
End With
Application.CutCopyMode = False
Range("B3").Select
Application.ScreenUpdati...

cheshiki1>> Re: Создание функциональной кнопки
2014-03-20 10:54 http://forum.msexcel.ru/index.php?action=profile;u=
Цитировать
при нажатии на кнопку "Расчет" выдавался ответ
ну во первых Расчет у вас не кнопка а просто текст в ячейке. так как вы хотите только с помощью макроса. Зачем вам именно так?
хотя кое что пришло на мысль сейчас изображу.

clere>> Re: Поиск максимального значения по нескольким критериям
2014-03-20 12:21 http://forum.msexcel.ru/index.php?action=profile;u=
спасибо, сейчас попробую....


cheshiki1>> Re: Работа с диапазонами (Задачи внутри)
2014-03-20 12:23 http://forum.msexcel.ru/index.php?action=profile;u=
цветом выделил не понятные места - уточните
...Есть поле А1 в которое вводится значение "a" если "а" входит в диапазон от 1 до 5, то в ячейку А2 записывается значение "b" если "а" входит в диапазон от 5 до 10, то в ячейку А2 записывается значение "b" если "а" входит в диапазон от 10 до 5, то в ячейку А2 записывается значение "с",...
зеленый - одно значение для разных диапазонов
красный - диапазоны одинаковае.

jurijsr>> Возможности фильтра
2014-03-20 12:35 http://forum.msexcel.ru/index.php?action=profile;u=
Добрый день

В приложение файл.Скажите , какие шаги предпринять чтобы при выборе из фильтра "Магазин", показывал весь "Товар" который относится к этому "Магазину". Пока при выборе Магазина показывает не весь Товар и база данных у меня именно в таком виде, и как вариант присвоить название Магазина в каждую ячейку не подходит.
Спасибо



Rita>> Re: Пересечение столбцов и строк (индекс, поискпоз)
2014-03-20 12:45 http://forum.msexcel.ru/index.php?action=profile;u=
Что получилось - во вложении.
Файл ругается на циклическую ссылку  :D + постоянно подвисает из-за этого.
Макрос выполнялся 6 минут, при этом у меня завис даже Outlook  :)
Но все равно спасибо.

KuklP>> Re: Возможности фильтра
2014-03-20 12:53 http://forum.msexcel.ru/index.php?action=profile;u=
Ответ очевиден - нормализовать таблицу. Убрать объединения ячеек и в каждую строку вписать название магазина. Объединенные ячейки - зло. Если надо просто распечатать - ради Бога. А обрабатывать такие таблицы почти всегда геморрой. Выполните это в своем примере и будет счастье:
Sub www()
    Range("A3:A51").Select
    With Range("A3:A" & [b65536].End(xlUp).Row)
        .MergeCells = False
        .SpecialCells(4).Formula = "=R[-1]C"
        .Value = .Value
    End With
End Sub


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


В избранное