Hai Longinus,

Coba manfaatkan error trap dengan klausa on error.

Private Sub lblWeb_Click()
   on error resume next     'set trap error untuk bypass baris yang error
dan mengeksekusi baris berikutnya
 ThisWorkbook.FollowHyperlink lblWeb.Caption
   err.clear     'buang status error terakhir
   on error goto 0    'kembalikan setting trap error ke default
End Sub

Jika akan diberi pesan dan sebagainya, sisipkan tepat sebelum baris
err.clear

Regard,
Kid



2015-05-12 2:08 GMT+10:00 Longinus Lee [email protected]
[belajar-excel] <[email protected]>:

>
>
> Dear All Master
>
> Terimakasih sdh izinkan  saya bergabung di forum ini,
> mohon bantuan master untuk kasus berikut ini :
>
> Private Sub lblWeb_Click()
>  ThisWorkbook.FollowHyperlink lblWeb.Caption
> End Sub
>
> masalahnya adalah pada saat komputer offline/atau tidak terkoneksi
> internet label tersebut di click maka terjadi debug macro.
>
> mohon dapat pencerahanya agar modul tersebut pada kondisi offline bila di
> click tidak terjadi debug.
>
> Terimakasih.
>
> Salam,
> Longinus
>
>  
>

Kirim email ke