Отправляет email-рассылки с помощью сервиса Sendsay

Форум по Microsoft Excel

  Все выпуски  

Mart222>> Re: Поиск значений при неполном совпадении ячеек


Форум по Microsoft Excel

Выпуск 47
от 2011-12-01

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

Рассылка сайта "Профессиональные приемы работы в 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".



Mart222>> Re: Поиск значений при неполном совпадении ячеек
2011-11-23 05:31 http://forum.msexcel.ru/profiles/mart222-u74687.html
Примитивно, но работает (см. вложение).
Не совсем понятно это - " Если Фамилия повторяется, то написать в виде: "значение1" и "значение2" "


Valll>> Неслучайное случайное число
2011-11-23 07:56 http://forum.msexcel.ru/profiles/valll-u28591.html
Новая проблема - это хорошо забытая старая... Грустный

Вообщем, давным-давно сделал я игру рулетка на Экселе. В алгоритме применялась функция случайного числа, вот её формула:
Chislo = Fix(Rnd() * (51 - 1) + 1)

Так вот, что я заметил: включаешь прокрутку рулетки первый раз - получай 13 чёрное, второй - 12 красное, третий 10 чёрное... Далее отслеживать перестал. Потом, то ли усидчивость моя сбивается, то ли Эксель... вроде крутит случайно... Выгружаю файл с игрой, запускаю опять... и как в известном произведении: тройка, семёрка, туз... - всё повторяется. Естественно, что переменные я нигде не сохраняю. Это так, на заметку - имейте ввиду. Подмигивающий

Valll>> Диапазон дат в сводной таблице
2011-11-23 08:04 http://forum.msexcel.ru/profiles/valll-u28591.html
Имеется исходная таблица: Дата, сумма, Клиент, Дебет, Кредит. Нужно посчитать оборот за период с...по... Создаю сводную таблицу на основе исходной. Но!!! Сводная таблица не берёт за ранее отфильтрованный список  - она всё равно берёт ВСЕ данные таблицы... Ладно, взяли... Начинаем проектировать Сводную... В поля Строк - ставим Клиентов, В поля Столбцы - ставим по очереди или вместе : Дебет-Кредит. А вот дату выводим в поля СТРАНИЦ! И что получаем? Что раскрыв дату я вижу 1000 дат за три года!!! Бред полный! Мне то нужно посмотреть данные, допустим за квартал или другой "кривой" отрезок времени, а Эксель просит УБРАТЬ галочки с 900 дат и оставить 100 нужных!!! Пробовал как-то макросом это дело причесать - куда там! Эксель тупо выводит в длинный столбец ВСЕ даты в виде отдельной строки!!! Никакие варианты дать команду с... по... не прошли! Это действительно такая проблема или я чего не понимаю? Уточняю, ДАТЫ ДОЛЖНЫ быть в области страниц!

Так нормально?

Почти нормально. При...

more>> Re: Закрепить некоторые строки при фильтровании
2011-11-23 09:41 http://forum.msexcel.ru/profiles/more-u110415.html
на самом деле таблица, конечно, не такая, это упрощенный вариант, столбцов намного больше, около 70... а с заголовками, состоящими из объединений, _сводные_ таблицы работать отказываются в принципе... тем более, это единственная таблица, для сводной просто нет источника...

Aqil_f>> Re: Копирование данных с помощью макроса в другую книгу
2011-11-23 09:50 http://forum.msexcel.ru/profiles/aqilf-u14854.html
СПАСИБО, Wasilic. Все нормально работает. Но,

1. Программа удаляет все столбцы из ITOQ.XLS, а надо удалять толко те столбцы которые копируется. Эти столбцы заранее известно и не меняется, допустим, 1,2,3,5,6,9,15 столбцы.

2. Данные копируется каждый раз в конец файла в ITOQ.XLS, а надо копировать каждые данные на "свое место".

3. И еще, файлы очень большые, и поэтому программа работает очень дольго, где-то 5 минут. Как-то можно оптимизировать этот макрос?

itman>> Re: Palo-server
2011-11-23 10:53 http://forum.msexcel.ru/profiles/itman-u102919.html
Пожалуйста, какие возможности у PALO!
В чём его преимущество перед консолидацией?
В чём его преимущество перед Сводной таблицей?
В чём его преимущество перед MS Query?

Есть ли задачи (какие) где PALO, единственный инструмен реализации?

Спасибо.
PALO = OLAP сервер, не единственный, но с хорошим функционалом в бесплатной редакции.

Valll>> Re: Диапазон дат в сводной таблице
2011-11-23 11:13 http://forum.msexcel.ru/profiles/valll-u28591.html
Прикладываю файл

_Boroda_>> Re: Диапазон дат в сводной таблице
2011-11-23 11:24 http://forum.msexcel.ru/profiles/boroda-u12234.html
А почему Вы обязательно хотите дату в поле "Страницы" засунуть?

_Boroda_>> Re: Неслучайное случайное число
2011-11-23 11:25 http://forum.msexcel.ru/profiles/boroda-u12234.html
А вопрос-то какой?


Stopp>> Re: Поиск значений при неполном совпадении ячеек
2011-11-23 11:53 http://forum.msexcel.ru/profiles/stopp-u113433.html
спасибо! все работает!
а более изящного решения нет?) как-то очень громоздко получилось.
У меня порядка 100 фамилий, совпадений до 5...

Valll>> Re: Диапазон дат в сводной таблице
2011-11-23 12:13 http://forum.msexcel.ru/profiles/valll-u28591.html
Так надо. Я правильно понимаю, что у вас тоже не получается? Мне просто надо понять - это только у меня или действительно так невозможно?

Можно конечно дату и в строки засунуть (там как не странно фильтры на дату стоят), но тогда таблица будет таких размеров, что и миллиона строк не хватит...

Mart222>> Re: Поиск значений при неполном совпадении ячеек
2011-11-23 12:36 http://forum.msexcel.ru/profiles/mart222-u74687.html
При ста фамилиях конечно будет достаточно громоздко. Как вариант можно попробовать использовать формулы массива, тогда не нужны будут использованные переходы, либо составлять макрос по перебору значений и формированию строк доходов.

Serge 007>> Re: Переадресация с разных ячеек
2011-11-24 13:31 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Вы как раз наперед задали мой следующий вопрос))
Это не _Boroda_ должен вопросы задавать, а Вы сразу правильно и подробно задачу ставить. И желательно без картинок.

По теме: Зачем Вы из нормальной базы данных пытаетесь фигню какую-то сделать? Вам же потом с ней работать нереально будет.

Джоник>> Как зафиксировать размер формы на экране монитора
2011-11-24 13:49 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
День добрый всем!
Хлопцы! Имеется календарик размер которого уменьшается/увеличивается при помощи ScrollBar.
Проблема.
Как зафиксировать выбраный пользователем размер, чтобы после перезагрузги файла выбраный размер не менялся.Кто знает, пожалуйста подскажите?
Заранее спасибо!

MilanAC>> Re: Переадресация с разных ячеек
2011-11-24 15:06 http://forum.msexcel.ru/profiles/milanac-u19092.html
Это не _Boroda_ должен вопросы задавать, а Вы сразу правильно и подробно задачу ставить. И желательно без картинок.
Ок, картинок больше не будет. Думал так проще будет понять суть вопроса.
По поводу того, что сразу все написать - хотел перестраховаться, чтобы не возникло путаниц с сутью задания

По теме: Зачем Вы из нормальной базы данных пытаетесь фигню какую-то сделать? Вам же потом с ней работать нереально будет.

Объясняю. Предположим БАЗА заполнена в 1000 клиентов. Ресурс фирмы ограничен. В 1 день можно выполнять 3 заявки. Необходимо работать с графиком работ, где визуально можно отслеживать свободные места на определенные дни и отталкиваясь от этого заполнять пустые окна. Если же оставить все в 1 листе, то работать будет нереально. Поверьте мне, если бы так было проще, я бы не задавал здесь вопросы Подмигивающий
В сл...

Serge 007>> Re: Переадресация с разных ячеек
2011-11-24 15:38 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Ок, картинок больше не будет. Думал так проще будет понять суть вопроса.
По поводу того, что сразу все написать - хотел перестраховаться, чтобы не возникло путаниц с сутью задания

