Saya memiliki 13 lembar kerja dengan 12 lembar untuk setiap bulan. Ada sel di masing-masing 12 lembar dengan nama bulan.
Saya telah mendapatkan skrip VBA untuk menguji apakah bulan saat ini cocok dengan sel dan untuk mengubah warna tab yang sesuai, tetapi membutuhkan perhitungan di lembar untuk memperbarui.
Private Sub Worksheet_Change(ByVal Target As Range)
If Format(Date, "MMMM") = Range("E3").Value Then
Me.Tab.ColorIndex = 10
Else
Me.Tab.ColorIndex = xlColorIndexNone
End If
End Sub
Jika saya berhenti memperbarui lembar bulan lalu dan pindah ke lembar berikutnya, kedua tab akan disorot karena lembar sebelumnya tidak diperbarui. Saya hanya ingin lembar kerja bulan ini disorot.
Apakah ada cara untuk menghitung ulang semua lembar pada buku kerja terbuka dan perubahan tab?