» Excel FAQ (часть 3)

griin
Цитата:

Как действие этого условного форматирования распространить на всю стороку

Условное форматирование применяется к выделенным ячейчам. Т.е. тебе надо выделить или несколько ячеек или строку целиком.

Цитата:

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

Если нужно скопировать это условное обозначение на другие ячейки, то можно пользоваться кисточкой (формат по образцу). Надо обратить внимание, чтобы в формуле в условном форматировании не было $.

w25

Цитата:

Можно поставить Classic menu для Office 2007

А назад потом фейс 2007 можно вернуть?

lucky_Luk
будет и старый и новый вместе. Новая закладка добавится "Меню"

А можно ли каким-то образом вставить в формулу вызов макроса? То есть нужна кострукция типа:

Цитата:

=ЕСЛИ(условие; вызов макроса 1; вызов макроса 2)

Добавлено:
И еще такой вопрос. С условным форматированием разобрался, удобная штука, но я никак не могу понять, как сохранить это условное форматирование, чтобы не делать кучу одинаковых мышедвижений для каждой ячейки, к которой я хочу применить это форматирование, а обойтись одним кликом по, например, кнопке или пункуту меню. У меня Офис 2007.

Друзья,
Пример:
http://slil.ru/24626731

Как сделать так чтобы ПРИ ПЕЧАТИ строки с размерными сетками(голубой цвет)(например S,M,L,XL,XXL,3XL)
для каждой группы товаров (Брюки,костюмы,куртки,...)
перескакивали на следующую страницу.
Если бы была одна размерная сетка для всех групп товаров
я бы сделал её сквозную,но к сожалению она разная для всех групп.

Как проверить установлена ли ODBC?

SERGE_BLIZNUK

Цитата:

А пока воспользуйтесь макросом для удаления пустых строк

у Уокенбаха проще:

Sub DeleteEmptyRows()
Dim LastRow As Long, r As Long
LastRow = ActiveSheet.UsedRange.Rows.Count
LastRow = LastRow + ActiveSheet.UsedRange.Row - 1
Application.ScreenUpdating = False
For r = LastRow To 1 Step -1
If Application.CountA(Rows(r)) = 0 Then Rows(r).Delete
Next r
End Sub

Есть столбец с числами, в столбце строк около 700. Мне необходимо все числа в ячейках этого столбца увеличить на 12 (то есть, к примеру с ячейки А1 по А700)Как это проще сделать- другими словами, подскажите формулу для Excel. Я понимаю, что это должно быть просто - но сказывается отсутсвие опыта работы с этой программой.

заранее спасибо

sashko1980
Тут кто-то делал это лучше и проще чем будет сейчас у меня. Есть какой-то хитрый способ. А я по старинке. в B1 забиваешь формулу =A1*12
Разгоняешь эту формулу на 700 строк вниз. Далее выделяешь ячейки B1:B700, нажимаешь Копировать, встаешь в ячейку А1 и Правка -> Специальная вставка -> Значения

sashko1980
В любом месте книги поставь 12 -> Ctrl + C (скопировать "12") -> Выделяешь столбик -> Специальная вставка - поставить галочку "Умножить". Все значения выделенного диапазона умножатся на 12.

sashko1980
Цитата:

увеличить на 12

w25
Цитата:

поставить галочку "Умножить".

Всё так, только нужно поставить галочку "Сложить"... ;-))


aks_sv

Цитата:

у Уокенбаха проще:

да... Спасибо. самый главный трюк, который я упустил - проход снизу вверх - от последней строчки до первой... и работает макрос в три раза быстрее.
Один маленький недостаток - в данном случае НЕ СРАБОТАЕТ!! (я не знаю, что даёт CountA(...) - сейчас ищу, но, думаю, что дело в том, что для ячеек в пустых строчках не возращается IsEmpty - там строчки из пробелов... ;-(((( )

Добавлено:
aks_sv - если не сложно, подскажите, пожалуйста, где именно у Уокенбаха Вы нашли этот код...

SERGE_BLIZNUK

Цитата:

где именно у Уокенбаха Вы нашли этот код...

Проф.программирование на VBA в Excel 2002
Часть III, Глава 11, работа с диапазонами стр.278

вопрос: при форматировании листа не могу выделить цветом ни ячейку, ни шрифт (ячейка остаётся белая, а шрифт чёрным), хотя на другом компе этот лист отображается в цвете

Доброго времени суток!! суть проблемы - имеется довольно длинная таблица - 9 столбцов и 400 строк. Как сделать так, что бы при прокрутке шапка таблицы оставалась на месте (неудобно каждый раз перемещаться вверх что бы посмотреть что означает то или иное число) заранее спасибо.

Poseidon_21
Стать курсором в месте где должно быть закрепление - Меню - Окно - Закрепить области

спасибо!!!

есть два диапазона значений (в каждом диапазоне значения уникальные). Как из большего выбрать все строки, в которых содержатся значения из меньшего диапазона?

Mantisby
на Ваш вкус:
1) либо через условное форматирование подсветить те строки, которые есть в другом диапазоне (Условное форматирование / Формула /
=СЧЕТЕСЛИ(Малый_диапазон;Текущая_ячейка)>0
и задать, например, цвет заливки - потом через копирование формата разогнать формат по всем ячейкам большего диапазона)

2) вставить формулу СЧЕТЕСлИ в дополнительный столбец, потом по нему отсортировать или наложить фильтр...

3) использовать самописный макрос на VBA, который перенесёт куда-надо только те ячейки, которые есть в малом диапазоне...

Добавлено:
надеюсь, что я понял поставленную задачу правильно...

to ALL Господа. Потратив несколько минут на создание Excel файла, демонстрирующего, что у Вас есть и что надо получить, и приведение в форуме ссылки на выложенный тестовый файл, повышает вероятность ПРАВИЛЬНОГО решения возникшей перед Вами задачи.
Good Luck!

SERGE_BLIZNUK

Цитата:

Потратив несколько минут на создание Excel файла...

Имеется книга1, нужно получить книгу2 http://webfile.ru/1470888
Имеющееся решение громоздко, есть какие мысли?

aks_sv
ну, вы сами кому хотите помочь сможете... ;-))
попробуйте, вроде бы формула:
Код:
=ЛЕВСИМВ(A1;НАЙТИ(" ";A1)+1)&"."&ПСТР(A1;НАЙТИ(" ";A1;НАЙТИ(" ";A1)+1)+1;1)&"."