Объясняю. Предположим БАЗА заполнена в 1000 клиентов. Ресурс фирмы ограничен. В 1 день можно выполнять 3 заявки. Необходимо работать с графиком работ, где визуально можно отслеживать свободные места на определенные дни и отталкиваясь от этого заполнять пустые окна. Если же оставить все в 1 листе, то работать будет нереально. Поверьте мне, если бы так было проще, я бы не задавал здесь вопросы Подмигивающий
В случае же с листом ГРАФИК. Я захожу на интересующий меня месяц и распределяю клиентов по свободным окнам
1. Понять суть вопроса проще из файла, в котором нарисовано ИТОГОВОЕ желаемое, иначе неизбежны никому ненужные промежуточные решения.

2. Про ограничение в 3 заказа Вы тоже умолчали.

3. Работать всегда удобнее с базой данных, чем ...

Tasha>> функция БАТТЕКСТ
2011-11-24 15:52 http://forum.msexcel.ru/profiles/tasha-u4648.html
Добрый вечер!
Хотела воспользоваться функцией БАТТЕКСТ, но вместо русского текста выводиться тайский. Можно ли изменить язык? Если да, то как?

Serge 007>> Re: функция БАТТЕКСТ
2011-11-24 16:17 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Хотела воспользоваться функцией БАТТЕКСТ, но вместо русского текста выводиться тайский. Можно ли изменить язык?
Ответ уже есть в Вашем вопросе. Функция ведь называется БАТТЕКСТ, а не РУСТЕКСТ Подмигивающий
Язык изменить нельзя. Функция предназначена для работы только с тайским языком, отсюда и название.

Ссылки по теме:
БАТТЕКСТ
Помогите сделать Баттекст по русски
Число прописью


jv1122>> Re: Уcловное форматирование, диапазон данных
2011-11-24 17:10 http://forum.msexcel.ru/profiles/jv1122-u104830.html
Здравствуйте,

нужна помощь Улыбка Если я правильно понимаю, с помощью условного форматирования можно решить мою задачу. Но не уверена )

(Файл Advertiser) Внутри некоторых ссылок из столбца landing page содержатся прямые ссылки на сайт рекламодателя. Нужно чтобы в соседнем столбце, напротив тех ячеек, где есть прямые ссылки, ставилось слово "direct". Значения, определяющие, что ссылка прямая, брать из  второго файла (Файл 2)

Тиль>> Проблема соединения данных из по строке с условиями.
2011-11-24 19:22 http://forum.msexcel.ru/profiles/til-u108326.html
Здравствуйте, начинаю работать с VBA.
Многое вспоминается по аналогии с паскалем и с++, но учил все это давно, трудно очень получается.

есть таблица с столбцами   "инедтификатор" "вид" "номер" "результат"

релультат = идентификатор + " (" + номер + ")" казалось бы нет ничего сложного. Но проблема в том что "результат" еще и зависит от столбца "вид"

если  поле "номер" пусто, то "результат" = "индентификатор", иначе
если "вид" = 22, а первые 2 цифры "номер" = 57 то в начало номера дописывается "0"
если "вид" = 22, а первые 3 цифры "номер" = 057 то в начало номера ничего не дописывается
если "вид" = 22, а первые 2 цифры "номер" <> 57 то в начало номера дописывается "057"
если "вид" = 22, а первые 3 цифры "номер" <> 057 то в начало номера дописывается "057"
(если "вид" = 22, а первая 1 цифра "номер" = 0 то в начало номера дописывается "057")

если "вид" = 21 то в начлао нмоера дописывается "0"
если "вид" = 73 то в начлао нмоера дописывается "0"

