Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » Excel-Starter
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1 2 След.
Aвтоподстановкa значений в несколько ячеек для поочередного перебора, подстановка значений в 10 ячеек, от которых зависит значение контрольной ячейки, "Поиск решений" или макрос?
 
#
08.09.2017 15:02:21
MCH

Скрытый текст

А как поменять генератор случайных чисел, если числа (AI1-AI10) могут повторяться?

Изменено: Excel-Starter - 08.09.2017 15:03:04
 
Перейти    
Составление рейтинга повторяемости значений с указанием позиции в рейтинге на момент участия в рейтниге
 
#
15.08.2017 18:40:59

Прошу помощи - не могу добиться нужного результата.
Нужно составить список, где в колонке А сверху вниз указываются разные числовые значения, а в колонке В рядом соотв. место каждого рядомстоящего числа из колонки А, которое занимало данное число, если смотреть все предыдущие значения колонки А в зависимости от количества повторов числа из колонкe А в предыдущих строках.
Т.е. сначала у всех чисел один рейтинг 1, после первого появления числа в списке у него рейтинг становится 1 (первое место, т.к. оно уже есть 1 раз, а других ни одного), у всех остальных 2 (второе место), но рядом с первым числом по прежнему 1, т.к. в колонке В показан рейтинг числа к моменту его появления в списке.

Рейтинг:
Число 1 - 1 место
Остальные числа - 2 место

Далее, когда в списке появляется новое, еще не встречавшееся число, то рейтинг у него 2 (к моменту появления).

Рейтинг:
Число 1 - 1 место
Число 2 - 1 место
Остальные числа - 2 место

Второй раз появилось в списке число 1 - соотв. у него в колонке рейтинг 1 (оно уже было на первом месте и выпало снова), а у следующего еще не пявлявшегося числа рейтинг 3:
Рейтинг:
Число 1 - 1 место
Число 2 - 2 место
Остальные числа - 3 место

И так далее (наглядно видно в примере).

Через какое-то время новых чисел появляться в таблице не будет, но им всем надо присваивать рейтинг в зависимости от того, сколько раз они втречались в предыдущих строках по отношению к другим числам.

Как это реализовать? Пытался формулой =СЧЁТ (1/ЧАСТОТА (($A$4:A4<A5)*$A$4:A4;$A$4:A4)) - результаты не те, что надо (см. пример).

Заранее спасибо!

Изменено: Excel-Starter - 15.08.2017 20:18:44
 
Перейти    
Копирование одного и того же листа в несколько книг одновременно
 
#
01.08.2017 12:45:55

Sanja, по ссылке макрос почему-то не видит файлы .XLSM.

Все файлы, в которые надо добавить лист активного/открытого файла лежат в той же папке, где главный файл.
 
Перейти    
Копирование одного и того же листа в несколько книг одновременно
 
#
01.08.2017 11:22:45
Как реализовать добавление одного и того же листа из книги Excel в несколько других книг, чтоб не нужно было их открывать по одной в ручную и копировать?
 
Перейти    
Условное форматирование: ошибка c СЧЁТЕСЛИ
 
#
22.06.2017 17:33:50
AlexM

Спасибо!
 
Перейти    
Условное форматирование: ошибка c СЧЁТЕСЛИ
 
#
22.06.2017 17:01:55

Сергей П

Спасибо!

А маска какая-то существует, чтоб не конкретную ячейку XFD1048576 заносить, а как на весь столбец указание A:F, но исключая первую строку?
 
Перейти    
Условное форматирование: ошибка c СЧЁТЕСЛИ
 
#
22.06.2017 16:50:28

Спасибо!

Там сейчас диапазон задан:

=$A$2:$F$50

А как сделать, чтоб действовало форматирование на все колонки, сколько бы строк в них не было (они пополняются)

Изменено: Excel-Starter - 22.06.2017 16:55:26
 
Перейти    
Условное форматирование: ошибка c СЧЁТЕСЛИ
 
#
22.06.2017 16:22:06

Подскажите пожалуйста, что я делаю неправильно? Есть таблица из 6 столбцов (дополняется). В каждой ячейке числа. Требуется условным форматированием окрасить красным цветом числа в тех ячейках, значение которых совпадает со значением минимум одной из ячеек предыдущей строки. И так на все ячейки.

