excel 如何使自动计数器打印页数

slwdgvem 于 2023-01-21 发布在其他

关注(0)|答案(1)|浏览(210)

我有两个宏，一个用于按帐号对Excel工作表进行排序，另一个用于打印页面并将PDF文件放入文件夹中。排序的第一个宏需要基于帐号的单元格中的引用，我们将其设置为F01 0001到F01 2000，然后F02一直到F14。是否有办法使单元格进入F01 0001，然后排序，然后打印，然后进入F01 0002自动执行并循环该过程，直至完成

Sub Automake()
    For Each r In Range("E8")
        r.Value = r.Value + 1
        run filter e by e:8
        run produceinv
    Next r
End Sub

excel

来源：https://stackoverflow.com/questions/75163171/how-to-make-a-auto-counter-to-print-pages

1条答案

按热度按时间

zbdgwd5y1#

这将遍历所有这些帐号：

Option Explicit
Sub Filter_And_Sum()

    Dim lPrefix As Long
    Dim lCount As Long
    Dim Account_Number As String
    
    For lPrefix = 1 To 14
        For lCount = 1 To 2000
            Account_Number = "F" & Format(lPrefix, "00") & " " & Format(lCount, "0000")
            Debug.Print Account_Number
            
            ' Do something ...
            
        Next lCount
    Next lPrefix
    
End Sub

输出：
第一节第一节第一节第一节第一次

赞(0）回复(0）举报 2023-01-21

我来回答

excel 如何使自动计数器打印页数

1条答案

相关问题

热门标签

最新问答