Wa'alaikumussalam Wr. Wb.

Biasanya error trap yang sudah jelas posisinya diberi peng-handle pesannya.
Jadi memang harus paham apakah baris tersebut berpotensi error atau tidak.
Contoh :
Public Sub CobaErrTrapSederhana(lNilai as long, rngData as range)
    Dim l As Long
    Dim sMsg As String

    On Error Resume Next
    l = 1 / lNilai     'berpotensi error, ketika input lNilai adalah 0
    sMsg = sMsg & Now & vbTab & Err.Number & vbTab & Err.Description &
vbCrLf

    l = 2

    l = 2 / 2 * rng.value   'berpotensi error, ketika rng berisi string
atau ada banyak cell dalam rng
    sMsg = sMsg & Now & vbTab & Err.Number & vbTab & Err.Description &
vbCrLf

    MsgBox sMsg
    Err.Clear
End Sub

Wassalamu'alaikum Wr. Wb.
Kid.

2012/11/23 him mah <[email protected]>

> **
>
>
> Assalamu'alaikum Wr. Wb.
>
> ketika kita membuat perintah menggunakan VBA atau makro maka sering
> kita mengalami error, bisa ngga ya semua error itu ditampung terlebih
> dahulu sampai semua prosedur dijalankan sampai akhir. Nah ketika
> emang dalam proses tersebut terjadi error bisa 1 atau lebih, maka
> error tersebut akan ditampilkan dalam sheet tertentu lengkap dengan
> waktu kejadiannya misal saja sheet "ERROR". kira-kira kalau seperti
> itu bagaimana VBA nya
>
> terima kasih
>  
>

Kirim email ke