Пытался добиться этого формулой:

СЧЁТЕСЛИ(A1:F1;A2)>0

(диапазон: =$A:$F)

безрезультатно  (см. пример): совершенно не понимаю по какой логике проиcxодит окрас и как исправить формулу, чтоб добиться нужного результата. Заранее спасибо!

Изменено: Excel-Starter - 22.06.2017 16:47:01
 
Перейти    
Поиск значения в верхнем диапазоне строк
 
#
19.04.2016 17:33:31
vikttur, Спасибо! Работает!
 
Перейти    
Поиск значения в верхнем диапазоне строк
 
#
19.04.2016 17:06:37
vikttur,
Цитата
=ЕСЛИОШИБКА(6-ПОИСКПОЗ(2;1/МУМНОЖ(--($A$1:$F$6=A7);{1:1:1:1:1:1}));)
на первой "1" после квадратной скобки курсор ошибки
 
Перейти    
Поиск значения в верхнем диапазоне строк
 
#
19.04.2016 17:03:09
vikttur, " );{1 " Excel не дает сохранить в ячейке формулу - пишет ошибка

V, так требуется поиск значения именно по нескольким столбцам, по всем  шести: В какой строке нашлось совпадение - до нее и считаем количество строк
Изменено: Excel-Starter - 19.04.2016 17:05:19
 
Перейти    
Поиск значения в верхнем диапазоне строк
 
#
19.04.2016 16:39:36
V, ошибка получается.
 
Перейти    
Поиск значения в верхнем диапазоне строк
 
#
19.04.2016 16:16:51
Сергей, Пример приложен.
Dima S, Там очень похоже, но не в обратном порядке, насколько я понял.
V, Но тут кажется нет проверки совпадения значения
 
Перейти    
Поиск значения в верхнем диапазоне строк
 
#
19.04.2016 15:45:08
Имеется пополняемая таблица из 6 колонок с числами. В каждой строке числа не повторяются.
Требуется получить значение - количество строк между значением (числом) заданной ячейки до ближайшей строки (снизу вверх!), где встречается данное значение (число).
Т.е. у нас набор чисел, допустим:
42 30 29 16 13 1
48 47 31 23 13 5
40 37 25 15 10 7
49 48 16 10 8 1
46 43 37 33 10 7
49 46 37 32 13 10
48 42 39 30 26 20

Нужно, чтоб в новой ячейке, которая будет "проверять" нижнюю первую слева ячейку, где "48", выдавалось значение "2", т.к. следующее совпадение-число "48" есть в строке, отстоящей на 2 от проверяемой.
Соотв. рядом проверяем "42", и получаем значение "5" (т.к. "42" есть только в первой строке, отстоящей на 5 строк от проверяемой) и т.п.

Как это реализовать? Подозреваю, что нужно брать ВПР & ИНДЕКС / Поискпоз, но как конкретно?

Заранее спасибо!
Изменено: Excel-Starter - 19.04.2016 15:45:27
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
30.10.2015 15:44:54
Пытливый, больше никаких, без макросов.
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
30.10.2015 14:57:01
Пытливый
У меня вылазит ошибка

В финальной таблице каждый следующий подход требуется нажимать "Continue" для продолжения исполнения скрипта: для каждой строчки.

(B AM1 - ячейке находится номер последней заполненной строки)
Изменено: Excel-Starter - 30.10.2015 14:57:39
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
30.10.2015 12:07:31
Довел код до такого вида: все равно не работает, где-то ошибка.
Код
Sub Makro()
    Dim i As Long
    For i = 1 To Range("AM1")
        Range("bj1:bj6").FormulaArray = "=TRANSPOSE(A" & i & ":F" & i & ")"
        Range("G" & i) = Range("BK1")
    Next i
