Excel VBA in nhiều trang thành một tệp PDF
|
Ngay cả khi bạn xuất nhiều trang tính thành một tệp PDF duy nhất, mọi trang tính sẽ bắt đầu trên một trang mới trong tệp PDF đã xuất Show
Nếu không, trước tiên bạn cần sao chép mọi thứ vào một trang tính và chỉ xuất trang tính tóm tắt đó. Excel không thể xuất 2 trang tính khác nhau trên một trang Lưu ý rằng việc sao chép mọi thứ vào một trang tính tóm tắt duy nhất chỉ có ý nghĩa nếu độ rộng cột trong các trang tính của bạn giống nhau. Nếu không, bạn sẽ dễ dàng gây rối Tôi mới tạo mã và macro. Điều tôi đang muốn làm là tạo một mẫu cho phép người quản lý của chúng tôi điền vào một số thông tin trên tab DỮ LIỆU của tôi sẽ đưa vào các tab khác. Sau đó, họ sẽ nhấp vào tên trang tính mà họ muốn lưu dưới dạng pdf bằng cách nhấp vào tên trang tính này trong hộp danh sách. Sau đó, để lưu dưới dạng PDF, tôi đang cố gắng tạo mã để khi nhấp vào nút điều khiển biểu mẫu, mã/macro sẽ chạy và bật lên hộp thoại lưu dưới dạng với PDF đã được chọn làm loại tệp và họ có thể . Sau rất nhiều lần tìm kiếm, tôi đã có thể tạo mã bên dưới. Đối với hầu hết các phần, nó hoạt động, ngoại trừ việc tôi chọn trang tính nào từ hộp danh sách của mình, nó sẽ in tất cả các trang tính trong sổ làm việc. Xin hãy giúp tôi tìm và sửa lỗi của tôi. Mã.
Đảm bảo rằng bạn chọn các trang tính mà bạn muốn lưu dưới dạng một tệp pdf trước khi chạy macro. Để chọn nhiều trang tính, nhấn và giữ CTRL, sau đó nhấn bằng nút chuột trái bằng chuột trên các tab trang tính nằm ở cuối màn hình Excel của bạn Điều này xảy ra khi bạn bắt đầu macro
2. 2 mã VBASub SaveSelectedSheetsToPDF()
Dim str As String, myfolder As String, myfile As String
str = "Do you want to save these sheets to a single pdf file?" & Chr(10)
For Each sht In ActiveWindow.SelectedSheets
str = str & sht.Name & Chr(10)
Next sht
answer = MsgBox(str, vbYesNo, "Continue with save?")
If answer = vbNo Then Exit Sub
With Application.FileDialog(msoFileDialogFolderPicker)
.Show
myfolder = .SelectedItems(1) & "\"
End With
myfile = InputBox("Enter filename", "Save as..")
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
myfolder & myfile _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True
End Sub
3. Tôi đặt mã ở đâu trong sổ làm việc của mình?
Lưu ý, hãy lưu sổ làm việc của bạn với phần mở rộng tệp *. xlsm (sổ làm việc hỗ trợ macro) để đính kèm mã Giải thích vĩ môMacro bắt đầu bằng Sub và sau đó là tên macro Sub SaveSelectedSheetsToPDF() khai báo biến Các biến str, myfolder và myfile được khai báo kiểu dữ liệu String. Dim str As String, myfolder As String, myfile As String Nối các chuỗi văn bản Tên trang tính đã chọn được nối với một câu hỏi, Chr(10) là dấu xuống dòng str = "Do you want to save these sheets to a single pdf file?" & Chr(10) For Each sht In ActiveWindow.SelectedSheets str = str & sht.Name & Chr(10) Next sht Hộp tin nhắn Hộp thông báo cho phép bạn xác nhận bạn đã chọn đúng trang tính. Nếu câu trả lời là không thì macro kết thúc answer = MsgBox(str, vbYesNo, "Continue with save?") If answer = vbNo Then Exit Sub Chọn thư mục With Application.FileDialog(msoFileDialogFolderPicker) .Show myfolder = .SelectedItems(1) & "\" End With Nhập tên tệp myfile = InputBox("Enter file name", "Save as..")
Tạo pdf Kết thúc macro End Sub Gán macro cho một nút để truy cập nhanh
Lưu macro trong sổ làm việc macro cá nhân của bạnNếu bạn lưu macro trong sổ làm việc macro cá nhân, thì bạn có thể truy cập macro đó bất kể bạn đang mở sổ làm việc nào Đọc này. Sao chép macro của bạn vào Sổ làm việc Macro Cá nhân Lấy tệp ExcelXuất tất cả các trang tính trong sổ làm việc sang PDF theo chương trình v3. xlsm danh mục vĩ mô Lưu dữ liệu hóa đơn [VBA] Mở tệp Excel trong một thư mục [VBA] Chia dữ liệu trên nhiều trang tính [VBA] Làm việc với COMBO BOXES [Điều khiển biểu mẫu] Xác định các số bị thiếu trong một cột Chạy Macro từ danh sách thả xuống [VBA] Lịch Excel [VBA] Thay đổi phạm vi dữ liệu biểu đồ bằng cách sử dụng Danh sách thả xuống [VBA] Làm việc với TỆP Tự động thay đổi kích thước cột khi bạn nhập Cách tạo biểu đồ Excel tương tác [VBA] Cách thay đổi động ảnh trong trang tính [VBA] Tạo nút In [VBA] Tạo danh sách riêng biệt duy nhất bằng cách sử dụng Bộ lọc nâng cao trong macro [VBA] Tạo trang tính mới theo chương trình dựa trên các giá trị trong phạm vi ô [VBA] Mẫu Excel. Hoàn thành công việc [VBA] Cách đánh dấu hàng của ô đã chọn theo chương trình Hiển thị/ẩn ảnh bằng nút Tìm các ô chứa công thức có giá trị bằng chữ (mã hóa cứng) danh mục exceltrang chủ Bài viết cập nhật mới nhất Hàm Excel Hơn 300 hàm Excel với thông tin chi tiết bao gồm cú pháp, đối số, giá trị trả về và ví dụ cho hầu hết các hàm được sử dụng trong công thức Excel Công thức Excel Hơn 1300 công thức được sắp xếp trong các danh mục con Bảng Excel Bảng Excel đơn giản hóa công việc của bạn với dữ liệu, thêm hoặc xóa dữ liệu, lọc, tính tổng, sắp xếp, nâng cao khả năng đọc bằng cách sử dụng định dạng ô, tham chiếu ô, công thức, v.v. Bộ lọc nâng cao Cho phép bạn lọc dữ liệu dựa trên giá trị đã chọn , văn bản nhất định hoặc tiêu chí khác. Nó cũng cho phép bạn lọc dữ liệu hiện có hoặc di chuyển các giá trị đã lọc sang vị trí mới Xác nhận dữ liệu Cho phép bạn kiểm soát những gì người dùng có thể nhập vào một ô. Nó cho phép bạn chỉ định các điều kiện và hiển thị thông báo tùy chỉnh nếu dữ liệu đã nhập không hợp lệ Danh sách thả xuống Cho phép người dùng làm việc hiệu quả hơn bằng cách hiển thị danh sách mà người dùng có thể chọn một giá trị từ đó. Điều này cho phép bạn kiểm soát những gì được hiển thị trong danh sách và nhanh hơn so với nhập vào một ô Phạm vi được đặt tên Cho phép bạn đặt tên cho một hoặc nhiều ô, điều này giúp bạn dễ dàng tìm ô bằng cách sử dụng hộp Tên, đọc và hiểu các công thức chứa tên thay vì tham chiếu ô Trình giải Excel Bộ giải Excel là một phần bổ trợ miễn phí sử dụng các ô mục tiêu, các ràng buộc dựa trên các công thức trên trang tính để thực hiện phân tích giả định và các vấn đề quyết định khác như hoán vị và kết hợp biểu đồ Một tính năng của Excel cho phép bạn trực quan hóa dữ liệu trong biểu đồ Định dạng có điều kiện Định dạng ô hoặc giá trị ô dựa trên điều kiện hoặc tiêu chí, có nhiều công cụ Định dạng có điều kiện tích hợp sẵn mà bạn có thể sử dụng hoặc sử dụng công thức định dạng có điều kiện tùy chỉnh Bảng tổng hợp Cho phép bạn nhanh chóng tóm tắt lượng dữ liệu khổng lồ theo cách rất thân thiện với người dùng. Tính năng Excel mạnh mẽ này cho phép bạn phân tích, sắp xếp và phân loại dữ liệu quan trọng một cách hiệu quả VBA VBA là viết tắt của Visual Basic for Applications và là ngôn ngữ lập trình máy tính do Microsoft phát triển, nó cho phép bạn tự động hóa các tác vụ tốn thời gian và tạo các chức năng tùy chỉnh macro Một chương trình hoặc chương trình con được xây dựng trong VBA mà bất kỳ ai cũng có thể tạo. Sử dụng trình ghi macro để nhanh chóng tạo macro VBA của riêng bạn UDF UDF là viết tắt của Hàm do người dùng xác định và là các hàm được tạo tùy chỉnh mà bất kỳ ai cũng có thể tạo Lưu trữ Danh sách tất cả các bài báo đã xuất bản 12 phản hồi cho “Cách lưu nhiều trang tính cụ thể vào tệp pdf theo chương trình”
|
