Excel количество страниц при печати

Oleg

1

05.03.2008, 08:04. Показов 35007. Ответов 21


Студворк — интернет-сервис помощи студентам

Убедительная просьба помоч!!!
Как узнать количество страниц при печати в Excel?

Tim

06.03.2008, 13:13

2

Привет!!!
Ты когда-нить нажимал на разметку страницы в Екселе???
Там появляется лист екселя с синими пунктирными полосочками.
Так вот, именно по этим полосочкам и печатает принтер!
Остается их только посчитать.
А называются они PageBreak

Returns or sets the location of a page break. Can be one of the following XlPageBreak constants: xlPageBreakAutomatic, xlPageBreakManual, or xlPageBreakNone. Read/write Long.

Remarks

This property can return the location of either automatic or manual page breaks, but it can only set the location of manual breaks (it can only be set to xlPageBreakManual or xlPageBreakNone).

To remove all manual page breaks on a worksheet, set Cells.PageBreak to xlPageBreakNone.

Tim

06.03.2008, 13:33

3

Лови родной!
только для точного кол-ва страниц нужно всегда делать r+1 т.к. HPageBreaks — это коллекция межстраничных разрывов, а т.к. после последней страницы его нету, то и последнего HPageBreak тоже нету!
Надеюсь я помог хоть чем-то

Visual Basic
1
2
3
4
Sub test()
    r = ActiveSheet.HPageBreaks.Count
    MsgBox r
End Sub

Oleg

07.03.2008, 08:26

4

Спасибо за подсказку!!!
Есть еще одна проблемма!!!
Если в последней строке будуд данные, то количество страниц определяется правильно, если нет, на 1 меньше. А как это определить?

Tim

07.03.2008, 11:23

5

Извини, не понял. Про какую последнюю строку ты говоришь?

Oleg

07.03.2008, 11:31

6

Слова из первого ответа:
Ты когда-нить нажимал на разметку страницы в Екселе???
Там появляется лист екселя с синими пунктирными полосочками.
Так вот, именно по этим полосочкам и печатает принтер!
Остается их только посчитать.
А называются они PageBreak

Так вот если перед самой этой синей полосочкой в ячейку внести данные, то количество страниц будет правильным, иначе +1

Tim

07.03.2008, 13:26

7

Понятно
Но ведь я ж тебе примерчик с HPageBreaks сбросил!
Количество HPageBreaks + 1 и будет кол-м листов выводимых на печать
отталкивайся от него и все. А уж куда ты там данные занесешь перед разрывом страницы или после, этой коллекции наплевать!

Oleg

07.03.2008, 13:33

8

Это я все понимаю, но дело в том что я заполняю это программно и не знаю где будет последняя строка. Поэтому может получиться, что она будет посередине страницы и тогда количество страниц +1, а может быть последняя строка будет ровно в конце страницы, и тогда количество страниц будет правельным.
Как узнать в конце вывода, где я нахожусь по отношению к странице?
или как узнать количество строк на странице?

Tim

09.03.2008, 11:27

9

Вот оно что. Т.е. фактически тебе нужно узнать сколько строк у тебя в печатной странице? Блин… по-моему с этим будет сложнее. Я не помню ни одну функцию или метод, который бы позволял сказать сколько строк на печати в той или иной странице…
Тут очень много зависит от параметров печати, т.е. полей, шрифта, высоты строк, объеденены или нет ячейки, есть ли всякие переносы.. и т.п.
Если все это унифицировать, то можно высчитать сколько строк на странице, а соответственно и сколько страниц.
Давай, копай!

Olegusha

19.01.2010, 13:02

10

Visual Basic
1
2
3
4
Sub test()
r = ActiveSheet.HPageBreaks.Count
MsgBox r
End Sub

Этот макрос работает через раз.
Раз он выдает истинное к-во страниц, а другой раз — к-во, которое равно к-ву листов в книге.
И действительно есть проблема, когда определяет на одну страница меньше.
Заранее благодарен за ответы.

Oleg

19.01.2010, 13:19

11

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

Olegusha

19.01.2010, 14:06

12

