macro Excel

  1. tahun lalu

    cara membuat msg warning alert untuk data pada cel D5 jika katanya " salah"
    *capture terlampir
    terimakasih

    Untuk pertanyaan mbak @Ratnawia di atas, awalnya saya juga terpikir untuk menggunakan fitur Data Validation sebagaimana yang mas @Zolydck katakan. Namun sampai saat ini saya belum tau bagaimana caranya. Mungkin mas @Zolydck bisa berbagi ilmunya?

    Jika menggunakan macro (VBA) tidak menjadi masalah, maka itu bisa menjadi solusi. Contohnya pada object Sheet1 dibuatkan kode:

    Private Sub Worksheet_Change(ByVal Target As Range)
        If Target.Address = "$B$4" Then
            If (UCase$(Me.Range("E4").Value) = "SALAH") Then
                MsgBox "Input yang Anda masukkan salah.", vbExclamation Or vbOKOnly
                Target.Activate
            End If
        End If
    End Sub

    Kode di atas berlaku untuk satu sel input saja (sel B4). Jika ternyata sel inputnya banyak, atau bentuk tabel inputnya berbeda, maka susunan kode VBA-nya juga akan berbeda. Jadi harus dilihat dulu bagaimana bentuk tabel inputnya. Misalkan bentuk tabel inputnya nanti mau seperti Tabel A, Tabel B atau Tabel C?

    [attachment:594442e39fd53]

    Maaf, file dan kode VBA-nya nyusul ya... :D Mau sahur dulu...

  2. pake validasi aja

  3. Caton

    16 Jun 2017 Terverifikasi Jawaban Terpilih Indonesia + 12.376 Poin
    Di sunting tahun lalu oleh Caton

    Untuk pertanyaan mbak @Ratnawia di atas, awalnya saya juga terpikir untuk menggunakan fitur Data Validation sebagaimana yang mas @Zolydck katakan. Namun sampai saat ini saya belum tau bagaimana caranya. Mungkin mas @Zolydck bisa berbagi ilmunya?

    Jika menggunakan macro (VBA) tidak menjadi masalah, maka itu bisa menjadi solusi. Contohnya pada object Sheet1 dibuatkan kode:

    Private Sub Worksheet_Change(ByVal Target As Range)
        If Target.Address = "$B$4" Then
            If (UCase$(Me.Range("E4").Value) = "SALAH") Then
                MsgBox "Input yang Anda masukkan salah.", vbExclamation Or vbOKOnly
                Target.Activate
            End If
        End If
    End Sub

    Kode di atas berlaku untuk satu sel input saja (sel B4). Jika ternyata sel inputnya banyak, atau bentuk tabel inputnya berbeda, maka susunan kode VBA-nya juga akan berbeda. Jadi harus dilihat dulu bagaimana bentuk tabel inputnya. Misalkan bentuk tabel inputnya nanti mau seperti Tabel A, Tabel B atau Tabel C?

    bentuk_tabel.png

    Maaf, file dan kode VBA-nya nyusul ya... :D Mau sahur dulu...

  4. Caton

    18 Jun 2017 Terverifikasi Indonesia + 12.376 Poin

    Wah, maaf kelamaan nih :D ... Menyambung komentar saya sebelumnya, berikut saya lampirkan file yang bisa dicoba... Pada dasarnya, untuk tipe Tabel A dan Tabel C saya lebih suka menyelesaikannya dengan Event Procedure Worksheet Change, sedangkan untuk tipe Tabel B, menggunakan Worksheet Calculate. Meskipun dapat menggunakan salah satu prosedur saja untuk seluruh tipe tabel, namun disesuaikan saja dengan kebutuhan.

  5. terimakasih untuk bantuannya @caton dan @zolydck

  6. maaf baru bales, validasi saya buat dikolom input dengan custom =EXACT(C9,D9), jadi saat diisi kolom ke 2 dan tidak sama dengan kolom ke 1 maka eror muncul.. kalo rumus makro saya blum paham,blum pernah belajar situ, dan saya pakai wps office yang ga suport makro.. file terlampir

  7. Caton

    20 Jun 2017 Terverifikasi Indonesia + 12.376 Poin

    Oh.. Oke mas @Zolydck. Trims ya atas ilmunya... :)

  8. sama" mas @Caton, saya masih pemula, mohon bimbingan belajarnya :D

 

atau Mendaftar untuk ikut berdiskusi!