반복인쇄

컴퓨터/엑셀

풍경소리^^ 2018. 6. 7. 17:37

Sub 반복인쇄()
'
' 반복인쇄 매크로
'
'
Dim sijak As Integer
Dim machim As Integer
Dim i As Integer

sijak = Cells(1, "e").Value
machim = Cells(1, "f").Value
For i = sijak To machim
    Cells(1, "d").Value = i
    ActiveSheet.PrintOut

Next i
End Sub