» Excel FAQ (часть 3)

Подскажите какие команды нужно вынести на панель инструментов в Эксель 2003, чтобы для выбранной ячейки или выделенного диапазона ячеек выставлять такие параметры: числовой формат (с 2 и 0 знаками после запятой) и перенос по словам.

Также ищу подобные команды для Эксель 2007 (подскажите где они на ленте или какие команды вынести на Панель быстрого доступа).

lucky_Luk
А через свойства (CTRL + 1) это не проще делать?

Mushroomer

Цитата:

А через свойства (CTRL + 1) это не проще делать?

Не знал про такое сочетание клавиш. Но это долго , так же, как и через контекстное меню - Формат ячеек, уже задолбался. Надо чтобы одним-2 щелчками - хотябы числовой формат с 2 знаками и перенос по словам.

Добавлено:
Как сделать в Экселе 2003, чтобы при создании новой таблицы был установлен не шрифт Arial Cyr, а Times New Roman?

Здравствуйте! Помогите пожалуйста реализовать следующую вещь:
есть некая таблица в ячейках которой находится число и сделан комментарий, нужно как-то просканировать все ячейки данной таблицы и создать табличку вида "комментарий" | "сумма цифр в ячейке с таким комментарием".

lucky_Luk

Цитата:

Как сделать в Экселе 2003, чтобы при создании новой таблицы был установлен не шрифт Arial Cyr, а Times New Roman?

Меню "Сервис" -> "Параметры" -> "Общие" -> "Стандартный шрифт"

lucky_Luk
Цитата:

Надо чтобы одним-2 щелчками - хотябы числовой формат с 2 знаками и перенос по словам.

Сервис -> Макрос -> Начать запись
делаешь свои действия. А потом макрос или на кнопку вешаешь или на сочетание клавиш

ri
Цитата:

Помогите пожалуйста реализовать следующую вещь:

Это имхо задача для VBA. Тебе в другой топик.

CEMEH
Цитата:

Рассматривая данный пример (обязательное условие: числа для умножения - двузначные)
=ЗНАЧЕН(ЛЕВСИМВ(A1;2))*ЗНАЧЕН(ЛЕВСИМВ(A2;2))

Не, так не пойдёт... ;-) Это только в качестве примера, для практического использования, имхо, бесполезно!
кроме того, числа мало того, что должны быть СТРОГО ДВУХЗНАЧНЫЕ, так они ещё должны быть и целые, кроме того, не допускается наличие в начале строки никаких символов (например, пробелов)

Soft_deadly Если вам нужно - то я могу написать простенькую пользовательскую функцию, возращающую первое число из строчки -
ДайЧислоИзСтроки( ячейка )

lucky_Luk
Цитата:

чтобы одним-2 щелчками - хотябы числовой формат с 2 знаками и перенос по словам.

ну, либо, как тебе правильно сказал Mushroomer, используй макрос (можно кнопочку вынести),
либо, как вариант, ОЧЕНЬ рекомендую попробовать воспользоваться функцией копирования формата - "Формат по образцу" (кнопочка с кисточкой в панели рядом с Copy/Paste):
форматируете ячейку как вам надо (формат, переносы, шрифты и т.д. и т.п.), потом выделяете эту ячейку, нажимаете на кнопочку "Формат по образцу" - выделяете нужные ячейки (хоть всю таблицу, хоть один столбец) - вуаля... готово.

ri
Цитата:

некая таблица в ячейках которой находится число и сделан комментарий, нужно как-то просканировать все ячейки данной таблицы и создать табличку вида "комментарий" | "сумма цифр в ячейке с таким комментарием".

Если отсортировать по полю "комментарий" - то можете попробовать использовать меню "Данные" - "Итоги..."
А если не устроит - тогда макрос на VBA (там он достаточно простой будет...)
надо - пишите (только, как было сказано выше, в соответствующей теме)...

Цитата:

Рассматривая данный пример (обязательное условие: числа для умножения - двузначные)
А1
А2
=ЗНАЧЕН(ЛЕВСИМВ(A1;2))*ЗНАЧЕН(ЛЕВСИМВ(A2;2))

Так и есть если известно заранее сколько знаков имеет число, а если числа в столбцах имеют разное кол-во знаков. Может как то можно отбросить все буквенные значения.
А нельзя ли подобрать формат ячейки?
Помогите ....

lucky_Luk
Shift+CTRL+1 - форматирует ячейку в числовой формат


Добавлено:
Список горячих клавиш для Ексель
http://ifolder.ru/3022676