End Sub
Изменено: Excel-Starter - 30.10.2015 14:48:24
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
29.10.2015 21:16:19
Вот версия таблицы, более похожая на финальную. Скрипт доходит до 15-60 строки и прерывается...
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
29.10.2015 19:56:15
Пытливый
Благодарю! Выглядет - оптимально, но не срабатывает. Прерывается на строке
Код
Range("G" & lngI) = Range("BK1")
Прерывается на заполнении то 48, то 40, то 34, то 15 строки (каждый раз по-разному)
Изменено: Excel-Starter - 29.10.2015 20:42:56
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
29.10.2015 19:00:32
Пытливый
В исходной таблице такое простое решение не годится, там обязательно нужно переписывать значения, иначе не посчитается результат в ячейке BK1
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
29.10.2015 18:41:48
Пытливый
Надо чтоб после запуска макроса подтсавлялись значения из ячеек А1-F1 в ячейки ВJ1-ВJ6 , далее получившееся в результате этого значение из ячейки BK1 копировалось в ячейку G1,
далее все повторяется со второй строкой:
после запуска макроса подтсавлялись значения из ячеек А2-F2 в ячейки ВJ1-ВJ6 , далее получившееся в результате этого значение из ячейки BK1 копировалось в ячейку G2,
и так далее, до момента, когда следующая строка оказывается пустой.

yoozhik
Это пример более простой таблицы, чем исходная: в исходной более сложные связи и формулы, которые на смысл макроса не влияют.
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
29.10.2015 17:31:38
Hugo
Скобку добавлял - не помогает...
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
29.10.2015 17:14:13
Прикладываю упрощенный пример
Изменено: Excel-Starter - 29.10.2015 17:29:57
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
29.10.2015 16:11:37
Не помогло:
Compile Error: Expected List Separator or )

Range(cells(J, "A"), cells(J, "F").Copy Cells(j, "G")
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
29.10.2015 15:53:12
Ошибка в строке:
Range(cells(J, "A"), cells(J, "F").Copy Cells(J, G)
Брал ее из кода в Вашем сообщении
Код
For J = 1 to I
Range(cells(J, "A"), cells(J, "F").Copy Cells(J, G)
Next J
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
29.10.2015 15:35:07
Hugo, убрал

Пытливый, заменил:
Скрытый текст

выдается ошибка.
Изменено: Excel-Starter - 29.10.2015 16:34:57
 
Перейти    
Обработка строк макросом в цикле до первой пустой строки, оптимизация записанного средствами Excel макроса
 
#
29.10.2015 14:26:09
Добрый день.

Имеется следующий (записанный средствами Excel) макрос:
Скрытый текст
В нем записаны "проходы" для первых двух строк таблицы, по которым он работает (выполняет одни и те же действия для каждой из заданных строк). Как оптимизировать его таким образом, чтоб скрипт был по-короче (например с использованием FOR TO для подстановки номеров строк (отмечены красным)) и "обрабатывал" все строки, дойдя до первой пустой строки (строки постоянно дополняются, сейчас первыми пустыми явяются строки A270:F270).
(действия для всех строк одинаковы, единственное что меняется, если вбивать макрос вручную, это отмеченные красным ячейки (т.е. A1:F1 / A2:F2 / A3:F3 и т.п. и  G1/G2/G3 и т.п.).

Заранее спасибо!
Изменено: Excel-Starter - 29.10.2015 22:17:26
 
Перейти    
Aвтоподстановкa значений в несколько ячеек для поочередного перебора, подстановка значений в 10 ячеек, от которых зависит значение контрольной ячейки, "Поиск решений" или макрос?
 
#
24.09.2015 14:41:03
А как сделать, чтоб "Поиск значений" "Эволюционным алгоритмом" искал варианты подольше? В настройках метода выставил максимальное время поиска без лучшего результата 3600 секунд, все равно ищет максимум 10 минут...
 
Перейти    
Aвтоподстановкa значений в несколько ячеек для поочередного перебора, подстановка значений в 10 ячеек, от которых зависит значение контрольной ячейки, "Поиск решений" или макрос?
 
#
23.09.2015 15:42:17
Работает.
Еще раз благодарю!
Изменено: Excel-Starter - 23.09.2015 18:57:39
 
Перейти    
Aвтоподстановкa значений в несколько ячеек для поочередного перебора, подстановка значений в 10 ячеек, от которых зависит значение контрольной ячейки, "Поиск решений" или макрос?
 
#
23.09.2015 13:44:05
MCH
Ок, спасибо!
Изменено: Excel-Starter - 23.09.2015 13:47:06
 
Перейти    
Страницы: 1 2 След.
Наверх