Coba tambahkan prosedur berikut ini didalam sebuah module, kemudian
jalankan.
Public Sub CekLibrary()
    Dim o As Object
    Dim s As String

    For Each o In Application.VBE.ActiveVBProject.References
        If o.isbroken Then
            s = s & o.Description & vbCrLf
        End If
    Next o
    If LenB(s) <> 0 Then
        MsgBox "Library yang rusak :" & vbCrLf & s, vbExclamation, "Cek
Library"
    Else
        MsgBox "Ok semua.", vbInformation, "Cek Library"
    End If
End Sub

Jika muncul pesan berupa daftar library yang rusak, maka library tersebut
yang harus diperbaiki di *komputer setempat
*
Jadi kasus ini relatif terhadap komputernya.

Wassalam,
Kid.




2013/7/4 Bos Kbrn <[email protected]>

> **
>
>
> para master excel yang budiman, saya mau bertanya
> aplikasi yang saya unduh dari google kalau di copy dari flasdisk ke
> komputerlain selalu tidak bisa dijalankan muncul error can't find library
> or project, file tersebut masih dipassword sheet dan workbooknya, saya
> tidak tahu passwordnya.
> bagaimana cara mengatasinya.
> file terlampir ini linknya
> http://www.4shared.com/file/Sn5IQvuJ/BOS_SDN_2_Dukuhwaluh.html
> best regards
>
>  
>

Kirim email ke