если "вид" = любое число от 1 до 999 (кроме ...

energizer>> проблема с автоматическим распознаванием формата ячейки..
2011-11-24 23:58 http://forum.msexcel.ru/profiles/energizer-u113809.html
прошу помочь с решением проблемы -- при вычислении с помощью простых формул но с использованием
преобразований для проведения арифметических операций над шестнадцатеричными числами, неожиданно столкнулся с проблемой- Excel автоматически изменяет формат ячейки если видит в hex
значении символ 'E'   например число 13e0000 -автоматически распознается как экспоненциальное выражение.. трюк с выбором  формата ячейки как текстовой лишает возможности вычисления..
Возникает вопрос как отключить эту глюкавость  .. и вообще возможны ли в Excel вычисления в hex без преобразования форматов .. какой префикс используется для шестнадцатеричной арифметики ..
надписи без указателя принадлежности смотрятся не читабельно.. например как обозначить hex значение  0x28000 для того что бы программа его поняла как числовой формат.. 
в приложении файл-фрагмент с данной глюкой..
 помогите пожалуйста решить эту не очень очевидную проблему!!!
все остальные ячейки кроме одной считает ведь правильно ..даже не с...

kot74>> макрос
2011-11-25 08:48 http://forum.msexcel.ru/profiles/kot74-u113890.html
Добрый день!
Подскажите как написать макрос для кнопки, чтобы он брал значение одной определенной  ячеки и сохранял в указанный файл в первую свободную ячейку первого столбца, а затем закрывал EXcel? Нужно для пользовательского голосования...т.е. например проходит пользователю файл , в файле заполняется определенная ячейка и нажимается кнопка голосовать...на этой кнопке сробатывает макрос...
ЗАРАНЕЕ СПАСИБО!!!!

Aqil_f>> Re: Копирование данных с помощью макроса в другую книгу
2011-11-25 08:56 http://forum.msexcel.ru/profiles/aqilf-u14854.html
Помогите пожалуйста.


_Boroda_>> Re: Уcловное форматирование, диапазон данных
2011-11-25 10:31 http://forum.msexcel.ru/profiles/boroda-u12234.html
Во втором файле в ссылках лишний последний пробел. Или поубивайте, или повставляйте в первом файле [тогда формула =ЕСЛИ(ЕЧИСЛО(ПОИСКПОЗ(C2;'[файл 2.xlsx]Site'!$C$2:$C$4;0));"Direct";"")], или можно так:
=ЕСЛИ(ЕЧИСЛО(ПОИСКПОЗ(C2&" ";'[файл 2.xlsx]Site'!$C$2:$C$4;0));"Direct";"")

haldamir>> Преобразование сводной таблицы в обычную
2011-11-25 10:41 http://forum.msexcel.ru/profiles/haldamir-u111715.html
Доброго времени суток, дорогие форумчане.
Столкнулся недавно с проблемой:
Таблица сайтов. В полях указаны различные параметры. Все сайты находятся в общем списке и также разбиты по тематикам. Каждая тематика в отдельной вкладке. Все это дело организовано с помощью сводных таблиц. Изменяя значения в исходном списке, они, при обновлении таблиц, меняются во вкладках.
Проблема, собственно, в следующем: большинство остальных сотрудников работает на бесплатном OpenOffice, который очень сильно тупит при открытии сводных таблиц. Нужно преобразовать [url=http://msexcel.ru/content/view/34/2/]_сводные_[/url] таблицы в обычные. Можно, конечно, просто скопировать и вставить значения на другой лист, но это как-то долго - вкладок то много, да и операция эта производится почти каждый день. Существует ли еще какой нить способ? Заранее спасибо.

jv1122>> Re: Уcловное форматирование, диапазон данных
2011-11-25 11:05 http://forum.msexcel.ru/profiles/jv1122-u104830.html
Спасибо. А можно сделать так, чтобы нужное значение находилось в теле ссылки? Т.е. из http://r.mail.ru/clb398671/ad.adriver.ru/cgi-bin/click.cgi, http://www.skoda-avto.ru/pub.html он находил www.skoda-avto.ru и ставил Direct?

Mobsman>> Фопросы по USERFORM кредит
2011-11-25 11:10 http://forum.msexcel.ru/profiles/mobsman-u86271.html
a = TextBox30

b = Sheets(3).Range("H3") * Sheets(3).Range("J3")

If CSng(b) > a Then
TextBox29.Value = a
Else
TextBox29.Value = b
End If

Не работает как нужно, вчем проблема не пойму




iron priest>> Re: Переадресация с разных ячеек
2011-11-25 11:40 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
...

ShAM>> Re: макрос
2011-11-25 11:53 http://forum.msexcel.ru/profiles/sham-u106530.html
1. Прекрасное название.
2. Хорошее описание. Особенно хорошо определены «кнопка», «указанный файл» и «определенная ячейка».
3. Файла, где все это находится нету.
4. Главное, все по правилам данного форума.
5. С таким отношением будете долго ждать решения.


MilanAC>> Re: Переадресация с разных ячеек
2011-11-25 12:05 http://forum.msexcel.ru/profiles/milanac-u19092.html
1. Понять суть вопроса проще из файла, в котором нарисовано ИТОГОВОЕ желаемое, иначе неизбежны никому ненужные промежуточные решения.
2. Про ограничение в 3 заказа Вы тоже умолчали.
3. Работать всегда удобнее с базой данных, чем с другими структурами или их отсутствием.

Я не хотел все усложнять, но раз уж дело дошло до этого, то придется. Для того, чтобы понять специфику работы сделал Базу Приема заказов на РЕМОНТ ГАРАЖЕЙ (прикрепил к сообщению Excel файл с данной базой).
Краткое описание: 4 листа:
1. База (вносятся новые клиенты);
2. График работы (при осуществлении сделки данные по клиенту переносятся в график на определенную(ые) дату(ы);
3. Готово (выполненные заказы переносятся на этот лист);
4. Отказ (если клиент отказался заказывать работы у фирмы).

Созданы формы (Главная форма - Фильтрация). Работа с листами База, Готово, Отказ (сортировки по дате поступления звонка; по дате созв...

Mart222>> Re: Фопросы по USERFORM кредит
2011-11-25 12:07 http://forum.msexcel.ru/profiles/mart222-u74687.html
У меня заработало после замены

If CSng(b) > a Then

на

If CSng(b) > Replace(a, ".", ",") Then

Иначе он не воспринимает "а" как число и соответственно некорректно сравнивает

_Boroda_>> Re: Фопросы по USERFORM кредит
2011-11-25 12:25 http://forum.msexcel.ru/profiles/boroda-u12234.html
Из комбобокса, как, впрочем и из всех остальных подобных элементов, значение выводится текстом.
Преобразовать можно, например, так
CSng(b) > --a

или как написал уважаемый Mart222
или еще куча способов

Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-25 12:30 http://forum.msexcel.ru/profiles/mobsman-u86271.html
разобрался нужно еще стобы этот цикл работал если нажата OptionButton9

Сделал так не выходит. Как сделать что при нажатой OptionButton9 работало условие, В замешательстве

 If CSng(b) > Replace(a, ".", ",") And OptionButton9.Enabled Then
TextBox29.Value = a
End If
If CSng(b) < Replace(a, ".", ",") And OptionButton9.Enabled Then
TextBox29.Value = b
End If

Mart222>> Re: Фопросы по USERFORM кредит
2011-11-25 13:15 http://forum.msexcel.ru/profiles/mart222-u74687.html
Попробуйте так.

If CSng(b) > Replace(a, ".", ",") And OptionButton9 = True Then
TextBox29.Value = a
End If
If CSng(b) < Replace(a, ".", ",") And OptionButton9 = True Then
TextBox29.Value = b
End If

Enabled - это свойство отображающее доступность элемента управления, но не его значение.

Двойное отрицание конечно более красивое решение чем замена точки на запятую.

denis-obn>> Re: Преобразование столбца чисел в одну ячейку, с последующим разделением всех цифр.
2011-11-25 17:13 http://forum.msexcel.ru/profiles/denisobn-u113944.html
Решение нашел, единственное чуть длинней, чем хотел,  но все равно приятней чем было раньше=)
Спасибо

Smarty_kazan>> Одновременное открытие двух файлов
2011-11-25 18:38 http://forum.msexcel.ru/profiles/smartykazan-u110305.html
Добрый день, уважаемые!Помогите советом.
Как можно сделать так, чтобы при открывании одного файла параллельно загружался второй файл?
Заранее хочу сказать, выделение CTRLом не пойдет.
П.С делаю это для формулы =ВПР($D$1;ДВССЫЛ("[1.xlsx]Лист"&СТРОКА()&"!A1:B100");2;0)
чтобы исключить ошибку "ссылка".
Заранее спасибо!


_Boroda_>> Re: Одновременное открытие двух файлов
2011-11-25 18:51 http://forum.msexcel.ru/profiles/boroda-u12234.html
В модуль "ЭтаКнига" файла, в котором формула, положите код
Код:
Private Sub Workbook_Open()
    Workbooks.Open Filename:="D:\Стереть_1\0127536.xls"    'Путь и название открываемого файла
End Sub


Wasilic>> Re: Копирование данных с помощью макроса в другую книгу
2011-11-25 19:35 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Спасибо,  Wasilic.
Сейчас все правильно работает.

Только в реальном файле струкруры немного другое (02.xls) и надо копировать только те записи где столбец "А" не пусто.

Извиняюсь что сначало не написал об этом.

Можно сказать что все нормально работает. Но,

1. Программа удаляет все столбцы из ITOQ.XLS, а надо удалять толко те столбцы которые копируется. Эти столбцы заранее известно и не меняется, допустим, 1,2,3,5,6,9,15 столбцы.

2. Данные копируется каждый раз в конец файла в ITOQ.XLS, а надо копировать каждые данные на "свое место".

3. И еще, файлы очень большые, и поэтому программа работает очень дольго, где-то 5 минут. Как-то можно оптимизировать этот макрос?
Сколько НО ещё будет? Сколько ещё не написано сначала?

В ответе №4 я что написал?

С такими условиями задачи, я не смогу помочь!

Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-25 21:59 http://forum.msexcel.ru/profiles/mobsman-u86271.html


TextBox25.Value = ((CSng(a) * (Replace(b, ".", ",") / 100)) / 365) * CDate(c)


CDate(c) это месяц в котором считают проценты, нужно чтобы умножалось на количество дней этого месяца

Как работать с датами в макросе как представить данные в виде цифр( сколько дней в месяце )

Wasilic>> Re: Фопросы по USERFORM кредит
2011-11-25 23:05 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Как работать с датами в макросе как представить данные в виде цифр( сколько дней в месяце )
У меня тут примерчик завалялся, мож подойдёт.
Хотя, наверное, есть другой метод.

_Boroda_>> Re: Уcловное форматирование, диапазон данных
2011-11-25 23:14 http://forum.msexcel.ru/profiles/boroda-u12234.html
Цитировать
=ЕСЛИ(СУММПРОИЗВ(--ЕЧИСЛО(ПОИСК('[файл 2.xlsx]Site'!$C$2:$C$4;C2)));"direct";"")


smarty>> Заполнение ячеек с вариацией
2011-11-26 16:08 http://forum.msexcel.ru/profiles/smarty-u114098.html
Есть, скажем, столбец из 20 ячеек с начальным и конечным значениями (к примеру A1=100, A20=700) Нужно автоматически заполнить остальные  с вариацией, ну скажем ±1,5 вокруг среднего значения (A20-A1)/19. Как сделать? Чуствую можно, но интеллекта не хватает самому разобраться. В замешательстве
TIA


Dmitr68>> Re: Не занаю даже как кратко сформулировать.
2011-11-26 16:37 http://forum.msexcel.ru/profiles/dmitr68-u18737.html
Выделяем А2:А19
В строке формул пишем:
Код:
=СЛУЧМЕЖДУ(((A$20-A$1)/19-1,5)*100;((A$20-A$1)/19+1,5)*100)/100
нажимаем Ctrl+Enter

Smarty_kazan>> Re: Одновременное открытие двух файлов
2011-11-26 19:44 http://forum.msexcel.ru/profiles/smartykazan-u110305.html
Спасибо)

smarty>> Re: Не занаю даже как кратко сформулировать.
2011-11-26 20:31 http://forum.msexcel.ru/profiles/smarty-u114098.html
Выделяем А2:А19
В строке формул пишем:
Код:
=СЛУЧМЕЖДУ(((A$20-A$1)/19-1,5)*100;((A$20-A$1)/19+1,5)*100)/100
нажимаем Ctrl+Enter
Спаибо. Не совсем то - но за основу взял.
Мне нужно было вот это
A2=A1+ROUND(RANDBETWEEN(((A20-A1)/19-1,5)*100;((A20-A1)/19+1,5)*100)/100;1)
A3=A2+ROUND(RANDBETWEEN(((A20-A1)/19-1,5)*100;((A20-A1)/19+1,5)*100)/100;1)
A3=A2+ROUND(RANDBETWEEN(((A20-A1)/19-1,5)*100;((A20-A1)/19+1,5)*100)/100;1)
A4=A3+ROUND(RANDBETWEEN(((A20-A1)/19-1,5)*100;((A20-A1)/19+1,5)*100)/100;1)
.
.
.
A19=A18+ROUND(RANDBETWEEN(((A20-A1)/19-1,5)*100;((A20-A1)/19+1,5)*100)/100;1)
Спасибо.

sergo44441>> Re: Преобразование сводной таблицы в обычную
2011-11-26 21:50 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
Тут пример нужен, примерный вид таблиц и во что нужно преобразовывать

Serge 007>> Re: ПОМОГИТЕ ПЕРЕИМЕНОВАТЬ СТОЛБЦЫ В EXCEL2007
2011-11-26 22:22 http://forum.msexcel.ru/profiles/serge_007-u25260.html
См. здесь.

sergo44441>> Re: Проблема соединения данных из по строке с условиями.
2011-11-26 22:46 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
Вроде получилось, посмотрите

exceleved>> Re: Заполнение ячеек с вариацией
2011-11-26 22:52 http://forum.msexcel.ru/profiles/exceleved-u35802.html
Для А2 и протянуть
Код:
=ОКРУГЛ(A1+(A$20-A$1)/19+(СЛЧИС()-0,5)*3;1)

=ROUND(A1+(A$20-A$1)/19+(RAND()-0.5)*3,1)


sergo44441>> Re: Ежемесячное обновление с другого файла.
2011-11-26 22:54 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
можно заложить обновление в макрос, если все файлы будут находиться в одной папке, а количество СКВ одинаково, или может меняться (Предусмотреть возможность автоматического дополнения СКВ)?

sergo44441>> Re: Помогите создать связанные таблицы
2011-11-26 22:58 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
Хорошая задача, а как быть в случае если гонщик сходит на одном из спецучастков?, он продолжает борьбу на следующих, или выбывает?

sergo44441>> Re: Не удается очистить буфер обмена!!!
2011-11-26 23:00 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
А при простом копировании и вставке данных ошибок не возникает?

Serge 007>> Re: Не удается очистить буфер обмена!!!
2011-11-26 23:08 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Ирин@ , мы вроде здесь это обсуждали...

Danila>> Re: Помогите создать связанные таблицы
2011-11-27 02:01 http://forum.msexcel.ru/profiles/danila-u112641.html
это уже частный вопрос! Задача общая, беретесь?

Smarty_kazan>> Re: Ежемесячное обновление с другого файла.
2011-11-27 15:16 http://forum.msexcel.ru/profiles/smartykazan-u110305.html
а как это осуществить?может быть и подойдет.

_Boroda_>> Re: Ежемесячное обновление с другого файла.
2011-11-27 16:18 http://forum.msexcel.ru/profiles/boroda-u12234.html
Посмотрите такой вариант
Симбиоз формул в первой строке и макроса. Обратите внимание на формат ячейки с месяцем в файле "Ежемесячный"

runny.exe>> Выборка
2011-11-27 16:54 http://forum.msexcel.ru/profiles/runnyexe-u114248.html
Есть база такого характера:

Код:
42020000556;ПИHЧУК HИКОЛАЙ ЛУКИЧ;Жлобин, Красноармейская д.№20 кв.
42020000770;ТОПОРОВА АЛЛА АЛЕКСЕЕВНА;Жлобин, Микрорайон 1 д.№10 кв.
42020000775;РЫЧКОВА ГАЛИНА ВАСИЛЬЕВНА;Жлобин, Микрорайон 1 д.№10 кв.
42020000782;ШПЫРКО ИВАН ФЕДОРОВИЧ;Жлобин, Микрорайон 1 д.№10 кв.
42020000783;ФЕДОСЕНКО СЕРГЕЙ ИЛЛАРИОНОВИЧ;Жлобин, Микрорайон 1 д.№10 кв.

В этой базе есть ошибка - вместо русской буквы Н прописана английская Н.
Не могу сообразит, как из всего массива оставить только слова с английской буквой Н, а остальные строчки отсеять?

_Boroda_>> Re: Выборка
2011-11-27 17:09 http://forum.msexcel.ru/profiles/boroda-u12234.html
Код:
=СУММПРОИЗВ((КОДСИМВ(ПСТР(ПРОПИСН(B2);СТРОКА(ДВССЫЛ("A1:A"&ДЛСТР(B2)));1))>64)*(КОДСИМВ(ПСТР(ПРОПИСН(B2);СТРОКА(ДВССЫЛ("A1:A"&ДЛСТР(B2)));1))<91))
Ловит любые вражеские буквы

2rist>> Вопрос про ВПР (только шире)
2011-11-27 18:33 http://forum.msexcel.ru/profiles/2rist-u114255.html
Здравствуйте.
Подскажите как реализовать такую вешь:
Нужно что то вроде ВПР, что бы находило нужное значение в векторе поиска и подставляло соответствие из нужного столбца, но при этом если в векторе поиска находится несколько значений равных искомому, мне возвращалось максимальное (или минимальное) из соответствующих.
Спасибо.

Smarty_kazan>> Re: Вопрос про ВПР (только шире)
2011-11-27 18:43 http://forum.msexcel.ru/profiles/smartykazan-u110305.html
что-то вроде этого.

2rist>> Re: Вопрос про ВПР (только шире)
2011-11-27 18:54 http://forum.msexcel.ru/profiles/2rist-u114255.html
Вроде похоже, но я так понял, что задается номер по счету (третья, пятая, а я не знаю сколько у меня совпедений, как задать именно максимальное-минимальное?

runny.exe>> Re: Выборка
2011-11-27 18:57 http://forum.msexcel.ru/profiles/runnyexe-u114248.html
То что требовалось! Спасибо большое!!!

Serge 007>> Re: Вопрос про ВПР (только шире)
2011-11-27 19:00 http://forum.msexcel.ru/profiles/serge_007-u25260.html
См. вложение

2rist>> Re: Вопрос про ВПР (только шире)
2011-11-27 19:13 http://forum.msexcel.ru/profiles/2rist-u114255.html
видимо не совсем то.
вот с примером:
F3=взять "3" из D3, найти все "3" в столбце В и для этих "3" в столбце G найти соответствия и вернуть в F3 максимальное (или минимальное)

Serge 007>> Re: Вопрос про ВПР (только шире)
2011-11-27 19:30 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Пример надо было сразу прикладывать.

sergo44441>> Re: Помогите создать связанные таблицы
2011-11-27 20:01 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
да, я хочу макросом таблицы на всех листах собирать в одну, и создавать сводную с сортировкой по суммарному времени. Для продумываения методики недостает только ответа на частный вопрос))

sergo44441>> Re: Ежемесячное обновление с другого файла.
2011-11-27 20:03 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
А вам нужны только пункты 3, 6, 7, 10? Или все?

Smarty_kazan>> Re: Ежемесячное обновление с другого файла.
2011-11-27 20:21 http://forum.msexcel.ru/profiles/smartykazan-u110305.html
для конкретного файла только 3,6,7,10.для других будут уже другие.
вроде формула+макрос Бороды подходят.
Спасибо, огромно помогли мне.думаю это лучшее решение для данной проблемы

Тиль>> Re: Проблема соединения данных из по строке с условиями.
2011-11-27 23:46 http://forum.msexcel.ru/profiles/til-u108326.html
Спасибо что ответили.
Немного не так, сижу разбираюсь в коде.

Там если в начале есть 57 до дописывается только ноль, тобишь если вид 22 то как бы не начиналось, должно стоять "057", но "05757" не может быть.

Select Case Mid(nom, 1, 3)
    Case "57?"
        temp = 0
    Case "0??"
        If Mid(nom, 1, 3) <> "057" Then temp = "057"
End Select

Case "0??" кажется тут ошибка, первые то символы равны "057", а все равно приписывает еще 057.

"&" как я понял это "+"..я именно плюсом пользуюсь.

Затвра на работе буду переписывать, пробовать...знали бы вы как я это организовал  у себя...умерли бы со смеху...я окончательно запутался в If-ах...наделал поколо 100 строк кода...и рабочий день закончился...
а тут...так мало и все вроде бы понятно.
If nom = "пусто" Then    VBA  понимает понятие "пусто" , или ставить "" ?

Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-28 11:02 http://forum.msexcel.ru/profiles/mobsman-u86271.html
TextBox25.Value = Round(((CSng(a) * ((Replace(b, ".", ",") / 100))) / 365) * Day(Month(c)),3)


Day(Month(c))
С результатами получаются полные непонятки, считает для января правильно в нем 31 день, но затем для февраля считает что в нем 1 день, для января 2 дня и так далее до декабря, в нем 11 дней,

Данные для диапазона дат берутся отсюда

Private Sub UserForm_Initialize()
Dim r As Range
    For Each r In Worksheets("Данные  Кредит").[M1:M12]
        ComboBox2.AddItem Format(r, "mmmm yyyy")
    Next r
    ComboBox2.ListIndex = 0    
Me.ComboBox1.RowSource = "'Данные  Кредит'!A3:A14"
End Sub


STEROID>> Критерий отбора по нескольким значениям в рамках одного условия
2011-11-28 11:38 http://forum.msexcel.ru/profiles/steroid-u114348.html
Доброго времени суток!

Имею насущную проблему, перечень наименований окло 40 000 шт в колонке А1 в колонке B2 соответственно

указано количество данного наименования. Цель: подсчитать общее количество заданного наименования

по таблице - ВСЕ ПРОСТО =СУММЕСЛИМН(В1:В40001;А1:А40001;"Шуруп 5*30")

Но есть одно существенное НО, наименования повторяются и вносятся разными исполнителями, отсюда результат

искомое значение "шуруп 5*30" в течении всего диапазона может так же принимать значение "шуруп5*30", "шуруп 5х30",

"шуруп 5*30мм" и тд , соответственно пробовал применить формулу =СУММЕСЛИМН(В1:В40001;А1:А40001;"Шуруп 5*30"

А1:А40001;шуруп5*30";А1:А40001;"шуруп5*30";А1:А40001;"шуруп 5х30";А1:А40001"шуруп 5*30мм"), но в итоге понял

что количество вариаций значения бесконечно, хотя логический смысл одинаков.

До этого искал и вносил все значения вручную Ctrl+F, в поле "НАЙТИ" забивал "шуруп*5*30" (знак * помогал отсеять все лишнее),

в поле "найти все" выдавал все перечисленные выше наименования...

c_zurab>> Re: Поиск количество какойто буквы в тексте
2011-11-28 12:05 http://forum.msexcel.ru/profiles/czurab-u4059.html
СПАСИБО, ОЧЕНЬ ПОМОГ

_Boroda_>> Re: Фопросы по USERFORM кредит
2011-11-28 12:14 http://forum.msexcel.ru/profiles/boroda-u12234.html
1. В ComboBox1_Change напишите a = --TextBox30
2. у Вас нет OptionButton9, а в условии If CSng(b) > Replace(a, ".", ",") And OptionButton9 = True Then
- есть. конечно всегда будет Ложь, следовательно, b будет пусто и формуле работать не будет
Код:
a = TextBox30
b = Sheets(3).Range("H3") * Sheets(3).Range("J3")
If CSng(b) > Replace(a, ".", ",") And OptionButton9 = True Then
TextBox29.Value = a
End If
If CSng(b) < Replace(a, ".", ",") And OptionButton9 = True Then
TextBox29.Value = b
End If
меняем на
Код:
a = --TextBox30
b = Sheets(3).Range("H3") * Sheets(3).Range("J3")
TextBox29.Value = WorksheetFunction.Min(a, b)

и дальше
Код:
Private Sub CommandButton1_Click()
a = --TextBox1
b = --TextBox29
c = CDate(ComboBox2)
If OptionButton4.Enabled = True And OptionButton7.Enabled = True Then
TextBox25.Value = Round(a * b / 100 / 365 * Day(WorksheetFunction.EoMonth(c, 0)), 3)
Else
TextBox25.Value = ""
End If
End Sub


jv1122>> Re: Уcловное форматирование, диапазон данных
2011-11-28 12:16 http://forum.msexcel.ru/profiles/jv1122-u104830.html
Работает! На других аналогичных примерах - тоже все работает. Спасибо!

_Boroda_>> Re: Критерий отбора по нескольким значениям в рамках одного условия
2011-11-28 12:27 http://forum.msexcel.ru/profiles/boroda-u12234.html
ВОПРОС: можно ли в критерии отбора забить несколько значений согласно одного поиска, в приведенном примере это будет
"шуруп", "2" и "30"
И где он, пример приведенный?

Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-28 12:31 http://forum.msexcel.ru/profiles/mobsman-u86271.html
непонятненько что то, формула то работает, просто форма не доделана, проблема в том что нужно
все да-нет выставить на нет, тогда считает, но почему то  количество дней берет правильно именно от января от остальных месяцев не берет, Меняю в той же ячейке на рабочем листе январь на февраль, уже считает что неправильно, меняю обратно правильно. Меняю последний месяц тоже на январь считает правильно, получается считает только январь, остальные месяцы воспринимает черт знает как

STEROID>> Re: Критерий отбора по нескольким значениям в рамках одного условия
2011-11-28 13:08 http://forum.msexcel.ru/profiles/steroid-u114348.html
Вот краткий пример. так я пользуюсь CTRL+F вручную, а рядом формула которую я хотел применить для автоматизации процесса, но формульно не получается охватить весь диапазон наименований, перечислять тупо все возможные БЕССМЫСЛЕННО, т.к. каждый день меняются исполнители, не исключены новые варианты, я лишь подбиваю итог, для итога мне достаточно только базовые параметры "шуруп", "5" и "30", т.е. они по любому будут фигурировать в значении наименовании.

Tasha>> Re: функция БАТТЕКСТ
2011-11-28 13:20 http://forum.msexcel.ru/profiles/tasha-u4648.html
Большое спасибо Улыбка

STEROID>> Re: Критерий отбора по нескольким значениям в рамках одного условия
2011-11-28 13:36 http://forum.msexcel.ru/profiles/steroid-u114348.html
ВОПРОС: можно ли в критерии отбора забить несколько значений согласно одного поиска, в приведенном примере это будет
"шуруп", "2" и "30"
И где он, пример приведенный?

Пример в смысле:"До этого искал и вносил все значения вручную Ctrl+F, в поле "НАЙТИ" забивал "шуруп*5*30" (знак * помогал отсеять все лишнее),

в поле "найти все" выдавал все перечисленные выше наименования, после чего сумму полученных считал и вносил вручную."

Dmitr68>> Re: Критерий отбора по нескольким значениям в рамках одного условия
2011-11-28 13:46 http://forum.msexcel.ru/profiles/dmitr68-u18737.html
Код:
=СУММЕСЛИ(A1:A40001;"*шуруп*5*30*";B1:B40001)


_Boroda_>> Re: Критерий отбора по нескольким значениям в рамках одного условия
2011-11-28 13:46 http://forum.msexcel.ru/profiles/boroda-u12234.html
Выдержка из правил (кстати, почитайте на досуге - много интересного обнаружите)
Цитировать
...
2. К первому сообщению темы должен быть прикреплен файл изображения и / или файл примера в формате xls*.
Приложив пример, Вы избавите себя и других от вопросов типа "А какой критерий?", "А куда выводить результат?", "А сколько строк?" и все тех же просьб выложить файл. Рисовать за Вас Ваши же таблички с заданиями, а затем и решение к ним, никто желанием не горит. Да и, как показывает практика, в большинстве случаев без файла решения не найти.
Прикрепить к сообщению можно только файлы gif,jpg,rar,zip,7z,bas,frm,cls,docx,xlsx,xls размером до 1000 Кб.
Прикрепить файл можно в полной форме ответа на сообщение. Под окном для ввода сообщения нажмите на знак "+" возле текста "Дополнительные опции..."


_Boroda_>> Re: Фопросы по USERFORM кредит
2011-11-28 13:53 http://forum.msexcel.ru/profiles/boroda-u12234.html
потому, что формула Day(Month(c)) на русский переводится так: от даты с взять НОМЕР месяца (1;2;3;...;12). Результат - числа от 1 до 12. потом от этого числа взять день - получаем это же число.
Я же написал формулу подсчета кол-ва дней в месяце - Day(WorksheetFunction.EoMonth(c, 0))

STEROID>> Re: Критерий отбора по нескольким значениям в рамках одного условия
2011-11-28 13:55 http://forum.msexcel.ru/profiles/steroid-u114348.html
Код:
=СУММЕСЛИ(A1:A40001;"*шуруп*5*30*";B1:B40001)
Разницы не вижу никакой в сравнении с мой формулой, только разве что в СУММЕСЛИМН можно вносить дополнительные критерии отбора!

Tasha>> Re: функция БАТТЕКСТ
2011-11-28 14:01 http://forum.msexcel.ru/profiles/tasha-u4648.html
В ссылке "числа прописью" нашла что нужно. Но есть нюанс. У меня одна колонка количество, а другая стоимость. В количестве мне надо просто число прописью без "руб." и "коп.", а вот в стоимости все как надо получается. Грустный

_Boroda_>> Re: Критерий отбора по нескольким значениям в рамках одного условия
2011-11-28 14:10 http://forum.msexcel.ru/profiles/boroda-u12234.html
Вот если Вы упрямиться перестанете и наконец-то пример приложите, то мы Вам разницу на нем и покажем.

STEROID>> Re: Критерий отбора по нескольким значениям в рамках одного условия
2011-11-28 14:36 http://forum.msexcel.ru/profiles/steroid-u114348.html
Вот если Вы упрямиться перестанете и наконец-то пример приложите, то мы Вам разницу на нем и покажем.
Пример выложил! Улыбка
Спасибо за замечание, благодаря ему перечитал предыдущее сообщение, увидел разницу и все заработало!



STEROID>> Re: Критерий отбора по нескольким значениям в рамках одного условия
2011-11-28 14:39 http://forum.msexcel.ru/profiles/steroid-u114348.html
Код:
=СУММЕСЛИ(A1:A40001;"*шуруп*5*30*";B1:B40001)
Разницы не вижу никакой в сравнении с мой формулой, только разве что в СУММЕСЛИМН можно вносить дополнительные критерии отбора!
Прошу прощения, читал невнимательно. пропустил *шуруп*5*30*, все заработало!

Огромное Вам спасибо, сократили мою работу на 30% !

Тему можно считать закрытой!

Алина>> как увидеть кто работает в документе
2011-11-28 15:16 http://forum.msexcel.ru/profiles/alina-u17709.html
документ в общем доступе на сервере (офис 2007). При попытке открыть документ система пишет, что он уже кем-то занят.В предыдущей версии указывался конкретный пользователь, а в 2007 не указывается. Можно как-то определить пользователя?

Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-28 15:20 http://forum.msexcel.ru/profiles/mobsman-u86271.html
потому, что формула Day(Month(c)) на русский переводится так: от даты с взять НОМЕР месяца (1;2;3;...;12). Результат - числа от 1 до 12. потом от этого числа взять день - получаем это же число.
Я же написал формулу подсчета кол-ва дней в месяце - Day(WorksheetFunction.EoMonth(c, 0))

Понятно, но почему тогда январь считает правильно

Вставляю в свою формулу не получается, может где то ошибка
a = TextBox1

b = TextBox29

c = CDate(ComboBox2)

If OptionButton4.Enabled = True And OptionButton7.Enabled = True Then

TextBox25.Value = Round(((CSng(a) * ((Replace(b, ".", ",") / 100))) / 365) * Day(WorksheetFunction.EoMonth(c, 0))), 2)

iron priest>> Re: как увидеть кто работает в документе
2011-11-28 15:46 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
и в 2007 пишется и в 2010

Алина>> Re: как увидеть кто работает в документе
2011-11-28 15:50 http://forum.msexcel.ru/profiles/alina-u17709.html
нет не пишется.Я бы тогда не стала спрашивать

Алина>> Re: как увидеть кто работает в документе
2011-11-28 15:52 http://forum.msexcel.ru/profiles/alina-u17709.html
вот пример

Serge 007>> Re: как увидеть кто работает в документе
2011-11-28 15:52 http://forum.msexcel.ru/profiles/serge_007-u25260.html
нет не пишется.Я бы тогда не стала спрашивать
Форма не менялась. Движок аутентификации тоже. Логин юзера обязан выводится (у меня выводится).
Приложите скрин ошибки.

Serge 007>> Re: как увидеть кто работает в документе
2011-11-28 15:54 http://forum.msexcel.ru/profiles/serge_007-u25260.html
У меня нет ворда, приложите в Excel.

iron priest>> Re: как увидеть кто работает в документе
2011-11-28 15:56 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
бывает такое, что пишется другой пользователь, но обычно после 2-го открытия файла пишется имя пользователя. если она задано

Джоник>> Re: Как зафиксировать размер формы на экране монитора
2011-11-28 17:26 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
НЕ уж то никто не знает как это сделать?

vitaleg>> Объединить три таблицы
2011-11-28 17:45 http://forum.msexcel.ru/profiles/vitaleg-u114386.html
Доброго дня. Ребята, помогите плз с такой проблемой - надо обьединить три таблицы по два столбца в каждой по значению первого столбца. Например:

Таблица 1:

1 524
2 354
3 654


Таблица 2:

1 353
2 745
3 756


Таблица 3:

1 362
4 463
7 633

В результате должны получить:

1 524 353 362
2 354 745
3 654 756
4            463
7            633


iron priest>> Re: Как зафиксировать размер формы на экране монитора
2011-11-28 17:52 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
какой размер вам нужен?

заходите в вижуал бейсик на anncalendar правой кнопкой на календаре заходите в пропертис и изменяете размеры всех фигур

2rist>> Re: Вопрос про ВПР (только шире)
2011-11-28 18:02 http://forum.msexcel.ru/profiles/2rist-u114255.html
Спасибо, работает как нужно.

vitaleg>> Re: Объединить три таблицы
2011-11-28 18:07 http://forum.msexcel.ru/profiles/vitaleg-u114386.html
Ох я валенок. ВПР рулит. Всем спасибо все свободны)

