Bagaimana Mula Menggunakan Makro di Word

Bagaimana Mula Menggunakan Makro di Word

Bosan melakukan tugas berulang di Microsoft Word? Dikebumikan dalam program ini adalah alat automasi yang kuat yang dapat mengambil pekerjaan dari tangan anda. Kami bercakap tentang makro, dan walaupun fitur ini bergantung pada Visual Basic for Applications (VBA) Microsoft, anda boleh menggunakannya walaupun idea pengekodan memberi anda heebie-jeebies.





Dengan satu klik pada butang, Word akan merakam tindakan anda, menghasilkan makro yang dapat anda mainkan sekerap yang anda mahukan. Sekiranya anda suka berpetualang, anda boleh mengubah makro dengan mudah untuk mendapatkan tahap automasi tambahan.



Di sini kami akan menunjukkan satu contoh mudah tetapi berguna: Cara mengautomasikan fungsi Cari dan Ganti Word.





Merakam Makro

Dalam contoh ini, anda adalah presiden Persatuan Pemeliharaan Peralatan Pergigian Antik yang terhormat. Anda mempunyai puluhan dokumen Word mengenai gigi palsu bersejarah dan seumpamanya, semuanya dengan nama masyarakat disebut dengan jelas. Kemudian tiba-tiba, dewan memilih untuk menukar nama menjadi Dental Antiques Preservation League. Sekarang anda memerlukan kaedah mudah untuk mengemas kini dokumen.

Anda boleh memulakan dengan dokumen kosong baru atau membuka dokumen yang ada. Sekiranya anda belum melakukannya, anda mesti mengaktifkan tab Pembangun.



Pergi ke Fail> Pilihan> Sesuaikan Pita . Di sebelah kanan, bawah Tab Utama , periksa Pemaju pilihan. Pilih OK dan keluar.

pengawal xbox satu tidak dihidupkan

Sekarang mari buat makro kami.



  1. Klik Pembangun> Rakam Makro .
  2. Anda akan diminta untuk menamakan makro. Masukkan ChangeSocietyName atau nama lain yang sesuai dengan anda. Semasa menamakan makro, hindari spasi, titik, tanda seru, dan watak khas, jika tidak, anda akan mendapat mesej ralat. Anda boleh menggunakan nombor, tetapi watak pertama mestilah huruf.
  3. Anda boleh menetapkan makro ke butang dan / atau pintasan papan kekunci, tetapi ini bukan syarat. Sekiranya anda memilih Butang, Word akan membolehkan anda menambahkannya ke Bar Alat Akses Pantas. Anda juga boleh menambahkan penerangan ringkas makro.
  4. Klik okey , dan Word kini akan merakam tindakan anda. Pukul Ctrl + H untuk memunculkan Cari dan tukar dialog.
  5. Masukkan Masyarakat untuk Pemeliharaan Peralatan Pergigian Antik di Cari dan Liga Pemeliharaan Antik Gigi di Ganti.
  6. Klik Ganti Semua untuk menjalankan operasi Cari dan Ganti. Ini adalah satu-satunya tindakan yang ingin anda rakam. Tidak menjadi masalah sama ada makro benar-benar menggantikan teks apa pun. Maksudnya adalah menyimpannya untuk dokumen lain.
  7. Ini penting: Klik Pembangun> Berhenti Merakam . Jika tidak, makro akan merangkumi semua tindakan seterusnya.

Sekarang mari kita lihat hasil kerja anda. Buka dokumen yang mengandungi nama masyarakat. Klik Pembangun> Makro . Sekiranya anda mengklik dua kali pada ChangeSocietyName, Word secara automatik akan melakukan operasi Cari dan Ganti.

Petua: Semasa anda merakam makro, anda mungkin perlu melakukan tindakan yang anda tidak mahu dirakam. Sebagai contoh, anda mungkin mahu menyalin dan menampal teks ke dalam dialog Cari dan Ganti daripada menaipnya secara manual. Tiada masalah: Klik sahaja Pembangun> Jeda Rakaman , salin dan tampal teks, kemudian klik Pembangun> Resume Perakam . Kemudian anda boleh menyelesaikan rakaman makro seperti yang dijelaskan di atas.



Walaupun kami fokus di Microsoft Word, anda juga dapat gunakan makro untuk meningkatkan produktiviti dalam Excel . Dan terdapat banyak makro yang menjimatkan masa untuk Microsoft OneNote.

Menyelam Kod

Sekarang kita akan melihat lebih mendalam makro Word baru kita. Pergi ke Pembangun> Makro , tetapi bukannya mengklik dua kali pada makro, pilih dan klik Edit . Ini membuka editor Visual Basic, persekitaran mandiri untuk membina aplikasi VBA.

Mungkin kelihatan menakutkan, tetapi anda boleh mengabaikan menu dan kebanyakan panel. Fokus pada tetingkap yang mengandungi kod. Seperti yang anda lihat, Word baru saja menulis makro yang melakukan Find and Replace.


Sub ChangeSocietyName()
'
' ChangeSocietyName Macro
' Rename Society for the Preservation of Antique Dental Appliances
'
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = 'Society for the Preservation of Antique Dental Appliances'
.Replacement.Text = 'Dental Antiques Preservation League'
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

Mari kita jelaskan apa yang berlaku di sini.

Sub pada baris pertama adalah kependekan dari subrutin, program kecil yang dapat berjalan sendiri atau sebagai sebahagian dari aplikasi VBA yang lebih besar. Garis yang didahului dengan tanda petik tunggal adalah untuk komen. Tanda petik memberitahu VBA untuk mengabaikan sebarang pernyataan yang sesuai.

penyemak imbas terbaik untuk windows xp 2019

