Menjalankan makro secara automatik apabila membuka buku kerja

Important: Artikel ini diterjemahkan oleh mesin, lihatlah notis penafian. Sila dapatkan versi Bahasa Inggeris artikel ini di sini sebagai rujukan anda

Anda mungkin ingin anda rakam makro berjalan secara automatik apabila anda membuka buku kerja khusus. Prosedur berikut menggunakan contoh untuk menunjukkan anda cara yang berfungsi. Anda juga boleh menjalankan makro secara automatik apabila Excel bermula.

Sebelum anda bermula, pastikan tab Pembangun ditunjukkan pada reben. Jika tiada di situ, lakukan perkara berikut:

  1. Klik Fail > Opsyen > Sesuaikan Reben.

  2. Di bawah Sesuaikan Reben, dalam kotak Tab Utama, semak kotak Pembangun.

  3. Klik OK.

Untuk menggunakan contoh di bawah dalam buku kerja anda sendiri, cipta helaian untuk setiap hari bagi bulan tersebut dan namakan setiap tab helaian dengan sewajarnya. Contohnya, namakannya 1 Mac, 2 Mac dan selanjutnya sehingga 31 Mac. Makro akan berjalan secara automatik apabila anda membuka buku kerja yang menunjukkan tab untuk hari semasa bagi bulan tersebut.

  1. Klik Pembangun > Visual Basic.

Kumpulan Kod pada tab Pembangun

  1. Klik Selitkan > Modul.

  2. Dalam modul, selitkan kod berikut:

    Peribadi Sub Auto_Open()
    Dim vntToday sebagai varian
    vntToday = WorksheetFunction.Text (tarikh, "bbbb HH")
    pada ralat Resume berikut
    Sheets(vntToday). Pilih
    jika sesat <> 0 kemudian
    MsgBox "Lembaran kerja tidak wujud."
    Lagi
    Range("A1"). Pilih
    menamatkan Jika
    menamatkan Sub

  3. Tutup Visual Basic (anda tidak perlu menyimpan apa-apa).

  4. Simpan buku kerja sebagai Buku Kerja Didayakan Makro Excel (*xlsm) dan tutup.

Pada kali seterusnya anda membuka buku kerja tersebut, tab untuk hari semasa akan dipilih, dengan kursor dalam sel A1. Jika lembaran kerja untuk hari tersebut tidak wujud, mesej “Lembaran kerja tidak wujud” akan muncul.

Tip: Anda boleh mencipta buku kerja baru untuk setiap bulan apabila tiba masanya dan mencipta makro sekali lagi untuk buku kerja baru itu.

Note: Notis Penafian Penterjemahan Mesin: Artikel ini telah diterjemah oleh sistem komputer tanpa campur tangan manusia. Microsoft menawarkan penterjemahan mesin ini untuk membantu pengguna-pengguna yang tidak bertutur dalam Bahasa Inggeris supaya dapat menikmati kandungan mengenai produk, perkhidmatan dan teknologi Microsoft. Artikel ini mungkin mengandungi ralat perbendaharaan kata, sintaks atau tatabahasa kerana ia diterjemahkan oleh mesin.

Kembangkan kemahiran anda
Jelajahi latihan
Dapatkan ciri baru terlebih dahulu
Sertai Office Insiders

Adakah maklumat ini membantu?

Terima kasih atas maklum balas anda!

Terima kasih atas maklum balas anda! Nampaknya ia mungkin akan membantu untuk menyambungkan anda kepada salah seorang daripada ejen sokongan Office kami.

×