Главное не то, что он добавляет страницу, а то что он ЧЕРЕЗ РАЗ работает ((
Один раз он говорит, что страниц 4 (по одной на каждый лист книги), а другой — истинное значение. По предварительным данным нужно переместиться на последнюю заполненную ячейку на последнем листе книги. И тогда все ок.
Вот макрос, который я использую (печатает сразу четные страницы в обратном порядке, а потом — нечетные в прямом). Может кто-то подскажет!?!

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
Sub print_stage()
 
Dim i, j, k, n, nos, sheet_count, total_pages, cur_pages As Byte
 
'не думаю что у тебя больше 255 листов
 
n = 0
total_pages = 0
 
' print_stage Макрос
 
 'Подсчет к-ва листов в книге
 sheet_count = ActiveWorkbook.Sheets.Count
 
 'Подсчет к-ва страниц в каждом листе
 For nos = 1 To sheet_count
    cur_pages = ActiveWorkbook.Sheets(nos).HPageBreaks.Count + 1
    
    
    n = ActiveWorkbook.Sheets(nos).VPageBreaks.Count
        
    If n > 1 Then
       MsgBox 'Столбцы поздвигай на ' & nos & ' листе, а то вылазят черт знает куда'
       GoTo m1:
    End If
 
 'Подсчет суммарного к-ва страниц во всей книге
    total_pages = total_pages + cur_pages
 Next nos
 
 
  MsgBox 'Печать четных страниц в обратном порядке (вставь бумагу).' & Chr(13) & Chr(13) & total_pages & ' страниц ' & sheet_count & ' раздела(ов)'
    
    For i = 2 To total_pages Step 2
       j = Int(total_pages / 2) * 2 + 2 - i
       'ActiveWorkbook.PrintOut From:=j, To:=j, Copies:=1, Collate:=True
       MsgBox 'Печать четных страниц' & Chr(13) & Chr(13) & j
    Next i
    
 MsgBox 'Печать нечетных страниц (переверни напечатанные листы и вставь обратно).' & Chr(13) & Chr(13) & total_pages & ' страниц [' & sheet_count & ' раздела(ов)]'
    
    For k = 1 To total_pages Step 2
       'ActiveWorkbook.PrintOut From:=k, To:=k, Copies:=1, Collate:=True
       MsgBox 'Печать нечетных страниц' & Chr(13) & Chr(13) & k
    Next k
   
m1:
 
End Sub

barinrec

62 / 4 / 1

Регистрация: 27.04.2014

Сообщений: 100

16.10.2014, 23:12

13

У Уокенбаха есть пример, но не правильно счет ведет все равно. Кто поможет уточнить код, чтобы пустые листы не считал?

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Sub ShowPageCount()
    Dim PageCount As Integer
    Dim sht As Worksheet
    PageCount = 0
    For Each sht In Worksheets
        
        PageCount = PageCount + (sht.HPageBreaks.Count + 1) * _
         (sht.VPageBreaks.Count + 1)
    Next sht
    MsgBox "Total Pages = " & PageCount
End Sub



0



Eustas

0 / 0 / 0

Регистрация: 18.03.2016

Сообщений: 1

13.07.2017, 17:30

14

Суть в том, что Count считает именно Breaks (разрывы внутри диапазона печати). Т.е. границу листа не считает за разрыв, хотя на самом деле — это ещё одна страница. Т.о. вышеприведенные примеры для диапазона в котором всего одна страница должны рассчитывать 0. Пример для горизонтальных разрывов:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
    rEnd = Cells(65000, 1).End(xlUp).Row  ' нижняя граница печати
 
    nCountSheets = 0  ' количество листов для печати
    rBreaks = 0          ' адрес строки, после которой стоит разрыв
 
' перебираю все разрывы (горизонтальные), определяя их положение
' тут главное определить строку последней границы
 
    For Each hp In ActiveSheet.HPageBreaks
        Set rngHPB = hp.Location
        rBreaks = rngHPB.Row - 1
        
        If rBreaks <= rEnd Then nCountSheets = nCountSheets + 1
    
    Next
    
    If rBreaks = 0 Then nCountSheets = 1
    If (ActiveSheet.HPageBreaks.Count <> 0 And rBreaks < rEnd ) Then nCountSheets = nCountSheets + 1
    
Debug.Print nCountSheets



0



mitzn

0 / 0 / 0

Регистрация: 19.10.2017

Сообщений: 1

19.10.2017, 10:17

15

а не проще ли так:

Visual Basic
1
2
3
4
5
6
7
8
9
Sub TotalPageCount()
 
Dim sh As Worksheet
    For Each sh In Worksheets
        c = c + sh.PageSetup.Pages.Count
        Z = Z & vbCrLf & sh.Name & "=" & sh.PageSetup.Pages.Count
    Next
    MsgBox "Total=" & c & Z
End Sub

все меньше и понятней чем огород условностей городить с разрывами



0



kukana

2 / 2 / 0

Регистрация: 23.10.2015

Сообщений: 65

04.03.2022, 12:05

16

mitzn, книга состоит из трёх листов. В первом 1 страница. Во втором 1 страница. В третьем 2 страницы.
Код

Visual Basic
1
2
3
4
5
6
7
Sub TotalPageCount()
Dim sh As Worksheet
c = 0   
For Each sh In Worksheets
        c = c + sh.PageSetup.Pages.Count
Next sh
End Sub

Выдаёт 218 страниц.
Пробовал удалять/сбрасывать разрывы — ситуация не меняется.
При пошаговом выполнении:
первый лист с=4;
второй лист с=4 , т.е. как будто в нём ноль страниц;
третий лист с=218, т.е. в нём их 214.
При предпросмотре и печати всё норм, в книге три листа на четырёх страницах.
Кто знает, что не так?



0



Модератор

Эксперт MS Access

11336 / 4655 / 748

Регистрация: 07.08.2010

Сообщений: 13,484

Записей в блоге: 4

04.03.2022, 12:14

17

kukana,
возможно, что где-то задана область печати , надо смотреть файл



0



2 / 2 / 0

Регистрация: 23.10.2015

Сообщений: 65

04.03.2022, 12:45

18

Нашёл. На третьем листе было разлиновано до конца.
Удачи всем.



0



2628 / 1634 / 744

Регистрация: 23.03.2015

Сообщений: 5,135

04.03.2022, 13:04

19

kukana,

For Each sh In ThisWorkbook.Worksheets



0



2 / 2 / 0

Регистрация: 23.10.2015

Сообщений: 65

04.03.2022, 14:29

20

Narimanych, ни. В другой книге смотрю. С большим количеством листов вопрос решил, а вот почему на втором листе ноль страниц так и не понятно.



0



 

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

 

А чем не устраивает >Вид>Разметка страниц?

 

А если 100 странциц, то я буду считать количество полосок на листе?

 

Rom@n_t

Пользователь

Сообщений: 6
Регистрация: 01.01.1970

На заднем фоне серым цветом номер страницы!))))))

 

