Assalamu'alaikum Wr. Wb.
Materi praktikum yang kita pelajari dalam mata kuliah "Analisis Laporan Keuangan UMKM" yaitu materi "Rumus VBA cmd Simpan". Untuk lebih jelasnya mengenai materi "Rumus VBA cmd Simpan" dapat dipelajari pada materi berikut:
‘TIDAK DAPAT SIMPAN DATA JIKA TRANSAKSI BELUM ADA
If Range (“K12”).Value = 0 Then ‘<< K12 ADALAH CELL Total Item
MsgBox “Data tidak dapat disimpan, belum ada transaksi”, vbExclamation, “Konfirmasi”
Exit Sub
End If
‘KONFIRMASI UNTUK SIMPAN DATA
Pesan = MsgBox(“Apakah ingin melanjutkan proses simpan data?”, vbQuestion + vbYesNo, “Konfirmasi”)
If Pesan = vbYes Then
MsgBox “Data berhasil disimpan”, vbInformation, “Konfirmasi”
CetakNota ‘<< MEMANGGIL PROSEDUR CetakNota
SimpanNoNota ‘<< MEMANGGIL PROSEDUR SimpanNoNota
SimpanData ‘<< MEMANGGIL PROSEDUR SimpanData YANG SUDAH KITA BUAT PAKAI Module1
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