Loncat ke daftar isi utama

Bagaimana cara memeriksa apakah satu tahun adalah tahun kabisat di Excel?

Tahukah Anda bagaimana menentukan apakah tahun adalah tahun kabisat atau bukan? Di Excel, tidak ada metode langsung bagi Anda untuk memeriksanya, tetapi Anda dapat membuat fungsi atau rumus yang ditentukan pengguna untuk memecahkan masalah ini.

Periksa apakah satu tahun adalah tahun kabisat dengan rumus

Periksa apakah tahun adalah tahun kabisat dengan User Defined Function


panah gelembung kanan biru Periksa apakah satu tahun adalah tahun kabisat dengan rumus

Misalkan Anda memiliki daftar tahun di lembar kerja, rumus panjang berikut dapat membantu Anda menentukan apakah tahun tertentu adalah tahun kabisat atau bukan. Harap lakukan seperti ini:

1. Selain sel tahun, di sel kosong, masukkan rumus ini:

= IF (OR (MOD (A2,400) = 0, AND (MOD (A2,4) = 0, MOD (A2,100) <> 0)), "Leap Year", "NOT a Leap Year"), (A2 berisi tahun Anda ingin menerapkan rumus ini, Anda dapat mengubahnya sesuai kebutuhan Anda) lihat tangkapan layar:

doc-check-if-leap-tahun-1

2. Lalu seret gagang isian ke kisaran yang Anda inginkan untuk memuat rumus ini, dan semua tahun telah diperiksa apakah itu tahun kabisat atau bukan.

doc-check-if-leap-tahun-1

Note: Jika sel relatif kosong, rumus ini juga akan memperlihatkan Tahun Kabisat.


panah gelembung kanan biru Periksa apakah tahun adalah tahun kabisat dengan User Defined Function

Anda juga dapat membuat User Defined Function untuk memeriksa apakah tahun tersebut adalah tahun kabisat, Anda dapat menyelesaikannya seperti ini:

1. Tahan ALT + F11 kunci, dan itu membuka Jendela Microsoft Visual Basic for Applications.

2. Klik Menyisipkan > Modul, dan tempel kode berikut di Jendela Modul.

Kode VBA: periksa apakah satu tahun adalah tahun kabisat

Function IsLeapYear(pYear As Integer) As Boolean
'Update 20140623
If (pYear Mod 4) = 0 And (pYear Mod 100) <> 0 Or ((pYear Mod 400) = 0) Then
   IsLeapYear = True
Else
   IsLeapYear = False
End If
End Function

3. Kemudian simpan dan tutup kode ini, kembali ke lembar kerja Anda, dan masukkan rumus ini: = isleapyear (A2), lihat tangkapan layar:

doc-check-if-leap-tahun-1

4. Lalu seret gagang isian ke sel yang ingin Anda isi dengan rumus ini, dan semua tahun telah dicentang, file SALAH singkatan bukan tahun kabisat dan BENAR menunjukkan tahun kabisat. Lihat tangkapan layar:

doc-check-if-leap-tahun-1


Artikel terkait:

Temukan penyebut persekutuan terendah atau faktor persekutuan terbesar di Excel

Alat Produktivitas Kantor Terbaik

馃 Kutools AI Ajudan: Merevolusi analisis data berdasarkan: Eksekusi Cerdas   |  Hasilkan Kode  |  Buat Rumus Khusus  |  Analisis Data dan Hasilkan Grafik  |  Aktifkan Fungsi Kutools...
Fitur Populer: Temukan, Sorot, atau Identifikasi Duplikat   |  Hapus Baris Kosong   |  Gabungkan Kolom atau Sel tanpa Kehilangan Data   |   Putaran tanpa Formula ...
Pencarian Super: VLookup Beberapa Kriteria    VLookup Nilai Berganda  |   VLookup di Beberapa Lembar   |   Pencarian Fuzzy ....
Daftar Drop-down Lanjutan: Buat Daftar Drop Down dengan Cepat   |  Daftar Drop Down yang Bergantung   |  Multi-pilih Drop Down List ....
Manajer Kolom: Tambahkan Jumlah Kolom Tertentu  |  Pindahkan Kolom  |  Alihkan Status Visibilitas Kolom Tersembunyi  |  Bandingkan Rentang & Kolom ...
Fitur Unggulan: Fokus Kisi   |  Tampilan Desain   |   Bar Formula Besar    Manajer Buku Kerja & Lembar   |  Perpustakaan Sumberdaya (Teks otomatis)   |  Pemetik tanggal   |  Gabungkan Lembar Kerja   |  Enkripsi/Dekripsi Sel    Kirim Email berdasarkan Daftar   |  Filter Super   |   Filter Khusus (filter tebal/miring/coret...) ...
15 Perangkat Teratas12 Teks Tools (Tambahkan Teks, Hapus Karakter, ...)   |   50 + Grafik jenis (Gantt Chart, ...)   |   40+ Praktis Rumus (Hitung usia berdasarkan ulang tahun, ...)   |   19 Insersi Tools (Masukkan Kode QR, Sisipkan Gambar dari Jalur, ...)   |   12 Konversi Tools (Angka ke Kata, Konversi Mata Uang, ...)   |   7 Gabungkan & Pisahkan Tools (Lanjutan Gabungkan Baris, Pisahkan Sel, ...)   |   ... dan banyak lagi

Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu.  Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...

Deskripsi Produk


Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!

 

Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
ivec, your determination of a leap year within Excel itself works if the year is at / later than the Excel base year of 1900. For years before the Excel base year of 1900, I believe an external determination is required.
This comment was minimized by the moderator on the site
What about relying on Excel's own definition of a leap year?
The expression below checks the difference between March 1st and Feb 28 in that year - a leap year will have Feb 29 in-betweek, which makes a difference of 2 days.
IsLeapYear formula: = ( DATE( $$YEAR_REF$$ ;3;1)-DATE( $$YEAR_REF$$ ;2;28) > 1.5 )

The 1.5 is because I'm not sure if there is a risk of floating-point inaccuracies...
This comment was minimized by the moderator on the site
Please don't post my previous comment.
This comment was minimized by the moderator on the site
Using Excel 2013 the VBA returns backwards, saying 2015 is a leap year and 2016 is not
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
Rate this post:
0   Characters
Suggested Locations