Assalamu'alaikum Wr. Wb.
Materi praktikum yang kita pelajari dalam mata kuliah "Analisis Laporan Keuangan UMKM" yaitu materi "Rumus VBA cmd Batal". Untuk lebih jelasnya mengenai materi "Rumus VBA cmd Batal" dapat dipelajari pada materi berikut:
‘TOMBOL BATAL TIDAK BERFUNGSI JIKA TRANSAKSI BELUM ADA
If Range(“K12”).Value = 0 Then ‘<< K12 ADALAH CELL TOTAL Item
Exit Sub
End If
‘KONFIRMASI UNTUK MEMBATALKAN TRANSAKSI
Pesan = MsgBox(“Apakah ingin membatalkan transaksi?”, vbQuestion + vbYesNo, “Konfirmasi”)
If Pesan = vbYes Then
Sheets(“Transaksi Kasir”).Select ‘<< MEMILIH SHEET Transaksi Kasir
Range(“C8:H107”) = “” ‘<< MENGOSONGKAN TABEL TRANSAKSI
Range(“H4”) = “”
Range(“K4”) = “=today()” ‘<< MENAMPILKAN TANGGAL HARI INI
Range(“K6”) = “”
Range(“K8”) = “”
Range(“K6”).Select
Else
Exit Sub
End If
Demikian penjelasan materi dari saya, semoga bermanfaat.
Let’s Study! Have a nice day!
Wassalamu’alaikum Wr. Wb.

Comments
Post a Comment