Alexxey>> Re: Объединить массивы
2011-11-28 20:30 http://forum.msexcel.ru/profiles/alexxey-u21920.html
Буду благодарен помощи в освоении VBA.
Не работает UDF

Public Function MyUnion(Array1, Array2) As Double()
Rem получить объединенный массив
   
    Dim N As Integer
   
    Dim Arr, ArrItem As Double
    Dim UnionArr() As Double
   
     For Each Arr In Array1
      ReDim Preserve UnionArr(0 To N)
      UnionArr(N) = Arr
      N = N + 1
     Next
     
     For Each Arr In Array2
      ReDim Preserve UnionArr(0 To N)
      UnionArr(N) = Arr
      N = N + 1
     Next

MyUnion = UnionArr
End Function

В чем проблема?

Danila>> Re: Помогите создать связанные таблицы
2011-11-28 21:39 http://forum.msexcel.ru/profiles/danila-u112641.html
в деталях! если гонщик сошел на спецучастке, то он дальше не продолжает участие, НО, если 2-х дневная гонка, то он может выйти на старт второго дня!!! 

shvonderev>> Таблица-функция
2011-11-28 21:50 http://forum.msexcel.ru/profiles/shvonderev-u114413.html
У меня есть таблица в которой несколько ячеек являются входными данными, затем куча ячеек для вычислений  и одна ячейка с итоговым значением.
А я хочу создать новую таблицу которая бы содержала список начальных данных а рядом итоговые значения, вычисленые с использованием первой таблицы с данными указаными в списке первой, чтобы первая таблица являлась функции. Помогите – я в экселе делитант, может ссылку какую киньте.