Такая проблема.
Есть таблица 2 столбца 50000 строк. При помощи нее построена диаграмма. Нужно либо каким то образом проредить таблицу, скажем, оставить каждую 10 запись, либо ничего не удаляя в таблице сделать так, что диаграмма учитывала не все точки, а только каждую 10... Это можно сделать стандартными средствами без применения макросов? Срочно нужно... Заранее спасибо!

Antananarivu
можно проредить так-
доп столбец, туда формулу: =ЕСЛИ(ОСТАТ(СТРОКА();10)=0;1;"")
потом включить автофильтр, выбрать - "все пустые"
Выделить строчки - меню "Правка" - "Удалить строку"...
выключить автофильт
удалить дополнительный столбце. всё

Спасибо! Помогли!

Soft_deadly
Дам несколько наводящих советов, если все таки нужно обойтись без макросов:
1 допустим аргумент имеет длину не больше 10 символов.
2 с помощью ПОВТОР-ДЛСТР добавляем "0" в начало аргумента (устанавливаем длину=10)
3 с помощью ЛЕВСИМВ(ПРАВСИМВ(... ДЛСТР минус разряд) разбиваем аргумент на 10 символов (лучше это сделать в 10 столбцах)
4 с помощью ЕСЛИ(...;",";",";"") находим запятую и ставим ее в столбце "разряд Х"
5 Используя ЕСЛИ и КОДСИМВ определяем код символа и если он соответствует от 0 до 9 то печатаем соответствующее число, в противном случае печатаем ""
5 в последнем столбце ЗНАЧЕН(СЦЕПИТЬ(столбцы разрядов))

Не знаю, уберется ли эта формула в одну ячейку...

добавил:
Вместо проверок по коду символа можно использовать ЗНАЧЕН(ЕОШ(

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

ещё в список навигации если держать shift и крутить колёсико то можно сворачивать и разворачивать группировки

Добавлено:
Madagaskar
попробуй расянуть строку,
или двойной щелчёк гы немогу описать двойной щелчёк по нижней границн строки там где цифры.
или меню формат-строка-авто

Madagaskar
Цитата:

Текст в ячейке ( даже при " переносить по словам " ) загоняется в одну строку

немного внятно сформилирован вопрос. но попытаюсь...
Если я правильно Вас понял, то Вам нужно копать в следующие направления:
1) принудительный перенос слов по Alt-Enter
2) содержимое ячейкй начнёт переноситься по словам после того, как ячейка в следущем столбце (справа от вашей) перестанет быть пустой! (поставьте там точку, увидите)
3) может быть Вам нужно высоту строки увеличить?

если я Вас понял неправильно, то приношу свои извинения! Тогда киньте скриншот, на котором видна ваша проблема.

Есть такая проблема.
При вытаскивании данных их какой-то базы, в некоторых клетках перед значениями прописались апострофы. Вот такой значок - '
Когда смотришь просто на таблицу - этот значок не виден.
Его видно только в поле, где можно редактировать формулу, ну или напрямую кликнуть на клетку и зайти в нее.
Этот апостроф не находится ни на Ctrl+F, чтоб потом в дальнейшем заменить его при помощи Replace All на пробел.
Ситуация такая, что при помощи фнкции VLOOKUP поиск данных, например значения 1234 в клетке с апострофом '1234 не даст никаких результатов.

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

Angelo
Цитата:

Вопрос, както то можно убрать этот апостроф из всех клеток, где он есть

А надо ли?!!
Это не случайно - это таким образом запрещается Excel'ю мудрить и самому пытаться распознать, что вы хотите записать (к примеру, попытайтесь записать в ячейку текст: 11/2 или текст 12-1)

