Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Экспорт в pdf - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Экспорт в pdf
Экспорт в pdf
Матраскин Дата: Пятница, 01.03.2013, 15:19 | Сообщение № 1
Группа: Друзья
Ранг: Обитатель
Сообщений: 375
Репутация: 81 ±
Замечаний: 0% ±

20xx
Здравствуйте!
есть следующий код:

В этом коде я из 2 листов экселя делаю 2 файла pdf. А как бы мне так изменить код, чтобы эти 2 листа экспортировались в один файл?

в интернете опять кто-то не прав
 
Ответить
СообщениеЗдравствуйте!
есть следующий код:

В этом коде я из 2 листов экселя делаю 2 файла pdf. А как бы мне так изменить код, чтобы эти 2 листа экспортировались в один файл?
Автор - Матраскин
Дата добавления - 01.03.2013 в 15:19
RAN Дата: Пятница, 01.03.2013, 15:55 | Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
[vba]
Код
    ThisWorkbook.ExportAsFixedFormat xlTypePDF, Папка & "\111111111.pdf"
[/vba]

Лишние листы скрыть.

Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение[vba]
Код
    ThisWorkbook.ExportAsFixedFormat xlTypePDF, Папка & "\111111111.pdf"
[/vba]

Лишние листы скрыть.
Автор - RAN
Дата добавления - 01.03.2013 в 15:55
Матраскин Дата: Пятница, 01.03.2013, 15:59 | Сообщение № 3
Группа: Друзья
Ранг: Обитатель
Сообщений: 375
Репутация: 81 ±
Замечаний: 0% ±

20xx
хорошая идея... наверно. наверняка можно их скрыть...отправить на экспорт нужное, а потом вернуть все листы обратно, надо попробовать! спасибо!

в интернете опять кто-то не прав
 
Ответить
Сообщениехорошая идея... наверно. наверняка можно их скрыть...отправить на экспорт нужное, а потом вернуть все листы обратно, надо попробовать! спасибо!
Автор - Матраскин
Дата добавления - 01.03.2013 в 15:59
WinIce Дата: Пятница, 01.03.2013, 16:01 | Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 10
Репутация: 0 ±
Замечаний: 0% ±

Матраскин,
Может так попробовать?
[vba]
Код
ActiveWorkbook.ExportAsFixedFormat
[/vba]

Добавлено.
Мдя, долго я писал ответ...


Сообщение отредактировал WinIce - Пятница, 01.03.2013, 16:02
 
Ответить
СообщениеМатраскин,
Может так попробовать?
[vba]
Код
ActiveWorkbook.ExportAsFixedFormat
[/vba]

Добавлено.
Мдя, долго я писал ответ...
Автор - WinIce
Дата добавления - 01.03.2013 в 16:01
nika Дата: Суббота, 02.03.2013, 04:32 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 43
Репутация: 0 ±
Замечаний: 0% ±

2010
RAN,
А как будет выглядеть код полностью?
Спасибо!
 
Ответить
СообщениеRAN,
А как будет выглядеть код полностью?
Спасибо!
Автор - nika
Дата добавления - 02.03.2013 в 04:32
Матраскин Дата: Понедельник, 04.03.2013, 09:18 | Сообщение № 6
Группа: Друзья
Ранг: Обитатель
Сообщений: 375
Репутация: 81 ±
Замечаний: 0% ±

20xx
nika,
[vba]
Код
Sub PDF()
Sheets("errore").Visible = False ' скрыть все ненужные листочки!
ThisWorkbook.ExportAsFixedFormat xlTypePDF, "\111111111.pdf"
Sheets("errore").Visible = True ' и возвращаем их обратно
End Sub
[/vba]

в интернете опять кто-то не прав

Сообщение отредактировал Матраскин - Понедельник, 04.03.2013, 09:39
 
Ответить
Сообщениеnika,
[vba]
Код
Sub PDF()
Sheets("errore").Visible = False ' скрыть все ненужные листочки!
ThisWorkbook.ExportAsFixedFormat xlTypePDF, "\111111111.pdf"
Sheets("errore").Visible = True ' и возвращаем их обратно
End Sub
[/vba]
Автор - Матраскин
Дата добавления - 04.03.2013 в 09:18
nika Дата: Среда, 06.03.2013, 04:37 | Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 43
Репутация: 0 ±
Замечаний: 0% ±

2010
Матраскин, выдаёт ошибку в первой строке кода. Что нужно исправить?

[vba]
Код
Sub PDF() Sheets("errore").Visible = False ' скрыть все ненужные листочки!
ThisWorkbook.ExportAsFixedFormat xlTypePDF, "\111111111.pdf"
Sheets("errore").Visible = True ' и возвращаем их обратно
End Sub
[/vba]

Спасибо!
 
Ответить
СообщениеМатраскин, выдаёт ошибку в первой строке кода. Что нужно исправить?

[vba]
Код
Sub PDF() Sheets("errore").Visible = False ' скрыть все ненужные листочки!
ThisWorkbook.ExportAsFixedFormat xlTypePDF, "\111111111.pdf"
Sheets("errore").Visible = True ' и возвращаем их обратно
End Sub
[/vba]

Спасибо!
Автор - nika
Дата добавления - 06.03.2013 в 04:37
Матраскин Дата: Среда, 06.03.2013, 09:17 | Сообщение № 8
Группа: Друзья
Ранг: Обитатель
Сообщений: 375
Репутация: 81 ±
Замечаний: 0% ±

20xx
nika,
[vba]
Код
Sub PDF()
ThisWorkbook.ExportAsFixedFormat xlTypePDF, "\111111111.pdf"
End Sub
[/vba]
первая строка вам не нужна

в интернете опять кто-то не прав
 
Ответить
Сообщениеnika,
[vba]
Код
Sub PDF()
ThisWorkbook.ExportAsFixedFormat xlTypePDF, "\111111111.pdf"
End Sub
[/vba]
первая строка вам не нужна
Автор - Матраскин
Дата добавления - 06.03.2013 в 09:17
RAN Дата: Среда, 06.03.2013, 10:17 | Сообщение № 9
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Может и нужна, да листа такого нет. smile
И что нужно - нет. cool

Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеМожет и нужна, да листа такого нет. smile
И что нужно - нет. cool
Автор - RAN
Дата добавления - 06.03.2013 в 10:17
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Экспорт в pdf
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!