Мне некогда опускаться на самую последнюю страницу и смотреть какой у неё номер. Я хочу чтобы в ячейке А1 стояло количество страниц на листе

 

genyaa

Пользователь

Сообщений: 296
Регистрация: 01.01.1970

Вот так можно… преобразовать в функцию — проще простого.  

  Sub HowManyPages()  
   Dim x As Range, h As Long, v As Long  
   Set x = ActiveSheet.UsedRange  
   h = x.Parent.HPageBreaks.Count  
   v = x.Parent.VPageBreaks.Count  
   If x.Rows(x.Rows.Count).PageBreak <> xlNone Then h = h + 1  
   If x.Columns(x.Columns.Count).PageBreak <> xlNone Then v = v + 1  
   MsgBox (v) * (h)  
End Sub

 

Спасибо! Но что-то типа такого у меня есть, и к сожелению работает медленно. Мне нужно что-то по-быстрее.

 

genyaa

Пользователь

Сообщений: 296
Регистрация: 01.01.1970

Мда… Жаль, что этот форум не поддерживает возможность занесения пользователя в список блокируемых… Считайте себя занесенным в мой виртуальный список таковых.

 

Sh_Alex

Пользователь

Сообщений: 732
Регистрация: 01.01.1970

Миша (Ваня, Вася, Петя, дядя Федор?), Вы провокатор!  
Я, в силу своих прожитых лет, встречал «людей», которым хорошо от того,  что другим плохо. Сидят, после сделанной пакости в уголочке, и хихикают. А Ваши претензии иначе как пакостью не назовешь.  
На воинствующего «Гаити» Вы не похожи, но может быть волк сменил шкуру на шкуру ягненка?  
Заранее извиняюсь перед добросовестными форумчанами, чей логин «Миша», рассматривать посты не буду, присоединяюсь к мораторию «Genyaa».  
Без уважения, Александр.

 

vikttur

Пользователь

Сообщений: 47199
Регистрация: 15.09.2012

 

слэн

Пользователь

Сообщений: 5192
Регистрация: 16.01.2013

{quote}{login=Миша}{date=28.11.2008 03:16}{thema=}{post}Мне некогда опускаться на самую последнюю страницу и смотреть какой у неё номер. Я хочу чтобы в ячейке А1 стояло количество страниц на листе{/post}{/quote}  

  название темы уже вызвало опасения — теперь готов согласиться с Genyaa..  

  куда спешим?

 

Ё моё! Приколисты! Вы ответьте на вопрос, а не нравоучения читайте! Я так понимаю если нет ответа на вопрос, то вы начинаете нравоучения

 

ytk5kyky

Пользователь

Сообщений: 2410
Регистрация: 01.01.1970

{quote}{login=Миша}{date=28.11.2008 06:51}{thema=}{post}Спасибо! Но что-то типа такого у меня есть, и к сожелению работает медленно. Мне нужно что-то по-быстрее.{/post}{/quote}Я мимо пройти не мог. Тем более автор жалуется, что ему не помогают, а читают нравоучения.  
Итак, уважаемый Миша!  
Что именно у Вас такого типа имеется?  
Вам кажется, что 0.125 сек это медленно? (по крайней мере у меня столько времени работал этот код)  
Возможно это не эксель тормозит, а комп.  
Возможно это не комп и не эксель, а Вы слишком быстрый?  
Во всяком случае для этой задачи.  
Если последнее утверждение верно, то не поделитесь, где такую дурь берете. Я тоже так хочу.  
Если нужно еще быстрее, сколько это будет стоить? За дозу?

 

