Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2004.05.16;
Скачать: [xml.tar.bz2];

Вниз

Excel   Найти похожие ветки 

 
User_OKA   (2004-04-26 09:36) [0]

Как в Excel распечатать четные и нечетные страницы


 
Nikolay M. ©   (2004-04-26 10:06) [1]

Четные + нечетные страницы = все страницы.
Print all.


 
User_OKA   (2004-04-26 10:16) [2]

ха ха ха очень смешно.


 
Anatoly Podgoretsky ©   (2004-04-26 10:25) [3]

Так не задавай глупых вопросов, задавай правильные, или ты не над Nikolay M. смеешься?


 
User_OKA   (2004-04-26 12:17) [4]

Необходимо распечатать прайс. Сначало необходимо распечатать не четные страницы, а затем четные.


 
Undert ©   (2004-04-26 12:19) [5]

У меня например во вкладке HP есть такая весщ - печать книг :-)


 
Real ©   (2004-04-26 13:45) [6]

Макросом.

"Для нечетных
for i=1 to Sheets.Count step 2
 Sheets(x).Select
 "здесь вызов печати листа
next i

 
"Для четных
for i=2 to Sheets.Count step 2
 Sheets(x).Select
 "здесь вызов печати листа
next i


 
Real ©   (2004-04-26 13:47) [7]

вместо Х - i (это я думаю и так ясно).


 
User_OKA   (2004-04-26 14:49) [8]

for i=2 to Sheets.Count step 2 // перебираем листы
next i

Sheets(x).Select // выделяем лист

PrintOut // выводим на печать

Что это дает?

А как же "Сначало необходимо распечатать не четные страницы, а затем четные".

Видать я чего то не понял?


 
Real ©   (2004-04-26 19:56) [9]

Да, не понял - васик учить пора :)
STEP 2 - цикл будет идти с шагом 2, т.е. если начали с 1 - пойдут нечетные листы. Надеюсь теперь-то все ясно?


 
User_OKA   (2004-04-27 06:41) [10]

Sheets.Count возвращает количество листов в книге.
А мне надо распечатать первый лист, печатая четные и не четные страницы этого листа.


 
YurikGl ©   (2004-04-27 09:31) [11]

User_OKA, ты сам из Excelя это сделать можешь? Если можешь, то сначала запусти макрос на запись, потом сделай что хочешь и можешь, потом останови запись макроса и посмотри как он (макрос) внутри устроен. Перетащи его в delphi и все.


 
Real ©   (2004-04-27 09:34) [12]

Не понимаю - вы что прикалываетесь? Повторю еще раз:
ЕСЛИ, НА НАЧАЛО ЦИКЛА, ИТЕРАТОР РАВЕН 1, А ЦИКЛ ИДЕТ С ШАГОМ 2, ТО ЭТО И ЕСТЬ НЕЧЕТНЫЕ СТРАНИЦЫ: 1,3,5,7,9...
ЕСЛИ ЖЕ НАЧАЛЬНОЕ ЗНАЧЕНИЕ 2 И ШАГ 2 - ТО ПОЙДУТ ЧЕТНЫЕ: 2,4,6,8,10...

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

for j=1 to 2
 for i=j to Sheets.Count step 2
   Sheets(i).Select
   PrintOut
 next i
next j


 
Danilka ©   (2004-04-27 11:54) [13]

[12] Real ©   (27.04.04 09:34)
а как быть когда в одной "шитс(и)" дофига листов? :))

короче, нада делать как [11] YurikGl ©   (27.04.04 09:31) сказал :))



Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2004.05.16;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.03 c
1-1082953631
WondeRu
2004-04-26 08:27
2004.05.16
Cursor in RUNTIME


6-1080475939
iudjen
2004-03-28 16:12
2004.05.16
как скачать файл с интернета


14-1082704706
paul_k
2004-04-23 11:18
2004.05.16
Есть вакансия в Москве


1-1083057757
ByPass
2004-04-27 13:22
2004.05.16
Memory Mapped Port


3-1082353591
ЮЮ
2004-04-19 09:46
2004.05.16
Клиент на Win2000 захватывает файлы БД на NetWare





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский