Có cài đặt đăng ký để buộc in lưới, tiêu đề cột cho Excel 2007 trên Windows XP không?


0

Tôi nghĩ rằng tôi đã biết câu trả lời cho điều này ("KHÔNG!") Nhưng tôi nghĩ tôi sẽ tiếp cận và hy vọng rằng ai đó có thể chứng minh tôi sai.

Tôi có rất nhiều (hàng chục ngàn) bảng tính Excel mà tôi sẽ chụp ảnh (in ra TIFF) cho một khách hàng. Họ vừa thêm một nếp nhăn mới để yêu cầu các đường lưới và các tiêu đề cột trên các TIFF kết quả.

Có cách nào để buộc điều này từ cơ quan đăng ký không? Hoặc nó sẽ yêu cầu mở từng tài liệu và kiểm tra các hộp chính xác?

Câu trả lời:


0

Tôi không biết bất kỳ cài đặt đăng ký nào cho việc này, nhưng tôi tưởng tượng nếu tất cả các tài liệu được in đều nằm trong một thư mục thì sẽ không quá khó để xử lý với macro. ví dụ làm việc dưới đây.

Sub GridsHeaders()
    Dim FSO As Object
    Set FSO = CreateObject("Scripting.FileSystemObject")
    Dim FLS As Object, F As Object
    Dim fWB As Workbook, fSheet As Worksheet
    Dim Loc As String

    With Application.FileDialog(msoFileDialogFolderPicker)
        .Title = "Select Folder"
        .AllowMultiSelect = False
        If .Show <> -1 Then Exit Sub
        Loc = .SelectedItems(1)
    End With

    Set FLS = FSO.GetFolder(Loc).Files
    For Each F In FLS
        Loc = UCase(Mid(F.Name, InStrRev(F.Name, ".") + 1))
        If Loc = "XLS" Or Loc = "XLSX" Then
            Set fWB = Workbooks.Open(F.Path)
            For Each fSheet In fWB.Sheets
                fSheet.PageSetup.PrintGridlines = True
                fSheet.PageSetup.PrintHeadings = True
            Next fSheet
            fWB.Close True
        End If
    Next F
End Sub

Đáng buồn thay, chúng không phải - những tài liệu này đang được tạo hình để xem xét pháp lý và quy trình hiện tại của chúng tôi không cho vay để di chuyển các loại tài liệu xung quanh hệ thống tệp willy-nilly.
dreynold

tôi đã thêm một ví dụ hoạt động về việc macro sẽ trông như thế nào với câu trả lời của tôi, trong trường hợp nó có thể giúp bạn. mặc dù bạn không thể hợp nhất các tệp cho một lần chạy, nhưng nó vẫn có thể hữu ích nếu bạn có nhiều hơn một tệp cho mỗi thư mục ở các vị trí.
Xantec

Cảm ơn vì điều đó! Nó đã cho tôi một bit rất quan trọng (foo.PageSetup.PrintGridlines = True) Tôi cần để thực hiện điều này trong python.
dreynold
Khi sử dụng trang web của chúng tôi, bạn xác nhận rằng bạn đã đọc và hiểu Chính sách cookieChính sách bảo mật của chúng tôi.
Licensed under cc by-sa 3.0 with attribution required.