{quote}{login=Genyaa}{date=28.11.2008 06:26}{thema=}{post}Вот так можно… преобразовать в функцию — проще простого.{/post}{/quote}  
а у меня почему то не получается… вставляю макрос в модуль, в ячейки, где нужен результат пишу: =HowManyPages()  
может кто подскажет, все ли я правильно делаю?

 

Юрий М

Модератор

Сообщений: 60570
Регистрация: 14.09.2012

Контакты см. в профиле

Это не функция, чтобы писать в ячейке =HowManyPages… Просто выполните этот макрос и увидите сообщение.

 

Спасибо!  
а как можно ли сделать так что бы это макрос был формулой? что бы в заданной ячейки отображалось число, а лучше число прописью!

 

Юрий М

Модератор

Сообщений: 60570
Регистрация: 14.09.2012

Контакты см. в профиле

Для этого нужно из него сделать функцию. Почитать можно здесь: 

http://www.excel-vba.ru/chto-umeet-excel/chto-takoe-funkciya-polzovatelyaudf/

<BR>Сумма прописью обсуждалась 152 раза — воспользуйтесь поиском. Есть также в разделе «Приемы», есть и в «Копилке».

 

Спасибо за подсказку. почитал ничего не понял(  

  число прописью я знаю как сделать макросом, подумал, может это можно проще воплотить в едином макросе с числом листов…

 

может кто поможет все же с мокросом?

 

Hugo

Пользователь

Сообщений: 23249
Регистрация: 22.12.2012

Врёт HowManyPages.  
А вот это не врёт:  

  iPagesCount = ExecuteExcel4Macro(«GET.DOCUMENT(50)»)  

  Можно через имена и как формулу на лист вывести:  

  имя=GET.DOCUMENT(50)  
или в русской версии =ПОЛУЧИТЬ.ДОКУМЕНТ(50)  
В ячейке =имя  

  Хотя у меня в загашнике записано почему-то  
=ПОЛУЧИТЬ.ДОКУМЕНТ(50+ТДАТА()*0)  
Зачем это +ТДАТА()*0 — не понял, вроде и так работает?  

  Ну а на это можно навесить и «сумму прописью» — вариантов море, разных…

 

Serge

Пользователь

Сообщений: 11308
Регистрация: 01.01.1970

{quote}{login=Hugo}{date=05.12.2012 12:49}{thema=}{post}Зачем это +ТДАТА()*0 ?{/post}{/quote}  
Игорь, это для Application.Volatile  
:-)

 

Юрий М

Модератор

Сообщений: 60570
Регистрация: 14.09.2012

Контакты см. в профиле

#23

05.12.2012 12:59:03

http://www.planetaexcel.ru/forum.php/?thread_id=15113

— здесь было такое :-)

Содержание

  1. Как определить, сколько страниц будет напечатан в Excel
  2. Обзор
  3. Дополнительные сведения
  4. Как напечатать несколько листов (или все листы) в Excel за один раз
  5. Печатайте все листы за один раз
  6. Как уменьшить количество страниц в excel
  7. Как уменьшить количество страниц в Excel?
  8. Сколько страниц можно создать в Excel?
  9. Как изменить количество страниц в Excel?
  10. Как в Экселе разделить одну страницу на две?
  11. Как убрать пустые страницы при печати в Excel?
  12. Какое максимальное количество листов в Excel?
  13. Сколько страниц в книге Excel?
  14. Как настроить страницы в Excel?
  15. Как выровнять страницы в Excel?
  16. Сколько листов содержит новая книга Excel?
  17. Как разделить лист в Excel?
  18. Как разделить таблицу на две части в Excel?
  19. Как разделить таблицу Эксель?
  20. Как в таблице Excel удалить пустые страницы?
  21. Как в Эксель удалить страницы?
  22. Почему в Эксель печатается пустая страница?
  23. Как уменьшить размер листа Excel?
  24. Как уменьшить размер страницы в Excel?
  25. Как сжать файл в Excel?
  26. Как уменьшить размер Эксель таблицы?
  27. Как уменьшить вес фото в Excel?
  28. Как настроить таблицу в Экселе под размер листа?
  29. Как изменить размер страницы в Excel?
  30. Как сжать файл Excel для отправки по почте?
  31. Как можно сжать файл?
  32. Как очистить файл Excel от мусора?
  33. Как уменьшить размер таблицы?
  34. Как уменьшить график в Excel?
  35. Как сжать файл с фото?
  36. Как уменьшить вес фотографии?
  37. Как уменьшить размер файла MP4?