Джоник>> Re: Как зафиксировать размер формы на экране монитора
2011-11-28 21:55 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Вечер добрый!
Да этот способ я знаю. А мне хочется менять Веселыйразмер форм без захода в ВБА. Очень удобно, поверте мне на слово!

Тиль>> Re: Проблема соединения данных из по строке с условиями.
2011-11-28 22:15 http://forum.msexcel.ru/profiles/til-u108326.html
Спасибо большое!
Сегодня с утра пришел, за час додумался как сделать просто и со вкусом, в итоге огромное кол-во строк превратилось десять строчек, и все работает  Улыбка
Если интересно, могу принести код показать. Кстати, есть там пара вопросов по переменным, завтра, елси не забуду принесу, покажу.
Вроде бы все нормально обьявляю, но ошибку выдает, какую точно не помню, пришлось прописывать полностью адрес ячейки нужной. а так в 2 раза бы укоротились строки.

С.М.>> Re: Объединить массивы
2011-11-29 00:41 http://forum.msexcel.ru/profiles/sm-u19758.html
Alexxey, у меня Ваша функция работает.
(на всякий случай добавил немного извращённый  Улыбка  вариант):

Aqil_f>> Re: Копирование данных с помощью макроса в другую книгу
2011-11-29 07:04 http://forum.msexcel.ru/profiles/aqilf-u14854.html
Помогите пожалуйста.

