Re: [belajar-excel] Timer Pindah Sheet [1 Attachment]

nangagus [email protected] [belajar-excel] Tue, 24 May 2016 01:26:23 -0700

Asalamualaikum warahmatullah,
Mas Heri,

sebaiknya untuk tidak menggunakan nama macro, prosedur, scope maupun nama variabel dengan nama bawaan Excel. Misalnya menamakan sebuah prosedur dengan nama "Sheet1" ini akan menyebabkan excel error yang susah mencarinya.

Agar setelah shhet 5 kembali ke sheet 1 lagi hilangkan tanda ' pada kata 'mbaleke di sub pindah5

sehingga menjadi
mbalekeke

Perlu diingat harus pula disiapkan sebuah prosedur untuk menghentikan proses tersebut. kalau tidak dihentikan maka komputer akan bekerja terus menerus dan tidak berhenti. Meskipun Excel ditutup, jika proses tersebut belum selesai maka excel akan terbuka lagi dan mengerjakan tugas yang tidak pernah selesai ( berputar dari sheet 1 ke 5 dst)

semoga tidak bingung seperti saya.

wasalamualaikum warahmatullah.
Nang Agus

On 24/05/2016 13:13, 'Heri Pamungkas ( Gmail )' [email protected] [belajar-excel] wrote:



السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.

Alhamdulillah, mas Nang Agus emang luar biasa.

Saya masih bingung untuk loopnya euy, bagaimana supaya terus
muter sheetnya ?!

Berikut saya sampaikan filenya...


وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Warm Regards,
On 24/05/2016 13:01, Nang Agus [email protected] [belajar-excel] wrote:

Asalamualaikum warahmatullah

Mas Heri, coba cekrip:
Private Sub Workbook_Open()
Application.OnTime TimeValue("12:00:00"), "pindahSheet"
End Sub

diubah menjadi:

Private Sub Workbook_Open()
|Application.OnTime Now +TimeValue("00:02:00"),|"pindahSheet"
End Sub

wasalamualakum warahmatullah.

NangAgus

2016-05-24 11:25 GMT+07:00 'Heri Pamungkas ( Gmail )' [email protected] <mailto:[email protected]> [belajar-excel] <[email protected] <mailto:[email protected]>>:



    السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
    Semangat pagi,.

    Alhamdulillah sudah dicoba dan berhasil.
    Terima kasih mas Nang Agus.

    Kalau mau tambah lagi boleh kan ya ?!,

    Misalnya saya punya 5 sheet berbeda.
    Mau berpindah sheet setiap 2 menit sekali, hehehe kira-kira gimana ya !?



    وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

    Warm Regards,

    On 21/05/2016 12:03, Nang Agus [email protected]
    <mailto:[email protected]> [belajar-excel] wrote:

    Coba pada Workbook open dibuat cekrip:

    Private Sub Workbook_Open()
    Application.OnTime TimeValue("12:00:00"), "pindahSheet"
    End Sub

    pindahSheet merupakan macro yang diletakkan di Module, misalnya:

    Public Sub pindahSheet()
    Sheets("Sheet2").Select
    Range("A5") = "wis jam12"
    End Sub

    salam
    NangAgus

    2016-05-20 9:25 GMT+07:00 'Heri Pamungkas ( Gmail )'
    [email protected] <mailto:[email protected]>
    [belajar-excel] <[email protected]
    <mailto:[email protected]>>:

-- السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

        Semangat pagi,.

        Dear Teman-teman,

        Mau iseng-iseng bikin Workbook Excell yang bisa pindah sheet
        otomatis.
        Nah, kalo manual Insyaallah sudah bisa. Kalau pakai Timer
        gimana ya ?!

        Mohon bantuannya.

        وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

        Warm Regards,

Timer.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12

Re: [belajar-excel] Timer Pindah Sheet [1 Attachment]

Kirim email ke