Как определить, сколько страниц будет напечатан в Excel

Microsoft Excel 97 и более ранних версий Microsoft Excel 98 и более ранние версии этой статьи содержатся в разделе 139405.

Обзор

Microsoft Visual Basic для приложений не поддерживает метод, чтобы определить общее количество страниц, печатаемых на листе. Тем не менее можно использовать метод ExecuteExcel4Macro , чтобы использовать GET. Функция листа Document(50) макрос возвращает общее число страниц, напечатанных на активном листе.

Дополнительные сведения

Корпорация Майкрософт предлагает примеры программного кода только для иллюстрации и без гарантий, явных или подразумеваемых, включая, но не ограничиваясь, подразумеваемые гарантии товарности или пригодности для определенной цели. Предполагается, что вы знакомы с демонстрируемым языком программирования и средствами, используемые для разработки и отладки. Специалисты службы технической поддержки Майкрософт могут объяснить возможности конкретной процедуры, но не выполнять модификации примеров для обеспечения функциональных возможностей или удовлетворения конкретных потребностей.
Если вы имеете ограниченный опыт программирования, у вас может возникнуть потребность связаться с сертифицированным партнером корпорации Майкрософт или консультационной службой корпорации Майкрософт. Для получения дополнительных сведений посетите следующие веб-сайты корпорации Майкрософт:

Дополнительные сведения о доступных вариантах поддержки и о том, как связаться с корпорацией Майкрософт, посетите следующий веб-узел корпорации Майкрософт:условиям обслуживания см. EN-US; CNTACTMSЧтобы использовать приведенный ниже макрос, настройте файл Microsoft Excel следующим образом:

Создайте новую книгу Microsoft Excel.

Выберите диапазон A1:J100.

Введите цифру 1 и нажмите клавиши CTRL + ENTER. Вы должны увидеть все выделенные ячейки заполнены с номером 1.

Вставьте модуль макроса Visual Basic.

Источник

Как напечатать несколько листов (или все листы) в Excel за один раз

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

В этом уроке я покажу вам, как вы можете распечатать несколько листов в Excel за один раз. Это могут быть некоторые выбранные листы или все листы в книге.

И если вы хотите распечатать определенную область на нескольких / всех листах, вы также можете сделать это с помощью небольшого количества магии VBA.

Печатайте все листы за один раз

В Excel есть встроенная функция, которая позволяет указать печать всех листов за один раз.

Ниже приведены шаги для печати всех листов в книге:

  1. Перейдите на вкладку Файл.
  2. Нажмите на опцию печати
  3. На странице «Печать» щелкните раскрывающееся меню «Параметры печати».
  4. Нажмите Распечатать всю книгу
  5. Нажмите на печать

Вышеупомянутые шаги распечатают все листы в книге. Если у вас установлена ​​область печати на некоторых листах, то будет напечатана только эта область печати.

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

А что, если вы хотите напечатать только отдельные листы, а не всю книгу.

Источник

Как уменьшить количество страниц в excel

Как уменьшить количество страниц в Excel?

На вкладке Разметка страницы выберите Параметры страницы. На вкладке Страница установите флажок Установить и выберите процент уменьшения или увеличения листа.

Сколько страниц можно создать в Excel?

По умолчанию Microsoft Office Excel предоставляет три листа в книге, но можно изменить количество листов, которые отображаются по умолчанию в новой книге.

  1. Откройте вкладку Файл .
  2. В группе Excel нажмите кнопку Параметры .

Как изменить количество страниц в Excel?

Как настроить количество листов в новых книгах Excel?

  1. В верхнем левом углу окна программы щелкните по кнопке «Office».
  2. В меню типичных задач выберите кнопку «Параметры Excel».
  3. В окне «Параметры Excel» на вкладке «Основные» в группе «При создании книг» выберите в списке книгу для настройки, а затем в графе «Число листов» задайте нужное значение.
  4. Закройте окно кнопкой «ОК».

Как в Экселе разделить одну страницу на две?

Как разделить лист в Excel

  1. Нажмите на разделитель, который находится справа над вертикальной полосой прокрутки.
  2. Перетащите его вниз, чтобы разделить окно.
  3. Обратите внимание на две вертикальные полосы прокрутки. …
  4. Чтобы удалить разделитель, дважды щелкните по горизонтальной линии, которая делит окно (или перетащите её на место).

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

Просто переходим во вкладку «Разметка» , кликаем по кнопке «Область печати» в блоке «Параметры страницы» и в появившемся меню выбираем пункт «Убрать» . После этого, если в ячейках вне таблицы не будет пробелов или других символов, пустые диапазоны не будут считаться частью документа.

Какое максимальное количество листов в Excel?

Технические характеристики и ограничения листа и книги