SERGE_BLIZNUK
вариант с Countif я так и не осилил вот пример - _http://mantis.ucoz.ru/example.xls. Надо выбрать (подсветить, отфильтровать - всё равно как, главное чтобы они были видны) _строки_ из листа Больший диапазон. Сравниваются один столбец в одном листе и один на другом, искать по всем столбцам в листе не надо. Заранее спасибо

SERGE_BLIZNUK
Спасибо, это попроще.

Mantisby
попробуй формулу
=ЕСЛИ(ЕНД(ВПР('Меньший диапазон'!A1;'Больший диапазон'!$A$1:$A$20;1;ЛОЖЬ))=ИСТИНА;0;ВПР('Меньший диапазон'!A1;'Больший диапазон'!$A$1:$A$20;1;ЛОЖЬ))

Mantisby
или посмотри на результат (через COUNTIF()/СЧЕТЕСЛИ() - здесь

w25
уфф, сложно мне с такими формулами

SERGE_BLIZNUK

Цитата:

или посмотри на результат (через COUNTIF()/СЧЕТЕСЛИ() - здесь

замечательно, то, что надо! Спасибо!

Я задавал этот вопрос неделю назад-наверно плохо объяснил.
Здесь новый пример:
http://rapidshare.com/files/44048225/____00001.rar
или зесь:
http://depositfiles.com/files/1270874
Как сделать так чтобы ПРИ ПЕЧАТИ строки с размерными сетками(окрасил в голубой цвет)(например S,M,L,XL,XXL,3XL)
для каждой группы товаров (Брюки,костюмы,куртки,...)
перескакивали на следующую страницу.
-----------------------------------------------
На листе №1 у меня данные
На листе №2 сделал через Данные-Итоги
Но вот при печати допустим в БРЮКАХ
у меня размерная сетка для БРЮК! не переходит на след.страницу.
На листе №3 я сделал вручную КАК НАДО ВЫГЛЯДЕТЬ НА ПЕЧАТИ.
Для каждого НАИМЕНОВАНИЯ товаров своя размерная сетка.
Вот если бы сделать сквозную размерную строку для каждого наименования свою...?

ZORRO2005
По поводу как сделать, чтобы определённые строки печатались на каждом листе....

У меня есть целый набор вариантов (путей) решения проблемы, но, к сожалению, ни одного красивого (читай - простого) и ни одного реализованного...
Более того, Вам надо будет решить, какой предпочтительнее, начать реализовывать, и, если понадобится, обратиться сюда в форум за помощью...

И ещё, мне кажется, что тут без использования макросов не обойтись (а значит, это всё надо переносить в другую ветку форума).

в принципе, если бы можно было в макросе получить номер печатной страницы (и/или номер строчки на печатном листе) - задачу можно было решить гораздо проще и красивее...

И так. варианты.
1) сделать так, как Вы руками сделали на листе 3 - т.е. макросом проходить по строчкам, фиксировать какая группа (и запоминать строчку, в которой заданы размеры для этой группы), когда количество строк на листе достигает заданного значения (например, 70) вставлять разрыв печатной страницы (например, [more=так]
Код:
Rows("21:21").Select
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell

привет все гуру!!!
у меня задача короче
нужно
растояние * скорость = время

1400 - это расстояние
620 - это скорость
должно получиться время 2:25.8

как сделать?

stx2006
Расстояние и скорость в чем измеряются? 2,258 - это не 2:25.8
Чтобы получить время, надо расстояние делить на скорость, а не умножать

Mushroomer
про просчет - да там делить надо, глюкнуло
измерять ничего не надо
нужно чтобы ответ был в часах минутх и секундах