Как да използвате командния бутон за запазване на активен работен лист като PDF файл в Excel?
Докато работите в Microsoft Excel, може да се сблъскате с проблема със запазването на активен работен лист като PDF файл. В тази статия можете да научите как да запазите активен работен лист като PDF файл с VBA код чрез команден бутон. И ако също искате да запазите диапазон или всеки работен лист в активната работна книга като отделен PDF файл, тази статия също може да ви помогне.
Използвайте командния бутон, за да запазите активния работен лист като PDF файл с VBA код
Лесно запишете активен или всеки работен лист като отделен PDF файл с Kutools за Excel
Използвайте командния бутон, за да запазите активния работен лист като PDF файл с VBA код
Можете да стартирате следния VBA код, за да запазите активен работен лист като PDF файл, като щракнете върху команден бутон. Моля, направете следното.
1. Първо, трябва да създадете папка с име PDF за запазване на вашия нов конвертиран PDF файл. Тук създавам тази папка в моя локален диск (C:).
2. Моля, вмъкнете команден бутон, като щракнете Софтуерен Инженер > Поставете > Команден бутон (ActiveX Control). Вижте екранна снимка:
2. След това нарисувайте команден бутон в работния лист, от който се нуждаете, за да добавите нови редове, щракнете с десния бутон върху командния бутон и щракнете върху Имоти от менюто с десен бутон.
3. В Имоти диалогов прозорец, въведете показания текст на командния бутон в Надпис кутия под Категоризирани и след това затворете диалоговия прозорец.
Можете да видите, че показаният текст на командния бутон е променен, както е показано на екранната снимка по-долу.
4. Щракнете отново с десния бутон върху командния бутон и след това щракнете Преглед на кода от менюто с десен бутон.
5. В откриването Microsoft Visual Basic за приложения прозорец, моля, заменете оригиналния код в прозореца на кода със следния VBA код.
VBA код: Команден бутон за запазване на активен работен лист като PDF
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:="C:\PDF\Export.pdf", _
OpenAfterPublish:=False
Application.ScreenUpdating = True
End Sub
Забележка: В кода CommandButton1 е името на командния бутон, който ще използвате, за да запазите активния лист като PDF файл. „C:\PDF\Export.pdf“ е пътят и името на вашия запазващ PDF файл.
6. Натисни Друг + Q клавиши едновременно, за да затворите Microsoft Visual Basic за приложения прозорец. След това изключете Режим на проектиране под Софтуерен Инженер раздела.
Сега щракнете върху командния бутон, активният работен лист ще бъде записан като PDF файл с име Експортиране и разположен на посоченото място.
Запазете всеки работен лист като отделен PDF файл на активна работна книга с Kutools за Excel
Тук препоръчайте Разделена работна книга полезност на Kutools за Excel за лесно запазване на активен работен лист като PDF файл. Освен това можете също да запазите всеки работен лист в текущата работна книга като отделен PDF файл с тази помощна програма.
Преди да кандидатствате Kutools за Excel, Моля те първо го изтеглете и инсталирайте.
1. В работната книга трябва да запишете всеки работен лист като отделен PDF файл, след което щракнете Kutools плюс > Workbook > Разделена работна книга. Вижте екранна снимка:
2. В Разделена работна книга диалогов прозорец, моля, конфигурирайте както следва:
След това избраният работен лист се записва незабавно като PDF файл.
бележки:
Ако искате да имате безплатен пробен период (30 дни) на тази помощна програма, моля, щракнете, за да го изтеглитеи след това преминете към прилагане на операцията съгласно горните стъпки.
Демонстрация: Запазете селекцията или всеки работен лист като PDF с Kutools за Excel
Свързани статии:
- Как да вмъкна празен нов ред автоматично чрез команден бутон в Excel?
- Как да форматирам клетка, за да изглежда като 3D бутон в Excel?
- Как да скриете или покажете команден бутон въз основа на определена стойност на клетка в Excel?
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!