Kemudian kita sampai pada daging kod: kod yang menjalankan Cari dan tukar operasi. Seperti yang anda lihat, ini menentukan nilai untuk setiap pilihan dalam dialog Cari dan Ganti, termasuk teks dan teks pengganti dalam tanda petik. The Pemilihan.Cari.Laksanakan arahan di hujungnya sama dengan mengklik butang Ganti Semua.

Mengubah Makro

Untuk menggunakan makro, anda tidak perlu mengacaukan kod atau melihatnya. Tetapi anda boleh memanfaatkan fungsi ini jika anda ingin menyelam. Sebagai contoh, andaikan anda membuat kesalahan ketik semasa merakam makro. Daripada merakamnya semula, anda boleh masuk ke Visual Basic dan memperbaikinya.

Anda juga boleh mengubah makro agar lebih berguna, dan itulah yang akan kami lakukan di sini. Semasa anda menjalankan Cari dan Ganti, sama ada secara manual atau melalui makro, Word mengingati teks penemuan dan penggantian. Kali berikutnya anda membuka dialog Cari dan Ganti, ia akan kelihatan seperti ini.

Lebih baik membersihkan nilainya sehingga kita mendapat kotak dialog yang bersih. Kami akan melakukannya dengan makro kedua, kecuali kali ini, kami akan melakukannya secara langsung dalam Visual Basic.

  1. Dalam editor Visual Basic, pilih keseluruhan subrutin, dari baris pertama hingga Sub Akhir. Pukul Ctrl + C untuk menyalinnya.
  2. Letakkan kursor di bawah End Sub dan tekan Ctrl + V . Anda baru sahaja menggandakan subrutin.
  3. Tukar nama dari ChangeSocietyName ke ClearFindReplace (atau nama lain yang sesuai dengan anda). Ini penting kerana VBA akan menghasilkan mesej ralat jika anda cuba menjalankan makro dengan nama pendua.
  4. Di dalam .Teks dan Penggantian.Teks nilai, hapus teks tetapi tinggalkan tanda petik. Pada dasarnya, anda memberitahu Word untuk tidak mencari apa-apa dan menggantinya dengan apa-apa, tetapi anda juga membersihkan nilai-nilai tersebut.

Hasilnya kelihatan seperti ini:


Sub ClearFindReplace()
'
' ClearFindReplace Macro
' Clear Text from Find and Replace dialog
'
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = ''
.Replacement.Text = ''
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

Sekarang kita akan kembali ke makro ChangeSocietyName. Di bawah kod Cari dan Ganti, tetapi sebelum Sub Akhir, masukkan ClearFindReplace (tanpa tanda kurung di akhir).

Betul: Anda tidak perlu memasukkan semua kod yang baru anda buat, hanya nama makro.


Sub ChangeSocietyName()
'
' ChangeSocietyName Macro
' Rename Society for the Preservation of Antique Dental Appliances
'
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = 'Society for the Preservation of Antique Dental Appliances'
.Replacement.Text = 'Dental Antiques Preservation League'
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
ClearFindReplace
End Sub

Apabila Word menjalankan ChangeSocietyName, pertama ia akan melaksanakan fungsi Cari dan Ganti yang asal. Kemudian ia akan menafsirkan ClearFindReplace sebagai arahan untuk menjalankan makro kedua.

Melangkah Lebih Lanjut Dengan VBA

Seperti yang anda lihat, fungsi rakaman makro Word dapat membantu anda menjimatkan masa dengan banyak cara. Anda boleh membuat makro untuk mengautomasikan hampir semua operasi, dan dalam editor Visual Basic, anda dapat mengubah makro, menanamkan satu makro di dalam yang lain, atau membuat subrutin yang menjalankan beberapa makro satu demi satu.

Oleh kerana VBA adalah bahasa pengaturcaraan lengkap, anda boleh memasukkan subrutin ke dalam aplikasi yang lebih besar dengan pemboleh ubah, gelung, pernyataan bersyarat, dan banyak lagi. Dan setelah anda mengetahui asas-asas VBA di Word, anda boleh menggunakan banyak pengetahuan yang sama untuk membuat makro di Microsoft Excel dan Access.

cara menghapus pautan yang disalin di android

Untuk melangkah lebih jauh, anda ingin mengetahui lebih lanjut mengenai konvensyen VBA dan editor Visual Basic, seperti cara mengatur kod anda dan cara menangani pepijat. Tetapi walaupun anda ingin menggunakan fungsi mudah seperti yang dijelaskan di sini, anda boleh meningkatkan produktiviti anda.

Berkongsi Berkongsi Tweet E-mel Tutorial Pemula Menulis Makro VBA di Excel (Dan Mengapa Anda Perlu Belajar)

Sekiranya anda menggunakan Excel secara berkala, ada baiknya belajar bagaimana membuat makro VBA dan mendapatkan akses ke lebih banyak fungsi dan keupayaan.

Baca Seterusnya Topik-topik yang berkaitan
  • Produktiviti
  • Microsoft word
  • Microsoft Office 365
  • Microsoft Office 2016
  • Petua Microsoft Office
  • Microsoft Office 2019
  • Makro
Mengenai Pengarang Stephen Beale(6 Artikel Diterbitkan)

Stephen Beale adalah penulis teknologi lama yang berpusat di kawasan San Francisco. Dia telah mengarang banyak buku mengenai aplikasi komputer dalam penerbitan dan reka bentuk grafik, dan merupakan bekas editor berita dan ulasan untuk Macworld. Dia kini menjalankan The Steampunk Explorer, laman web yang popular untuk peminat steampunk.

Lagi Dari Stephen Beale

Langgan buletin kami

Sertailah buletin kami untuk mendapatkan petua, ulasan, ebook percuma, dan tawaran eksklusif!

Klik di sini untuk melanggan