из справки Excel - [more=Апостроф ('), знак крышки (^), кавычки (") или обратная косая черта (\)]
Апостроф ('), знак крышки (^), кавычки (") или обратная косая черта (\) отображаются в строке формулы, но их нет в ячейках

Эти знаки являются кодами форматирования, которые могут отображаться в документах, созданных в Lotus 1-2-3, или при установке клавиш перехода как в Lotus 1-2-3. В форматах Lotus 1-2-3 апостроф (') означает текст, выровненный по левому краю, кавычки (") — выровненный по правому краю, знак крышки (^) — выровненный по центру, а знак обратной косой черты (\) — заполняющий ячейку.
[/more]


Добавлено:
а убрать их очень просто!!! Только через VBA: в макросе пройти по всем ячейками
и присвоить формулу самой себе .Formula = .Formula
вот только боюсь, что результат вас не слишком обрадует.
Помнится была программа, которая из базы формировала отчёт в Excel - а там (в базе) были объекты с названиями номер подстанции дробь номер линии - в excel получался полный облом (причём, что мне больше всего не нравится - преобразование БЕЗВОЗРАТНОЕ - т.е. из 12.01.2007 в которое превращается 12/1 уже обратно исходный текст не получишь ;-(((
Пришлось в базе переименовывать объекты, добавив в имя апостров в начале...

Цитата:

А надо ли?!!

Угу. Ой как надо.
Вкратце, это прайслист.
Код товара в одной клетке, цена - в соседней.
При генерировании, скажем заказов от других клиентов, я при помощи VLOOKUP сравниваю коды товара которые написали в своем файле клиенты с кодами в моем прайслисте и вытаскиваю цены. В ручную это все делать оооооооочень долго.
Нельзя ли как-то может вручную задать что все клетки с данными должны быть текстом, например... или цифрами?

'17104970001 - я не предпологаю, во что эксел мог переконвертировать это значение, чтобы поставить ему апостроф.

Angelo

Цитата:

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

а как Вы вытаскивал данные из базы? Похоже, это побочный эффект этого способа.
При чём никак не проверяется, во что и как Excel мог бы переконвертирвать...
Просто перед всеми данными такое ставится.


Цитата:

При генерировании, скажем заказов от других клиентов, я при помощи VLOOKUP сравниваю коды товара которые написали в своем файле клиенты с кодами в моем прайслисте и вытаскиваю цены

Так я и не понял, чем Вам мешают коды, если они ни начто не влияют, и формулы их "не видят"...
ну да ладно - мешают, так мешают... ;-)))
Вот, попробуйте макрос [more=RemoveAllApostrophe]
Только не забудьте - отменить действие макроса НЕВОЗМОЖНО!!!
Поэтому, не забудьте сохраниться перед выполнением (чтобы потом можно было закрыть без сохранения)


Код:
Sub RemoveAllApostrophe()
Dim MaxRow, MaxCol As Long
MaxRow = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row
MaxCol = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Column
Range(Cells(1, 1), Cells(MaxRow, MaxCol)).Formula = Range(Cells(1, 1), Cells(MaxRow, MaxCol)).Formula
End Sub

Цитата:

Так я и не понял, чем Вам мешают коды, если они ни начто не влияют, и формулы их "не видят"...

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


Например мой прайслист:
| Столбец А | Столбец Б
ряд 1| ААА0012 | 100,20
ряд 2| 'ААА0013 | 55,00


Когда я в другом файле (в файле заказа клиента) сделаю =VLOOKUP(ААА0012;адрес_таблицы;2 FALSE) то мне выдаст - 100,20.
Если поставлю значение ААА0013 - то формула ничего не найдет.

Спасибо за макрос. Попробую.

Вопрос по ссылкам на книги/листы.

Итак: на жестком диске есть папка "Персонал" в ней два файла *.xls "БазаДанных" и "Статистика"
В БазаДанных значения и немного формул. в Статистика - много формул. Формулы в Статистике ссылаются на Книга(БазаДанных).Лист1! все как положено. Но если я открываю Статистику и жму кнопку обновить связи (или как там ее) при открытии книги то результат вычисления формул - #ЗНАЧ. Если ту же процедуру делаю при открытой БазаДанных то результат вычисления в Статистика нормальный (все работает).

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

Господа, а подскажите, как лучше в таблицу динамически подставлять строки из другой таблицы таблицы, если одна из ячеек в строке удовлетворяет заданному условию?

de_Marko
ИНДЕКС и ПОИСКПОЗ и ЕСЛИ а вообще лучше покажи пример что и с чем сравнивать и куда подставлять.

Кто знает как в Excel 2007 напечатать к примеру первую и шестую страници, а не с какой-то по какую-то?

saqwe
Сначала ставишь с 1 по 1 печатаешь, потом с 6 по 6.

w25
Ответ конечно правильный, но если тебе нужно напечатать с одной книги 20 стр., которые идут не по-порядку, они должны быть двохсторонними, тем более принтер поддерживает двохстороннюю печать (т.е если бы можна было так как в ворде задать стр. 1, 5, 8, 15, то их можна было б печатать не переворачивая бумаги вручную), и если тебе за день нужно таких книг напечатать штук 20-50, то замахаешься ставить сначала с 1 по 1, потом с 6 по 6

saqwe
Цитата:

и если тебе за день нужно таких книг напечатать штук 20-50, то замахаешься ставить сначала с 1 по 1, потом с 6 по 6

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

После конвертации (из dbf) таблицы с данными нужно подсчитать количество непустых ячеек в столбце. Результат получается ошибочный, т.е. некоторые ячейки почему-то считаются пустыми, хотя никаких данных там я не вижу. Все наладилось, когда я вручную прошелся по всем пустым ячейкам клавишей Del. В чем тут дело, подскажите? Что там такое невидимое (и можно ли это сделать видимым )?

greyish
Цитата:

В чем тут дело, подскажите?

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