Private Sub Worksheet_Activate() Worksheets("rtganjil").Unprotect "1" 'Range("G11").Select 'ActiveWindow.Zoom = 95 'ActiveWindow.ScrollColumn = 1 Worksheets("rtganjil").Protect "1", userinterfaceonly:=True End Sub
Langganan:
Posting Komentar (Atom)
Menghitung USIA Excel
=BYROW(D2:D100; LAMBDA(tanggal_lahir; IF(tanggal_lahir=""; ""; DATEDIF(tanggal_lahir; TODAY(); "y"...
-
Salin ke Clipboard Salin ke Clipboard Salin Tercopy! ...
-
=MOD(ROW();2)=1
-
Option Explicit Private Sub Workbook_BeforeClose(Cancel As Boolean) Select Case MsgBox("Apakah anda ingin menyimpan file ini?", v...
Tidak ada komentar:
Posting Komentar