Petua: Bahasa lain diterjemahkan Google. Anda boleh melawat English versi pautan ini.
Log masuk
x
or
x
x
Daftar Sekarang
x

or

Bagaimana untuk menentukan tarikh atau format tarikh dalam tajuk atau pengaki?

Biasanya, apabila anda memasukkan tarikh atau masa ke dalam header atau footer dengan &[Tarikh] or &[Masa] kod, tarikh atau format masa adalah berdasarkan tetapan serantau yang dikawal oleh Windows. Dalam kes ini, bagaimanakah anda boleh menukar format tarikh atau tarikh waktu kepada keperluan anda sendiri dalam header atau footer seperti tangkapan skrin berikut?

tarikh format doc di header 1

Tentukan format tarikh atau tarikh pada header atau footer dengan kod VBA


anak panah gelembung kanan biru Tentukan format tarikh atau tarikh pada header atau footer dengan kod VBA


Di sini, saya akan memperkenalkan beberapa kod VBA mudah untuk anda menyelesaikan tugas ini dalam Excel, sila lakukan seperti berikut:

1. Aktifkan lembaran kerja anda yang anda mahu masukkan dan formatkan tarikh dalam header atau footer, dan kemudian klik Bentangan Halaman butang di sudut kanan bawah buku kerja untuk membolehkan paparan susun atur halaman, lihat tangkapan skrin:

tarikh format doc di header 2

2. Tahan ALT + F11 kunci dalam Excel untuk membuka Microsoft Visual Basic untuk Aplikasi tingkap.

3. Klik Memasukkan > Modul, dan tampal kod berikut dalam Modul Tetingkap.

Kod VBA: Masukkan dan format tarikh dalam pengepala atau pengaki:

Sub add_date_header()
ActiveSheet.PageSetup.CenterHeader = Format(Date, "mmmm dd, yyyy")
End Sub

Nota: Dalam kod di atas, anda boleh mengubahnya CenterHeader kepada LeftHeader, CenterFooter..., dan format tarikh mmmm dd, yyyy juga boleh diubah seperti yang anda perlukan.

4. Kemudian tekan F5 kunci untuk menjalankan kod ini, dan format tarikh tertentu anda telah dimasukkan ke dalam header atau footer sekaligus. Lihat tangkapan skrin:

tarikh format doc di header 3

Tips: Jika anda mahu memasukkan format masa tarikh anda sendiri ke dalam header atau footer, sila gunakan kod di bawah:

Sub Change_Format()
  ActiveSheet.PageSetup.CenterHeader = Format(Now, "MMMM DD, YYYY HH:MM:SS")
End Sub

Dan anda akan mendapat hasil berikut:

tarikh format doc di header 4



Cadangan Alat Produktiviti untuk Excel

Kutools untuk Excel Membantu Anda Selalu Menyelesaikan Kerja di Hadapan Masa, dan Berdiri Daripada Orang

  • Lebih daripada ciri-ciri canggih 300 yang canggih, yang direka untuk senario kerja 1500, meningkatkan produktiviti oleh 70%, memberi anda lebih banyak masa untuk menjaga keluarga dan menikmati kehidupan.
  • Tidak perlu lagi menghafal formula dan kod VBA, berikan rehat dari otak anda sekarang.
  • Menjadi pakar Excel dalam minit 3, Operasi yang rumit dan berulang boleh dilakukan dalam beberapa saat,
  • Mengurangkan beribu-ribu operasi papan kekunci & tetikus setiap hari, mengucapkan selamat tinggal kepada penyakit pekerjaan sekarang.
  • 110,000 orang yang sangat berkesan dan pilihan syarikat 300 + yang terkenal di dunia.
  • Ciri-ciri penuh 60-hari adalah percubaan percuma. Jaminan wang balik 60 hari. Tahun 2 peningkatan dan sokongan percuma.

Membawa Browsing Tab dan Editing ke Microsoft Office, Jauh Lebih Berkuasa Daripada Tab Penyemak Imbas

  • Tab Pejabat direka untuk Aplikasi Pejabat Word, Excel, PowerPoint dan Lain-lain: Penerbit, Akses, Visio dan Projek.
  • Buka dan buat beberapa dokumen dalam tab baharu pada tetingkap yang sama, dan bukannya dalam tetingkap baru.
  • Meningkatkan produktiviti anda oleh 50%, dan mengurangkan beratus-ratus klik tetikus untuk anda setiap hari!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.