Friday, 10 November 2017

Belajar IF Programming Macros VBA Excel

Belajar IF Programming Macros VBA Excel - Belajar excel programming sama mas gofur di pikmi masuk pertemuan 2, tetapi karena otak saya terbatas maka saya gak bisa mengerjakan tugas yang diberikan pak gofur. Saya share saja deh materi pertemuan 2 yang diajarkan oleh pak gofur. Ini dia tentang nested if atau if percabangan. Ada beberapa materi yang memang sudah diajarkan dan itu satu kesatuan. Buat temen-temen yang bingung bisa langsung download pada link di bawah ini deh ya. Biar langsung tahu seperti apa sih excel vba programming itu.

Tutorial IF Nested di Visual Basic Excel - Sebagai pengantar dari nested if itu sendiri sebenarnya ada 4 materi tentang if yang perlu temen-temen ketahui. Kalau di programming sih ada pengganti namanya CASE ya. Tetapi disini kita cukup koq menggunakan IF saja. Ada 2 sheet materi yang diajarkan plus 1 sheet data sebagai combo box yang akan digunakan pada form control. Temen-temen boleh juga tahu. Sudah saya share lengkap pada file di bawah ini ya. Materinya komplit banget, saya akan coba cicik dulu deh materi-materinya. Oh iya, sudah munculkan tab developer kan?


Keterangan :

Sub ProsesNilai()

Set FormNilai = Worksheets("Sheet1")
Nilai = FormNilai.Range("E2").Value

If FormNilai.Range("e2").Value = "" Then
    MsgBox "Nilai Harus Terisi", vbInformation, "Silahkan Diisi"
    FormNilai.Range("E2").Select
Else
    If Not IsNumeric(FormNilai.Range("E2").Value) Then
        MsgBox "Nilai Harus Diisi Angka", vbInformation, "Perhatian"
        FormNilai.Range("E2").Select
    Else
        If Nilai > 60 Then
            Hasil = "Anda Lulus"
        Else
            Hasil = "Anda Gagal"
        End If
    End If
End If
    FormNilai.Range("E4").Value = Hasil
   
End Sub

Link Download :


EmoticonEmoticon