Bls: [belajar-excel] Macro-Print All Page

2013-11-25 Terurut Topik Lazuardi Biru
 makasih pak..sesuai harapan suwun.. Pada Selasa, 26 November 2013 9:57, Lazuardi Biru menulis:    seandainya slip mau saya print per 6 orang macro mana yang harus saya ganti pak.. apa yang ini ("Slip!C1") = 3 saya ganti ("Slip!C1") = 6 Pada Selasa, 26 November 2013 8:46, hendrik ka

Bls: [belajar-excel] Macro-Print All Page

2013-11-25 Terurut Topik Lazuardi Biru
 seandainya slip mau saya print per 6 orang macro mana yang harus saya ganti pak.. apa yang ini ("Slip!C1") = 3 saya ganti ("Slip!C1") = 6 Pada Selasa, 26 November 2013 8:46, hendrik karnadi menulis:   Coba codes ini: Private Sub CmdPrint_Click() Dim i As Integer Range("Slip!C1") = 3 Rang

Re: [belajar-excel] Macro-Print All Page

2013-11-25 Terurut Topik hendrik karnadi
Coba codes ini: Private Sub CmdPrint_Click() Dim i As Integer Range("Slip!C1") = 3 Range("Slip!I1") = 1 For i = 1 To Sheets("RekapGaji").Range("M1")     Me.PrintPreview     Range("Slip!I1") = Range("Slip!I1") + 1     Range("Slip!C1") = Range("Slip!C1") + 3 Next i End Sub Private Sub CommandButton