Очень нужно мне сейчас это.

Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-29 07:41 http://forum.msexcel.ru/profiles/mobsman-u86271.html
Вставляю в формуле на это значение.    day(WorksheetFunction.EoMonth(c, 0)

Когда запускаю макрос и нажимаю расчет он пишет рун тайм ерор 438 обьект доснт суппорт зисис метод

a = TextBox1
b = TextBox29
c = CDate(ComboBox2)
If OptionButton4.Enabled = True And OptionButton7.Enabled = True Then
TextBox25.Value = Round(((CSng(a) * ((Replace(b, ".", ",") / 100))) / 365) * Day(WorksheetFunction.EoMonth(c, 0)), 2)

iron priest>> Re: Таблица-функция
2011-11-29 08:01 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
читаем правила форума, а именно пункт 2, здесь не форум экстрасенсов Подмигивающий

_Boroda_>> Re: Фопросы по USERFORM кредит
2011-11-29 08:46 http://forum.msexcel.ru/profiles/boroda-u12234.html
Вы мой пост №11 смотрели? Там последний код
еще раз, для особо внимательных, конкурс - найди отличия
Код:
Private Sub CommandButton1_Click()
a = --TextBox1
b = --TextBox29
c = CDate(ComboBox2)
If OptionButton4.Enabled = True And OptionButton7.Enabled = True Then
TextBox25.Value = Round(a * b / 100 / 365 * Day(WorksheetFunction.EoMonth(c, 0)), 3)
Else
TextBox25.Value = ""
End If
End Sub


Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-29 08:59 http://forum.msexcel.ru/profiles/mobsman-u86271.html
Программа ругается на черточки
 a = --TextBox1
b = --TextBox29

рунтайм ерор 13

keshun>> Быстрый ввод цифровых данных &quot;в строку&quot;
2011-11-29 09:03 http://forum.msexcel.ru/profiles/keshun-u114513.html
Здравствуйте уважаемые форумчане! Столкнулся с такой проблемой, прошу вашего совета/помощи.

В общем в таблицу excel нужно ввести огромное число цифр (порядка 100000), ввод происходит следующим образом

2 -> 3 -> 2 -> 4 -> 1 -> 1 -> и т.д, затем с новой строки:
1 -> 2 -> 3 -> 2 -> 4 -> 1 -> и снова повторяется.

В общем на каждую введенную цифру приходится жать клавишу "вправо"/Tab. Нельзя ли автоматизировать процесс, задать условие, при котором в этих ячейках допускалась лишь одна цифра и дальше активной становилась соседняя справа ячейка? Таким образом экономия времени будет почти в два раза + защита от случайного ввода в ячейку более одного символа.

За любую помощь - огромная благодарность.

Serge 007>> Re: Быстрый ввод цифровых данных &quot;в строку&quot;
2011-11-29 09:41 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Вы не указали свою версию Excel.

Для 2007/2010: Выделяете необходимые ячейки - Данные - Проверка данных - Целое число.
Меню Файл (или кнопка "Офис") - Параметры - Дополнительно - Переход к другой ячейке после нажатия клавиши ВВОД - Вправо.

_Boroda_>> Re: Быстрый ввод цифровых данных &quot;в строку&quot;
2011-11-29 09:45 http://forum.msexcel.ru/profiles/boroda-u12234.html
А может так еще проще будет?

MCH>> Re: Объединить массивы
2011-11-29 09:48 http://forum.msexcel.ru/profiles/mch-u48782.html
Ну и формульный вариант (тоже извращенный)

_Boroda_>> Re: Фопросы по USERFORM кредит
2011-11-29 09:49 http://forum.msexcel.ru/profiles/boroda-u12234.html
Интересно. У меня все нормально проходит.
Ладно, попробуйте так и посмотрите, чему равны переменные. После этого уже понятнее будет, где копать нужно
Private Sub CommandButton1_Click()
a = CSng(TextBox1)
b = Replace(TextBox29, ".", ",")
c = CDate(ComboBox2)
If OptionButton4.Enabled = True And OptionButton7.Enabled = True Then

n=Day(WorksheetFunction.EoMonth(c, 0))

'перед выполнением строчки "TextBox25.Value =..." посмотри, чему равны a, b, c, n
range("A1")=a
range("A2")=b
range("A3")=c
range("A4")=n


TextBox25.Value = Round(a * b / 100 / 365 * Day(WorksheetFunction.EoMonth(c, 0)), 3)
Else
TextBox25.Value = ""
End If
End Sub

keshun>> Re: Быстрый ввод цифровых данных &quot;в строку&quot;
2011-11-29 09:59 http://forum.msexcel.ru/profiles/keshun-u114513.html
Вы не указали свою версию Excel.
Да, прошу прощения. Однако версия значения не имеет, есть все.
Для 2007/2010: Выделяете необходимые ячейки - Данные - Проверка данных - Целое число.
Меню Файл (или кнопка "Офис") - Параметры - Дополнительно - Переход к другой ячейке после нажатия клавиши ВВОД - Вправо.
Опять таки придется пользоваться клавишей ВВОД - удобнее чем "вправо", но по сути - лишняя операция.

_Boroda_  - отличный вариант! Гранд мерси. Думаю это решит проблему.

exceleved>> Re: Таблица-функция
2011-11-29 10:19 http://forum.msexcel.ru/profiles/exceleved-u35802.html
Макрос: кладем значения ячеек в "таблицу-функцию", кладем итоговое значение обратно. И так для каждой строки.

Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-29 10:22 http://forum.msexcel.ru/profiles/mobsman-u86271.html
Остановимся на функции глюк какой то

c = CDate(ComboBox2)

n = Day(WorksheetFunction.EoMonth(c, 0))

В режиме отладки горит желтим строчка n=.....
Подвожу курсор к  с в строчке с (с=01.01.2011) подвожу курсор к с в строчек n (с=01.01.2011)
подвожу курсор к n  (n=empty)
Получается   c=01.01.2011
                   n=empty

_Boroda_>> Re: Фопросы по USERFORM кредит
2011-11-29 10:44 http://forum.msexcel.ru/profiles/boroda-u12234.html
А какая версия Excel? Случайно не 2003?
Введите в А1 01.01.2011, в В1 =КОНМЕСЯЦА(A1,0)  Работает?

Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-29 10:51 http://forum.msexcel.ru/profiles/mobsman-u86271.html
2003 эксель, не пашет формула

Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-29 10:54 http://forum.msexcel.ru/profiles/mobsman-u86271.html
2003 эксель, не пашет формула
Вот панос, в 2007 пашет,  я не стал использовать 2007 т.к. он портейбл и иногда глючит.

В 2003 не работают многие функции?

_Boroda_>> Re: Фопросы по USERFORM кредит
2011-11-29 10:56 http://forum.msexcel.ru/profiles/boroda-u12234.html
Установите надстройку "Пакет анализа". Да и вообще - все встроенные надстройки установите, кроме "Евро". Если я правильно помню - Сервис - Надстройки

Не то, чтобы прям многие, но есть.

2010 - мне очень нравится

keshun>> Re: Быстрый ввод цифровых данных &quot;в строку&quot;
2011-11-29 10:57 http://forum.msexcel.ru/profiles/keshun-u114513.html
_Boroda_, а где изменить количество цифр считывающихся? В замешательстве Если ввожу больше пишет ошибку "должно быть 6 цифирей"...

_Boroda_>> Re: Быстрый ввод цифровых данных &quot;в строку&quot;
2011-11-29 10:59 http://forum.msexcel.ru/profiles/boroda-u12234.html
Вы не указали свою версию Excel.

Для 2007/2010: Выделяете необходимые ячейки - Данные - Проверка данных - Целое число.


kim k.>> Вопрос по обращению к закрытому файлу с помощью =ИНДЕКС()
2011-11-29 11:11 http://forum.msexcel.ru/profiles/kim_k-u5362.html
Добрый день, форумчане!

вопрос такого плана-- имеем первый файл, куда производится отбор данных с помощью =ИНДЕКС(). Имеем второй, из которого =ИНДЕКС() тянет данные в зависимости от запроса. Когда второй файл закрыт, данные в первый не затягиваются.
Вопрос о том, можно ли каким-то образом обмануть =ИНДЕКС()?

Спасибо!

_Boroda_>> Re: Вопрос по обращению к закрытому файлу с помощью =ИНДЕКС()
2011-11-29 11:31 http://forum.msexcel.ru/profiles/boroda-u12234.html
2 варианта
1. Преобразуйте "таблицу" в файле Q3(2) в диапазон
2. Создайте "таблицу" в файле Q3(1) в диапазоне А2:В5

kim k.>> Re: Вопрос по обращению к закрытому файлу с помощью =ИНДЕКС()
2011-11-29 11:55 http://forum.msexcel.ru/profiles/kim_k-u5362.html
Спасибо за ответ, _Boroda_

при первом варианте мы потеряем часть функционала =ПОИСКПОЗ(), вложенной в =ИНДЕКС(). Т.е. мы не сможем обращаться к диапазону поиска Заголовки таблицы (#Заголовки). Или будем вынуждены обращаться к столбцам таблицы только задавая их явно (1 или 2...), что может повлечь проблемы -- например, при добавлении новой колонки перед той, к которой мы обращаемся.

при втором, предложенном вами варианте все конечно ок, кроме того, что нам нужно все исходные таблицы сначала затянуть в наш файл. Т.е. если их будет много и с большим объемом данных, файл распухнет как в объеме так и по структуре... Конечно, все ненужные таблицы можно прятать в скрытых листах... ну, возможно, как крайний вариант это и подойдет.

Вот например здесь http://planetaexcel.ru/tip.php?aid=94 функцию =СУММПРОИЗВ() сумели заставить обратиться к закрытому файлу... я подумал, нет ли такой же уловки для =ИНДЕКС() ?

_Boroda_>> Re: Вопрос по обращению к закрытому файлу с помощью =ИНДЕКС()
2011-11-29 12:21 http://forum.msexcel.ru/profiles/boroda-u12234.html
1) поиск по заголовкам можно просто сделать с запасом. Столбцов на 30
2) я вообще не понял, о чем Вы пишете. Ничего никуда затягивать не нужно. В файле Q1 выделяем ячейки А2:В5 - Вставка - Таблица - ОК. Вы мой вложенный файл смотрели? Переделайте там ссылки на свой файл Q2 и этот Q2 закройте. Все работает прекрасно
Короче - из закрытых файлов ИНДЕКС (ПОИСКПОЗ( тянется только если в обеих книгах или диапазоны, или "таблицы"

С.М.>> Re: Вопрос по обращению к закрытому файлу с помощью =ИНДЕКС()
2011-11-29 13:02 http://forum.msexcel.ru/profiles/sm-u19758.html
при первом варианте мы потеряем часть функционала =ПОИСКПОЗ(), вложенной в =ИНДЕКС(). Т.е. мы не сможем обращаться к диапазону поиска Заголовки таблицы (#Заголовки). Или будем вынуждены обращаться к столбцам таблицы только задавая их явно (1 или 2...), что может повлечь проблемы -- например, при добавлении новой колонки перед той, к которой мы обращаемся.
? :

С.М.>> Re: Вопрос по обращению к закрытому файлу с помощью =ИНДЕКС()
2011-11-29 13:45 http://forum.msexcel.ru/profiles/sm-u19758.html
?(2) :

Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-29 14:04 http://forum.msexcel.ru/profiles/mobsman-u86271.html
a = TextBox1
b = TextBox29
c = CDate(ComboBox2)
n = Day(WorksheetFunction.EoMonth(c, 0))
If OptionButton4.Enabled = True And OptionButton7.Enabled = True Then
ТextBox25.Value = Round(((CSng(a) * ((Replace(b, ".", ",") / 100))) / 365) * (n), 2)
Else
TextBox25.Value = ""
End If

 OptionButton4.Enabled  OptionButton7.Enabled  что нажимаешь их что не нажимаешь, все равно цикл работает, в чем ошибка, вроде до этого все было норм

_Boroda_>> Re: Фопросы по USERFORM кредит
2011-11-29 14:29 http://forum.msexcel.ru/profiles/boroda-u12234.html
А при чем тут Enabled?
Value нужно

MilanAC>> Re: Переадресация с разных ячеек
2011-11-29 16:17 http://forum.msexcel.ru/profiles/milanac-u19092.html
та формула, что накрапая - неуниверсальная, т.е. сначала пишем формулу в первую левую ячейку, жмем контр+шифт+энтер, а потом копируем на весь диапазон

как выход из ситуации предлагаю для формулы задать имя (формулы-присвоить имя (пишем наример "формула") а в диапазон копируем формулу), тогда не нада будет использовать контрл+шифт+энтер

Попробовал создать с нуля то же самое, ввел эту формулу в ГрафикПродаж, только вот не могу понять почему он даты неправильно воспринимает, в ГрафикеПродаж вместо данных от 01.01.2012 отображает данные 02.01.2012 В замешательстве

iron priest>> Re: Переадресация с разных ячеек
2011-11-29 16:35 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
=ЕСЛИОШИБКА(ИНДЕКС(База!$D$1:$D$5000;НАИМЕНЬШИЙ(ЕСЛИ($F3=База!$C$1:$C$5000;СТРОКА(База!$D$1:$D$5000);"");СТОЛБЕЦ()-1));"")

и избавьтесь от вспомогательных данных. для даты установите формат ячейки ДД.ММ.ГГ", " дддд

Alexxey>> Re: Объединить массивы
2011-11-29 19:34 http://forum.msexcel.ru/profiles/alexxey-u21920.html
Спасибо за помощь! Понять бы еще и формульный вариант... Буду изучать

Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-30 08:20 http://forum.msexcel.ru/profiles/mobsman-u86271.html
Есть ли функция для диапазона, есть дата если она попадает в интервал дат тогда = значение например 11.11.11 и интервал 07.11.11 по 30.11.11 если 11.11.11 попадает в интервал тогда что то будет, или только все делается через услове  if then

_Boroda_>> Re: Фопросы по USERFORM кредит
2011-11-30 08:39 http://forum.msexcel.ru/profiles/boroda-u12234.html
Цитировать
А при чем тут Enabled?
Value нужно
Цитировать
Есть ли функция для диапазона, есть дата если она попадает в интервал дат тогда = значение например 11.11.11 и интервал 07.11.11 по 30.11.11 если 11.11.11 попадает в интервал тогда что то будет, или только все делается через услове  if then
И чего?
Еще раз -
нужно написать не OptionButton7.Enabled, а OptionButton7.Value

Enabled показывает, достижим ли для пользователя этот элемент управления

Mobsman>> Re: Фопросы по USERFORM кредит
2011-11-30 08:46 http://forum.msexcel.ru/profiles/mobsman-u86271.html
Цитировать
А при чем тут Enabled?
Value нужно
Цитировать
Есть ли функция для диапазона, есть дата если она попадает в интервал дат тогда = значение например 11.11.11 и интервал 07.11.11 по 30.11.11 если 11.11.11 попадает в интервал тогда что то будет, или только все делается через услове  if then
И чего?
Еще раз -
нужно написать не OptionButton7.Enabled, а OptionButton7.Value

Enabled показывает, достижим ли для пользователя этот элемент управления

Я вообще не про кнопки я про вопрос в целом про диапазон, к кнопкам отношение не имеет
сть ли функция для диапазона, есть дата если она попадает в интервал дат тогда = значение например 11.11.11 и интервал 07.11.11 по 30.11.11 если 11.11.11 попадает в интервал тогда что то будет, или только все делается через услове  if then



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

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


В избранное