Домашняя страница Undo Do Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Записи участника (krosav4ig) - Мир MS Excel

Старая форма входа
Мир MS Excel » Записи участника » krosav4ig [2323]
Результаты поиска
krosav4ig Дата: Суббота, 10.09.2016, 21:17 | Сообщение № 1121 | Тема: Как программно протянуть формулы при добавлении строк
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
как вариант, формула [vba]
Код
=ЕСЛИ([@Блоки]="";"";СУММ([@Урок:Урок]:ИНДЕКС([Урок]:[Урок];СТРОКА()+ПОИСКПОЗ([[#Заголовки];[Блок]];ИНДЕКС([Блоки];СТРОКА()-1):[[#Итоги];[Блоки]];)-1-СТРОКА([#Заголовки]))))
[/vba]
К сообщению приложен файл: 8452831.xlsx (15.8 Kb)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Суббота, 10.09.2016, 21:18
 
Ответить
Сообщениекак вариант, формула [vba]
Код
=ЕСЛИ([@Блоки]="";"";СУММ([@Урок:Урок]:ИНДЕКС([Урок]:[Урок];СТРОКА()+ПОИСКПОЗ([[#Заголовки];[Блок]];ИНДЕКС([Блоки];СТРОКА()-1):[[#Итоги];[Блоки]];)-1-СТРОКА([#Заголовки]))))
[/vba]
Автор - krosav4ig
Дата добавления - 10.09.2016 в 21:17
krosav4ig Дата: Пятница, 09.09.2016, 13:40 | Сообщение № 1122 | Тема: Подсчет остатка сумм по договорам
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
или так (формула массива, вводится комбинацией Ctrl+Shift+Enter)
Код
=ВПР(G6&H6;ЕСЛИ({1;0};B$6:B$10&C$6:C$10;D$6:D$10);2;)-СУММЕСЛИМН(E$6:E$10;B$6:B$10;G6;C$6:C$10;H6)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеили так (формула массива, вводится комбинацией Ctrl+Shift+Enter)
Код
=ВПР(G6&H6;ЕСЛИ({1;0};B$6:B$10&C$6:C$10;D$6:D$10);2;)-СУММЕСЛИМН(E$6:E$10;B$6:B$10;G6;C$6:C$10;H6)
Автор - krosav4ig
Дата добавления - 09.09.2016 в 13:40
krosav4ig Дата: Среда, 07.09.2016, 22:40 | Сообщение № 1123 | Тема: После табуляции сделать текст жирным
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Цитата drugojandrew, 07.09.2016 в 09:14, в сообщении № 3
где можно найти информацию по этим символам?

вот тут можно почитать
коды символов можно посмотреть тут

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение
Цитата drugojandrew, 07.09.2016 в 09:14, в сообщении № 3
где можно найти информацию по этим символам?

вот тут можно почитать
коды символов можно посмотреть тут
Автор - krosav4ig
Дата добавления - 07.09.2016 в 22:40
krosav4ig Дата: Вторник, 06.09.2016, 19:33 | Сообщение № 1124 | Тема: После табуляции сделать текст жирным
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Здравствуйте
Главная>редактирование>заменить
В поле Найти пишем ^9*[^13^l]
В поле Заменить пишем ^&
жмем Больше>формат>шрифт, выбираем полужирный, ОК
Тык по галке Подстановочные знаки
Тык по кнопке Заменить все

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеЗдравствуйте
Главная>редактирование>заменить
В поле Найти пишем ^9*[^13^l]
В поле Заменить пишем ^&
жмем Больше>формат>шрифт, выбираем полужирный, ОК
Тык по галке Подстановочные знаки
Тык по кнопке Заменить все
Автор - krosav4ig
Дата добавления - 06.09.2016 в 19:33
krosav4ig Дата: Вторник, 06.09.2016, 17:13 | Сообщение № 1125 | Тема: Разделение столбца по кол-ву записей.
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Код
=ИНДЕКС($A:$A;(СТОЛБЕЦ()-2)*15000+СТРОКА())

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение
Код
=ИНДЕКС($A:$A;(СТОЛБЕЦ()-2)*15000+СТРОКА())
Автор - krosav4ig
Дата добавления - 06.09.2016 в 17:13
krosav4ig Дата: Понедельник, 05.09.2016, 23:04 | Сообщение № 1126 | Тема: Номер комбинации перестановки
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
у мну оказывается первая формула 91, вторая 156 (забыл ФАКТР() сократить :( )
1 для лексиграфического порядка 97 символов
Код
=СУММ(МУМНОЖ(Ч(ТРАНСП(A1:E1)>ЕСЛИ({1:2:3:4:5}<{1;2;3;4;5};A1:E1));{1:1:1:1:1})*ФАКТР({4:3:2:1:0}))

2 для антилексиграфического порядка 162 символа (уверен, что можно сократить, но до этого никак не дошло)
Код
=СУММ(МУМНОЖ(Ч(ПРОСМОТР(-{1:2:3:4:5};-{5:4:3:2:1};O1:S1)<ЕСЛИ({1:2:3:4:5}<{1;2;3;4;5};ПРОСМОТР(-{1;2;3;4;5};-{5:4:3:2:1};O1:S1);));{1:1:1:1:1})*ФАКТР({4:3:2:1:0}))

универсальные формулы генерации (массивные, волатильные, генерация перебором, жуть прям %) ) для лексиграфического и антилексиграфического порядков, обе 334
Код
=ИНДЕКС(ОСТАТ(ЦЕЛОЕ((СТРОКА(СМЕЩ(A$1;;;$Y$1^$W$1))-1)/($Y$1^(СТОЛБЕЦ(СМЕЩ($A1;;;;$W$1))-1)));$Y$1);НАИМЕНЬШИЙ(ЕСЛИ(ПОДСТАВИТЬ(МУМНОЖ(10^(1+ОСТАТ(ЦЕЛОЕ((СТРОКА(СМЕЩ(A$1;;;$Y$1^$W$1))-1)/($Y$1^(СТОЛБЕЦ(СМЕЩ($A1;;;;$W$1))-1)));$Y$1));СТРОКА(СМЕЩ(A$1;;;$W$1))^0);0;)=ПОВТОР(1;$W$1);СТРОКА(СМЕЩ(A$1;;;$Y$1^$W$1)));$G1+1);$W$1-СТОЛБЕЦ(A1)+1)

Код
=ИНДЕКС($Y$1-1-ОСТАТ(ЦЕЛОЕ((СТРОКА(СМЕЩ(A$1;;;$Y$1^$W$1))-1)/($Y$1^(СТОЛБЕЦ(СМЕЩ($A1;;;;$W$1))-1)));$Y$1);НАИМЕНЬШИЙ(ЕСЛИ(ПОДСТАВИТЬ(МУМНОЖ(10^(1+ОСТАТ(ЦЕЛОЕ((СТРОКА(СМЕЩ(A$1;;;$Y$1^$W$1))-1)/($Y$1^(СТОЛБЕЦ(СМЕЩ($A1;;;;$W$1))-1)));$Y$1));СТРОКА(СМЕЩ(A$1;;;$W$1))^0);0;)=ПОВТОР(1;$W$1);СТРОКА(СМЕЩ(A$1;;;$Y$1^$W$1)));$G1+1);СТОЛБЕЦ(A1))
К сообщению приложен файл: N_Perest.xlsx (59.1 Kb)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеу мну оказывается первая формула 91, вторая 156 (забыл ФАКТР() сократить :( )
1 для лексиграфического порядка 97 символов
Код
=СУММ(МУМНОЖ(Ч(ТРАНСП(A1:E1)>ЕСЛИ({1:2:3:4:5}<{1;2;3;4;5};A1:E1));{1:1:1:1:1})*ФАКТР({4:3:2:1:0}))

2 для антилексиграфического порядка 162 символа (уверен, что можно сократить, но до этого никак не дошло)
Код
=СУММ(МУМНОЖ(Ч(ПРОСМОТР(-{1:2:3:4:5};-{5:4:3:2:1};O1:S1)<ЕСЛИ({1:2:3:4:5}<{1;2;3;4;5};ПРОСМОТР(-{1;2;3;4;5};-{5:4:3:2:1};O1:S1);));{1:1:1:1:1})*ФАКТР({4:3:2:1:0}))

универсальные формулы генерации (массивные, волатильные, генерация перебором, жуть прям %) ) для лексиграфического и антилексиграфического порядков, обе 334
Код
=ИНДЕКС(ОСТАТ(ЦЕЛОЕ((СТРОКА(СМЕЩ(A$1;;;$Y$1^$W$1))-1)/($Y$1^(СТОЛБЕЦ(СМЕЩ($A1;;;;$W$1))-1)));$Y$1);НАИМЕНЬШИЙ(ЕСЛИ(ПОДСТАВИТЬ(МУМНОЖ(10^(1+ОСТАТ(ЦЕЛОЕ((СТРОКА(СМЕЩ(A$1;;;$Y$1^$W$1))-1)/($Y$1^(СТОЛБЕЦ(СМЕЩ($A1;;;;$W$1))-1)));$Y$1));СТРОКА(СМЕЩ(A$1;;;$W$1))^0);0;)=ПОВТОР(1;$W$1);СТРОКА(СМЕЩ(A$1;;;$Y$1^$W$1)));$G1+1);$W$1-СТОЛБЕЦ(A1)+1)

Код
=ИНДЕКС($Y$1-1-ОСТАТ(ЦЕЛОЕ((СТРОКА(СМЕЩ(A$1;;;$Y$1^$W$1))-1)/($Y$1^(СТОЛБЕЦ(СМЕЩ($A1;;;;$W$1))-1)));$Y$1);НАИМЕНЬШИЙ(ЕСЛИ(ПОДСТАВИТЬ(МУМНОЖ(10^(1+ОСТАТ(ЦЕЛОЕ((СТРОКА(СМЕЩ(A$1;;;$Y$1^$W$1))-1)/($Y$1^(СТОЛБЕЦ(СМЕЩ($A1;;;;$W$1))-1)));$Y$1));СТРОКА(СМЕЩ(A$1;;;$W$1))^0);0;)=ПОВТОР(1;$W$1);СТРОКА(СМЕЩ(A$1;;;$Y$1^$W$1)));$G1+1);СТОЛБЕЦ(A1))
Автор - krosav4ig
Дата добавления - 05.09.2016 в 23:04
krosav4ig Дата: Понедельник, 05.09.2016, 00:40 | Сообщение № 1127 | Тема: Составление списка групп и количества пользователей в них
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
еще вариант, без формул, с использованием надстройки Power Query
К сообщению приложен файл: 7183958.xlsx (26.9 Kb)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Понедельник, 05.09.2016, 00:43
 
Ответить
Сообщениееще вариант, без формул, с использованием надстройки Power Query
Автор - krosav4ig
Дата добавления - 05.09.2016 в 00:40
krosav4ig Дата: Суббота, 03.09.2016, 22:24 | Сообщение № 1128 | Тема: Окно ввода данных
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Здравствуйте.
как-то так, наверное
[vba]
Код
Private Sub CommandButton1_Click()
    [Титул!E10].Formula = TextBox1
    [Титул!E16].Formula = TextBox2
    [Титул!C18].Formula = TextBox3
    ['таб расчетов'!P1].Formula = ComboBox2
    [Прочность!BA5,Прочность!BA8,Прочность!BA11].Formula = TextBox2
End Sub
[/vba]
К сообщению приложен файл: 1206726.xlsm (53.5 Kb)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеЗдравствуйте.
как-то так, наверное
[vba]
Код
Private Sub CommandButton1_Click()
    [Титул!E10].Formula = TextBox1
    [Титул!E16].Formula = TextBox2
    [Титул!C18].Formula = TextBox3
    ['таб расчетов'!P1].Formula = ComboBox2
    [Прочность!BA5,Прочность!BA8,Прочность!BA11].Formula = TextBox2
End Sub
[/vba]
Автор - krosav4ig
Дата добавления - 03.09.2016 в 22:24
krosav4ig Дата: Пятница, 02.09.2016, 14:58 | Сообщение № 1129 | Тема: Автозаполнение по 3 ячейки с шагом - 1
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
пробуйте формулу
Код
=ОТБР((СТРОКА()-1)/3)+1

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениепробуйте формулу
Код
=ОТБР((СТРОКА()-1)/3)+1
Автор - krosav4ig
Дата добавления - 02.09.2016 в 14:58
krosav4ig Дата: Пятница, 02.09.2016, 14:55 | Сообщение № 1130 | Тема: экспорт XML в XLS
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Цитата potapov14, 02.09.2016 в 14:46, в сообщении № 1
Может есть возможность
есть
по картинке не лечим
тык

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение
Цитата potapov14, 02.09.2016 в 14:46, в сообщении № 1
Может есть возможность
есть
по картинке не лечим
тык
Автор - krosav4ig
Дата добавления - 02.09.2016 в 14:55
krosav4ig Дата: Четверг, 01.09.2016, 16:07 | Сообщение № 1131 | Тема: Формат ячеек: Д" д." чч" ч."
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
[offtop]antycapral, это я знаю :) , подтупливаю я потому, что сам не использовал эту функцию[/offtop]

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение[offtop]antycapral, это я знаю :) , подтупливаю я потому, что сам не использовал эту функцию[/offtop]
Автор - krosav4ig
Дата добавления - 01.09.2016 в 16:07
krosav4ig Дата: Четверг, 01.09.2016, 16:03 | Сообщение № 1132 | Тема: Ошибка в сравнении большего с меньшим временем
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Цитата Nikitos79, 01.09.2016 в 15:54, в сообщении № 4
два тире в формуле, что они делают???

Что такое -- или как превратить ИСТИНА в 1, а ЛОЖЬ в 0?

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение
Цитата Nikitos79, 01.09.2016 в 15:54, в сообщении № 4
два тире в формуле, что они делают???

Что такое -- или как превратить ИСТИНА в 1, а ЛОЖЬ в 0?
Автор - krosav4ig
Дата добавления - 01.09.2016 в 16:03
krosav4ig Дата: Четверг, 01.09.2016, 15:47 | Сообщение № 1133 | Тема: Ошибка в сравнении большего с меньшим временем
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
а все из-за того, что в F10 текст
формулы должны быть такими
Код
=ЕСЛИ(E10>--F10;E10-F10;"")
Код
=ЕСЛИ(E10<--F10;F10-E10;"")

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеа все из-за того, что в F10 текст
формулы должны быть такими
Код
=ЕСЛИ(E10>--F10;E10-F10;"")
Код
=ЕСЛИ(E10<--F10;F10-E10;"")
Автор - krosav4ig
Дата добавления - 01.09.2016 в 15:47
krosav4ig Дата: Четверг, 01.09.2016, 15:22 | Сообщение № 1134 | Тема: Функция суммеслимн по нескольким условиям
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
вот так должно работать (массивная формула)
Код
=СУММ(СУММЕСЛИ(Регионы!$D$16:$D$10000;ЕСЛИ(C4:F4<>"";"*")&C4:F4;Регионы!E$16:E$10000))

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Четверг, 01.09.2016, 15:23
 
Ответить
Сообщениевот так должно работать (массивная формула)
Код
=СУММ(СУММЕСЛИ(Регионы!$D$16:$D$10000;ЕСЛИ(C4:F4<>"";"*")&C4:F4;Регионы!E$16:E$10000))
Автор - krosav4ig
Дата добавления - 01.09.2016 в 15:22
krosav4ig Дата: Четверг, 01.09.2016, 15:17 | Сообщение № 1135 | Тема: Формат ячеек: Д" д." чч" ч."
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
[offtop]
Цитата AlexM, 01.09.2016 в 14:26, в сообщении № 5
ЧАС

че-то я подтупливаю :( [/offtop]

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение[offtop]
Цитата AlexM, 01.09.2016 в 14:26, в сообщении № 5
ЧАС

че-то я подтупливаю :( [/offtop]
Автор - krosav4ig
Дата добавления - 01.09.2016 в 15:17
krosav4ig Дата: Четверг, 01.09.2016, 13:08 | Сообщение № 1136 | Тема: Формат ячеек: Д" д." чч" ч."
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
здравствуйте
как вариант
формула
Код
=ОТБР(K4)/1%+ОТБР(ОСТАТ(K4*24;24))
и числовой формат 00" д." 00" ч."
формула
Код
=ОТБР(K4)+ОКРУГЛВНИЗ(ОСТАТ(K4;1)*24%;2)
и числовой формат 00" д.",00" ч."

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениездравствуйте
как вариант
формула
Код
=ОТБР(K4)/1%+ОТБР(ОСТАТ(K4*24;24))
и числовой формат 00" д." 00" ч."
формула
Код
=ОТБР(K4)+ОКРУГЛВНИЗ(ОСТАТ(K4;1)*24%;2)
и числовой формат 00" д.",00" ч."
Автор - krosav4ig
Дата добавления - 01.09.2016 в 13:08
krosav4ig Дата: Среда, 31.08.2016, 18:04 | Сообщение № 1137 | Тема: Создать список на 1млрд
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Цитата artemyt, 31.08.2016 в 17:51, в сообщении № 1
список от 1 до 1млрд

зачем? shock
в столбец A:A целиком пишем формулу
Код
=(СТОЛБЕЦ()-1)*4^10+строка()
и тянем вправо до ARJ:ARJ %)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение
Цитата artemyt, 31.08.2016 в 17:51, в сообщении № 1
список от 1 до 1млрд

зачем? shock
в столбец A:A целиком пишем формулу
Код
=(СТОЛБЕЦ()-1)*4^10+строка()
и тянем вправо до ARJ:ARJ %)
Автор - krosav4ig
Дата добавления - 31.08.2016 в 18:04
krosav4ig Дата: Среда, 31.08.2016, 14:00 | Сообщение № 1138 | Тема: Номер комбинации перестановки
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Цитата MCH, 31.08.2016 в 12:43, в сообщении № 12
5 из 36

:'( это ж 36!/31!=45239040 комбинаций
лучше тада ужо 7 из 49 (49!/42!=432938943360 комбинаций) %)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Среда, 31.08.2016, 14:26
 
Ответить
Сообщение
Цитата MCH, 31.08.2016 в 12:43, в сообщении № 12
5 из 36

:'( это ж 36!/31!=45239040 комбинаций
лучше тада ужо 7 из 49 (49!/42!=432938943360 комбинаций) %)
Автор - krosav4ig
Дата добавления - 31.08.2016 в 14:00
krosav4ig Дата: Вторник, 30.08.2016, 17:04 | Сообщение № 1139 | Тема: Скопировать строки по значению (по столбцу)
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
можно так
[vba]
Код
Sub test()
    With Application: .ScreenUpdating = 0: .EnableEvents = 0
    With Me.UsedRange
        .AutoFilter Field:=5, Criteria1:="1"
        .Copy: Me.Next.[A1].PasteSpecial 8, xlNone, False, False
        .Copy Me.Next.[A1]
        .AutoFilter
    End With
    .ScreenUpdating = 1: .EnableEvents = 1: End With
End Sub
[/vba]
К сообщению приложен файл: ntcn.xlsm (23.6 Kb)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеможно так
[vba]
Код
Sub test()
    With Application: .ScreenUpdating = 0: .EnableEvents = 0
    With Me.UsedRange
        .AutoFilter Field:=5, Criteria1:="1"
        .Copy: Me.Next.[A1].PasteSpecial 8, xlNone, False, False
        .Copy Me.Next.[A1]
        .AutoFilter
    End With
    .ScreenUpdating = 1: .EnableEvents = 1: End With
End Sub
[/vba]
Автор - krosav4ig
Дата добавления - 30.08.2016 в 17:04
krosav4ig Дата: Вторник, 30.08.2016, 16:14 | Сообщение № 1140 | Тема: Если текст содержит, то строка заливается
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
на диапазон A1:F9 условное форматирование по формуле
Код
=ПОИСК("итог";$F1)
К сообщению приложен файл: 0517146.xlsx (9.4 Kb)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениена диапазон A1:F9 условное форматирование по формуле
Код
=ПОИСК("итог";$F1)
Автор - krosav4ig
Дата добавления - 30.08.2016 в 16:14
Мир MS Excel » Записи участника » krosav4ig [2323]
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2026 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!