2003/XP/2000 - [архив] Microsoft Excel

Ответить
 • Просмотры: 5
Аватара пользователя
Greyman

Re: 2003/XP/2000 - [архив] Microsoft Excel

Сообщение Greyman »

DSK


Цитата:



Думаю что варианты приблизительно равны ...



В принцыпе - да (по крайней мере алгоритмически), но можно еще по времени выполнения сравнить. Один из них должен быть по быстрее, его и можно брать за основу.
Аватара пользователя
Vadikan

Re: 2003/XP/2000 - [архив] Microsoft Excel

Сообщение Vadikan »

Вообще-то, в приведенном примере никаких ухищрений не нужно. Просто кликается на любую ячейку, в столбце, по которому провoдим сортировку (в данном случае с буквой) и нажимаем на кнопку сортировки по алфавиту. Попробуйте сами.



[s]Исправлено: Vadikan, 19:58 18-03-2004[/s]
Аватара пользователя
Vadikan

Re: 2003/XP/2000 - [архив] Microsoft Excel

Сообщение Vadikan »

Доброго времени суток!



Я тут озадачился следующим вопросом. Есть табличка 10 столбцов на 1500 строк. Для удобства чтения при распечатке хотелось бы отделять строки не банальной сеткой, а различным цветом заливки ячеек. Например, чередовать прозрачный (нет заливки) со светло-серым. Идея аналогична отделению постов в теме на форуме, кстати. Понятное дело, что вручную я это делать не хочу. Я и так и сяк покрутил, но что-то не нашел варианта автоматизировать процесс. Может я что-то упустил и решение лежит на поверхности? Буду рад услышать любые идеи.



Спасибо за внимания.
Аватара пользователя
ShaRP

Re: 2003/XP/2000 - [архив] Microsoft Excel

Сообщение ShaRP »

grmbrg

Есть мнение, что не рисунок растягивается, а сканер надо настроить, параметр DPI.
Аватара пользователя
Greyman

Re: 2003/XP/2000 - [архив] Microsoft Excel

Сообщение Greyman »

Vadikan

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

1) Первый который приходит в голову, но не самы простоы - воспользоваться макросом. Саму заливку можно осуществлять с помощью:

Код:

Код: Выделить всё

Cells(1, 1).Interior.ColorIndex = 6

Индекс определяет цвет. Закраска нужного диапазона уже вопрос программирования (условия, цыклы и т. д.). Если нужна не сплошная заливка, то можно воспользоваться:

Код:

Код: Выделить всё

Cells(1, 1).Interior.Pattern = xlSolid

Значения для разных способов заливки можно посмотреть в хелпе для Pattern. Если нужно более подробно, то, в принцыпе, могу прикинуть и макрос целиком, если время свободное найдется...



2) Копирования форматирования ячеек. Сначала раскрашиваешь себе один повторяющийся цыкл (например, первая строка - в желтую полоску, вторая - в зеленый горошек, третья - черный крестик и т. д. и т. п.). После чеко копируешь через Правка/ Специальная/ форматирование. Заметным минусом этого варианта является то, что при копировании переносятся все форматы (в том числе высоты строк, выравнивание значений в ячейках). Однако, если все строки могут быть одинаковой высоты и выравнивание в одном столбце от одной строки к другой не меняется, то этот способ отлично подойдет.



3) Раскраска заданного выделения. Способы выделения могут быть разными, мне больше нравится вариант с фильтрованием. Просто в дополнительном столбце формируются значения, по которым потом и идет фильтрование. Для твоего случая формула будет очень простая, которую просто надо раскопировать на все 1500 строк:

Код:

Код: Выделить всё

=ЕЧЁТН(СТРОКА(J1))

Функция ЕЧЁТН становится доступна (и ряд других), если в Сервис/ Надстройки подключен модуль "Пакет анализа" (соответственно для этого его необходимо установить, если отсутствует). Если "Пакет анализа" не использовать или, если чередование будет более сложное, просто формула усложниться, но суть не изменится. Конечно вариант не польностью автоматизированный (вставка формулы, ее копирование, фильтрация, выделение, раскраска, отмена фильтра и удаление дополнительного стобца), поэтому, если автоматизация нужна максимально возможная, то макросы ИМХО именно тот вариант.



Млин. Один раз уже пост написал, но после предпросмотра сразу (без всяких действий с моей стороны) форум выдал ошибку из разряда "не правильный пользователь" или что-то похожее. В результате - пост похерен...Изображение *В итоге, это - второй вариант...
Аватара пользователя
Greyman

Re: 2003/XP/2000 - [архив] Microsoft Excel

Сообщение Greyman »

grmbrg

В офисе забито разрешение по умолчанию для рисунков. Точное значение щас не знаю (вроде в диапазоне 100-150dpi). Соответственно, чтобы в Exel сразу показывал рисунок в нужном размере без дополнительных действий с твоей стороны, просто необходимо сканировать в заданном разрешении. Это вариант, лежащий на поверхности. Возможно также есть способ принудитьльно поменять дефолтное значение разрешения, тогда сканировать можешь как тебе захочеться, но есть ли на самом деле такая возможность и как ее осуществить - не знаю...



Добавлено:



Млин, уже который раз за сегодня при предпросмотре (да и постинге тоже) вываливается ошибка форума. Пока я с этим боролся ShaRP уже 100 лет назат все сказал... Пошел ка я жаловаться в соответствующий раздел...
Аватара пользователя
Billy Bones

Re: 2003/XP/2000 - [архив] Microsoft Excel

Сообщение Billy Bones »

На листе есть таблица с данными, есть скрытые строки и столбцы. Нужно удалить их. Получается только если нажать Ctrl и мышей выделять нескрытые ячейки, затем скопировать на другой лист. Вот тока если ячеек этих очень много, запаришься выделять. Если более простой способ?
Аватара пользователя
Vadikan

Re: 2003/XP/2000 - [архив] Microsoft Excel

Сообщение Vadikan »

Greyman


Цитата:



2) Копирования форматирования ячеек.



То что нужно. Действительно, решение (почти) на поверхности ;-) Большое спасибо!
Аватара пользователя
Greyman

Re: 2003/XP/2000 - [архив] Microsoft Excel

Сообщение Greyman »

Billy Bones

А почему нельзя их сначала отобразить, а потом удалить с тово же листа? Или не знаешь как:

1)выделить все - левая кнопка в верхний левый угол таблицы);

2) отобразить столбцы - правой кнопкой в любом месте подписей столбцов, в появившемся меню - отобразить;

3) отобразить строки - ... подписей строк, ... - отобразить.

Так нормально, или ты что-то другое имел в виду?
Ответить

Вернуться в «Microsoft Office (Word, Excel, Outlook и т.д.)»