Re: ]] XL-mania [[ Perintah berulang dalam marco

Coba dengan menggunakan perintah For seperti file terlampir.

Macronya adalah sbb:

Sub TesPrint()

    Dim Data As Range

    Dim i As Long

    Set Data = Range("A3").CurrentRegion

    For i = 1 To Data.Rows.Count

        Range("F6") = Data(i).Value

        ActiveSheet.PrintPreview

    Next

End Sub

Salam,

Hendrik Karnadi

Catatan : Untuk mencetak, ganti PrintPreview dengan PrintOut

---

From: "joel_bac@yahoo.co.id" <joel_bac@yahoo.co.id>
To: XL-mania@yahoogroups.com
Sent: Friday, 23 March 2012, 11:57
Subject: ]] XL-mania [[ Perintah berulang dalam marco

Kepada yth Pakar Makro Excel Dengan ini saya mohon bantuan karena saya sangat mendesak ingin mengeprin undangan Yang sangat banyak maka dengan perintah macro mungkin saya tidak perlu mengetik lagi Nama-nama dari daftar ke undangan tapi saya tidak bisa membuat perintah macronya Mohon kepada Bos Excel dapat membantu saya Dalam hal ini yang paling susah saya dapat perintah tanda panah kesamping kekanan, ke kiri Dan ke bawah   Terima Kasih atas bantuannya     Ttd     Joel_bac