Параметр Максимальное значение
Количество листов в книге Ограничено объемом доступной оперативной памяти (по умолчанию 1 лист)
Количество цветов в книге 16 миллионов цветов (32-битовый спектр с полным доступом к 24-битовому спектру)

Сколько страниц в книге Excel?

Рабочий лист разбит на строки (нумеруются арабскими цифрами) и столбцы (именуются латинскими буквами). Максимально допустимое число листов в одной книге – 255. Количество листов в рабочей книге можно изменить в меню Параметры кнопки Office на вкладке Основные в группе При создании новых книг.

Как настроить страницы в Excel?

Перейти в разметку страниц можно двумя способами:

  1. Перейти на закладку «Вид» и выбрать инструмент «Размета страницы»
  2. В нижнем правом углу окна (на строке состояния, справа) щелкнуть на соответствующий переключатель между режимами «Обычный» и «Страничный».

Как выровнять страницы в Excel?

  1. На вкладке Разметка страницы нажмите команду Поля, а затем из выпадающего меню выберите пункт Настраиваемые поля.
  2. Появится диалоговое окно Параметры страницы.
  3. Введите требуемые значения для каждого поля, затем нажмите OK.
  4. Поля документа изменятся.

Сколько листов содержит новая книга Excel?

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

Как разделить лист в Excel?

Разделение листа на области

  1. Выделите ячейку под строкой или справа от столбца, по которым следует произвести разделение.
  2. На вкладке Вид в группе Окно нажмите кнопку Разделить. Чтобы отменить разделение листа, нажмите кнопку Разделить еще раз.

Как разделить таблицу на две части в Excel?

Как разделить таблицу на 2 части?

  1. Установить курсор мыши на нужную строку таблицы, и нажать сочетание клавиш Ctrl+Shift+Enter. Таблица разделится на 2 части
  2. Выбираете меню «Файл — Работа с таблицами — Макет», и в нем находите и выбираете пункт «Разбить таблицу». Работа с таблицами Макет Разделить таблицу

Как разделить таблицу Эксель?

  1. В таблице щелкните ячейку, которую вы хотите разделить.
  2. Перейдите на вкладку «Макет таблицы».
  3. В области «Ячейки»щелкните «Разделить».
  4. В диалоговом окне выберите нужное количество столбцов и строк.

Как в таблице Excel удалить пустые страницы?

Как удалить пустые листы в Excel

  1. Перейдите на вкладку VBA-Excel, которая будет доступна после установки
  2. В меню Диспетчеры выберите пункт Диспетчер листов
  3. В открывшемся диалоговом окне нажмите команду Удалить пустые
  4. Подтвердите удаление листов, нажав кнопку Да

Как в Эксель удалить страницы?

  1. Щелкните правой кнопкой мыши ярлычок Лист и выберите команду Удалить.
  2. Можно также выбрать лист, а затем на вкладке Главная нажать кнопку Удалить и выбрать команду Удалить лист.

Почему в Эксель печатается пустая страница?

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

Как уменьшить размер листа Excel?

Как уменьшить размер страницы в Excel?

Увеличение и уменьшение масштаба в MS Excel с помощью мыши

А это мой любимый способ. Потому что самый быстрый и простой. Зажмите на клавиатуре клавишу CTRL и не отпуская её прокрутите колесико мыши. Если крутить “на себя”, масштаб таблицы на экране будет уменьшаться, а “от себя”, наоборот, увеличиваться.

Как сжать файл в Excel?

Как уменьшить размер файла Excel и заставить его работать быстрее

  1. Уменьшаем размер используемого диапазона листа …
  2. Пересохраняем файл в другом формате …
  3. Удаляем лишние объекты из книги …
  4. Уменьшаем размер сводных таблиц …
  5. Заменяем формулы на значения …
  6. Удаляем лишнее форматирование …
  7. Удаляем лишние имена

Как уменьшить размер Эксель таблицы?

Заходим на закладку «Вид», выбираем раздел «Масштаб» (лупа нарисована) — здесь можно установить нужный нам размер таблицы, например 75% или 90%, т. д. Рядом стоит кнопка с цифрой 100%, нажав на нее, получаем масштаб 100%.

Как уменьшить вес фото в Excel?

Открыв файл в приложении Microsoft Office, выберите один или несколько рисунков для сжатия. В разделе Работа с рисунками на вкладке Формат в группе Изменение нажмите кнопку Сжать рисунки. Если вкладки Работа с рисунками и Формат не отображаются, убедитесь, что рисунок выделен.

Как настроить таблицу в Экселе под размер листа?

Настройка полей и масштаба при печати в Excel

  1. Перейдите к панели Печать . …
  2. Перейдите к параметрам масштабирования и из выпадающего меню выберите пункт Вписать лист в одну страницу .
  3. Все содержимое листа будет вписано в рамки одного печатной страницы.
  4. Если такой масштаб Вас устраивает, нажмите Печать .

Как изменить размер страницы в Excel?

Как изменить размер страницы в Эксель

  1. Воспользоваться командой Разметка страница – Параметры страницы – Размер. Изменение размера листа в Excel.
  2. Выполнить Файл – Печать и выбрать нужный размер
  3. В окне Параметры страницы выбрать из списка Размер бумаги

Как сжать файл Excel для отправки по почте?

Нажмите и удерживайте клавишу SHIFT, после чего выберите рисунки, к которым необходимо применить сжатие. Перейдите на вкладку Формат рисунка и нажмите кнопку Сжать .

Как можно сжать файл?

Как сжать файл с помощью 7-Zip

  1. Нажмите правой кнопкой мышки по файлу, в появившемся меню выберите «7-Zip», а затем Добавить к «name. zip» (Add to «name. …
  2. После этого в папке, где находится файл, выбранный для сжатия, появится архив. …
  3. Размер файла будет указан в появившемся окне.
  4. Затем так же узнайте размер файла-архива.

Как очистить файл Excel от мусора?

Нажмите сочетание клавиш Ctrl+Shift+стрелка вниз – выделятся все пустые строки до конца листа. Удалите их, нажав на клавиатуре Ctrl+знак минус или выбрав на вкладке Главная – Удалить – Удалить строки с листа (Home – Delete – Delete rows).

Как уменьшить размер таблицы?

  1. Щелкните таблицу и откройте вкладку Макет таблицы.
  2. В разделе Параметры щелкните Свойства.
  3. На вкладке Таблица выберите пункт Параметры.
  4. В разделе Интервал между ячейками по умолчанию, установите флажок Интервалы между ячейками и введите нужные размеры.

Как уменьшить график в Excel?

Изменение размера диаграммы

  1. Чтобы изменить размер вручную, щелкните диаграмму, а затем перетащите нужные размеры.
  2. Чтобы использовать определенную высоту и ширину, на вкладке «Формат» в группе «Размер» введите размер в поле «Высота и ширина».
  3. Чтобы изменить размер и масштаб диаграммы, на вкладке «Формат» в группе «Размер» нажмите кнопку .

Как сжать файл с фото?

Для уменьшения фотографии нужно открыть файл из папки, в которой хранятся изображения для обработки (Файл -> Открыть) (File -> open). В меню «Изображение» (Image) выбрать «Размер изображения» (image size) — откроется окно настроек расширения и размера. После внесения изменений необходимо кликнуть на «Ок».

Как уменьшить вес фотографии?

Как уменьшить вес фотографии

  1. Открываем фотографию через Paint;
  2. Выбираем инструмент «Растянуть/Наклонить», располагающийся во вкладке «Рисунок»;
  3. В графе «По горизонтали» необходимо изменить значение в меньшую сторону, по вертикали поставить значение, аналогичное первому;
  4. Нажимаем на ОК и сохраняем файл.

Как уменьшить размер файла MP4?

Один из самых легких и простых способов уменьшить размер MP4 файлов — конвертировать файл в формат, который весит меньше. MP4 это формат, который занимает много места на жестком диске. Чтобы этого избежать, вы можете конвертировать файлы в такие форматы, как WMV, FLV и другие.

Источник

Microsoft Excel 97 и более ранних версий Microsoft Excel 98 и более ранние версии этой статьи содержатся в разделе 139405.

Обзор

Microsoft Visual Basic для приложений не поддерживает метод, чтобы определить общее количество страниц, печатаемых на листе. Тем не менее можно использовать метод ExecuteExcel4Macro , чтобы использовать GET. Функция листа Document(50) макрос возвращает общее число страниц, напечатанных на активном листе.

Дополнительные сведения

Корпорация Майкрософт предлагает примеры программного кода только для иллюстрации и без гарантий, явных или подразумеваемых, включая, но не ограничиваясь, подразумеваемые гарантии товарности или пригодности для определенной цели. Предполагается, что вы знакомы с демонстрируемым языком программирования и средствами, используемые для разработки и отладки. Специалисты службы технической поддержки Майкрософт могут объяснить возможности конкретной процедуры, но не выполнять модификации примеров для обеспечения функциональных возможностей или удовлетворения конкретных потребностей.
Если вы имеете ограниченный опыт программирования, у вас может возникнуть потребность связаться с сертифицированным партнером корпорации Майкрософт или консультационной службой корпорации Майкрософт. Для получения дополнительных сведений посетите следующие веб-сайты корпорации Майкрософт:

Сертифицированные партнеры Майкрософт: https://partner.microsoft.com/global/30000104

Консультационная служба корпорации Майкрософт: http://support.microsoft.com/gp/advisoryservice

Дополнительные сведения о доступных вариантах поддержки и о том, как связаться с корпорацией Майкрософт, посетите следующий веб-узел корпорации Майкрософт:условиям обслуживания см. EN-US; CNTACTMSЧтобы использовать приведенный ниже макрос, настройте файл Microsoft Excel следующим образом:

  1. Создайте новую книгу Microsoft Excel.

  2. Выберите диапазон A1:J100.

  3. Введите цифру 1 и нажмите клавиши CTRL + ENTER. Вы должны увидеть все выделенные ячейки заполнены с номером 1.

  4. Вставьте модуль макроса Visual Basic.

  5. Введите в модуль следующий код:

  6. 
    


    Sub ShowMe()
    MsgBox ExecuteExcel4Macro("GET.DOCUMENT(50)") & _
    " pages will be printed."
    End Sub

  7. Запустите макрос.

Ссылки

Дополнительные сведения о функции макрос Get.Document можно найти в справочном руководстве функции Excel.

Нужна дополнительная помощь?

Сейчас практически не встречаются большие таблицы в печатном виде – их заменили большие экраны в больнице, в школе, на предприятиях. Но кто знает, что ждет нас в жизни. Мне, например, удобно сделать печать большой таблицы с перечнем работ по проекту, а затем обычным карандашом отмечать сделанную работу.

По окончании этого урока вы сможете:

  1. Задавать область печати в большой таблице
  2. Задавать параметры печати

У меня часто встречаются таблицы такого типа и размера:

печать большой таблицы

И вот всю её желательно напечатать. Но никаким масштабированием эту таблицу не разместишь нормально по ширине А4 (а это наиболее распространенный размер печати у нас). Как масштабировать лист к печати я рассказала в статье «Excel 42. Параметры страницы».

1. Область печати в большой таблице

Если мне надо организовать печать большой таблицы на нескольких листах, то я никогда не задаю «Область печати» (статья «Excel 45. Заголовок табличный») – смысла нет. Хотя, если вы хотите задать область печати, то не тащите мышкой курсор выделения группы ячеек через всю таблицу (статья «Excel 3. Введение в Excel»), выделяя нужную область, а воспользуйтесь командами Shift+Ctrl+Стрелка (статья «Excel 5. Выделение ячеек в Excel»).

Если вы все-таки задали область печати неважно какого размера (лента Разметка страницы → группа команд Параметры страницы → команда Область печати → команда Задать):

печать большой таблицы

то перейдите Файл → Печать → первая команда из перечня Параметры → команда Игнорировать область печати из выпадающего меню:

печать большой таблицы

Обратите внимание на восклицательный знак, который указывает что печататься будет только заданная область печати, которая умещается на одном печатном листе.

параметры печати большой таблицы

  1. Когда мы проигнорируем область печати, то число страниц печати будет уже 10 (но это для моей таблицы).
  2. А вот нажатие маленькой незаметной кнопки в правом нижнем углу визуализирует значения полей (мы просто увидим границы печатного поля и поля колонтитулов – статья «Excel 42. Параметры страницы»).
  3. Дальше можно поиграть с настройками печати. Удобнее всего вызвать диалоговое окно «Параметры страницы».

2. Параметры печати

Чтобы организовать печать большой таблицы, на нескольких листах нам нужны три вкладки:

параметры печати большой таблицы

  1. Страница
    1. Можно поменять ориентацию страницы
    2. Задать масштаб (количество страниц автоматически пересчитается) или задать количество страниц для печати (масштаб соответствующим образом изменится)
    3. Свойства принтера эта кнопка есть на каждой вкладке)
  2. Параметры страницы (советую установить минимальные значения границы печатного поля такое, какое позволяет ваш принтер)
    1. Границы печати
    2. Границы полей колонтитулов (поскольку при печати больших таблиц колонтитулы нам ни к чему, смело можно установить значения по нулям)
  3. Лист (Последовательность вывода страниц)
    1. Вниз → вправо вверх → вниз
    2. Вправо → влево вниз → вправо

После печати всех листов раскладываем их на ровной достаточно просторной поверхности и склеиваем их либо скрепляем скрепками.

Повторю ещё раз. Необходимость печати больших таблиц на нескольких страницах встречается все реже и реже, но надо быть готовым к любой неожиданности.

Теперь вы сможете:

  1. Задавать область печати в большой таблице
  2. Задавать параметры печати

Понравилась статья? Поделить с друзьями:

А вот еще интересные статьи:

  • Excel количество страниц в книге
  • Excel количество листов в книге for
  • Excel количество столбцов в макросе
  • Excel количество лет от текущей даты
  • Excel количество столбцов в диапазоне

  • 0 0 голоса
    Рейтинг статьи
    Подписаться
    Уведомить о
    guest

    0 комментариев
    Старые
    Новые Популярные
    Межтекстовые Отзывы
    Посмотреть все комментарии