Error saat ENABLE EDITING di Protected View

  1. 6 bulan yang lalu

    Dear All,

    Saya pengguna Excel 2016, pada saat menjalankan ENABLE EDITING saat PROTECTED VIEW, muncul error (screenshot terlampir), padahal saat sebelum dijalankan ENABLE EDITING tidak masalah.
    File yang sama dibukan pada Excel 2010 tidak ada issue ini, tetap bisa terbuka dengan lancar
    mohon bantuan masukannya dari para expert disini
    terima kasih

  2. Caton

    13 Apr 2018 Terverifikasi Indonesia + 12.014 Poin

    @adinata ...

    Sayang screen shootnya tidak terlihat, jadi gak tahu masalahnya apa. Sekedar saran (prediksi) saja:

    [1]. Jalankan Excel 2016 tanpa membuka dokumen apapun (Open default blank Workbook). Kemudian klik tab File dan pilih Options. Pada jendela Excel Options, pilih tab Advanced. Pada grup pengaturan Display, centang pilihan Disable hardware graphics acceleration. Tutup Excel 2016, kemudian jalankan kembali. Periksa kembali pengaturan tersebut untuk memastikan opsi tersebut tidak tercentang. Jika sudah, coba buka kembali dokumen yang bermasalah tersebut.

    [2]. Matikan opsi Protected View. Caranya hampir sama dengan yang pertama, Pada jendela Excel Options, pilih tab Trust Center. Pada jendela Trust Center, pilih tab Protected View, dan hilangkan semua tanda centang pada pilihan yang tersedia. Kalau di Excel 2010 terlihat sebegai berikut:

    protected-view.png

    [3]. Jika masalahnya berkenaan dengan script VBA, maka coba periksa script VBA-nya, apakah ada deklarasi ke fungsi ekternal seperti:

    Private Declare Function FindWindow Lib "USER32" Alias "FindWindowA" ...

    Jika Excel 2016 yang Anda gunakan adalah versi 64bit, deklarasi fungsi eksternal seperti potongan script di atas akan dapat menyebabkan kesalahan. Biasanya, untuk mengatasi masalah tersebut digunakan Conditional Compiling Option seperti:

    #If VBA7 Then
        Private Declare PtrSafe Function FindWindow Lib "USER32" Alias "FindWindowA" _
            (ByVal lpClassName As String, ByVal lpWindowName As String) As LongPtr
        Private m_lhWnd As LongPtr
    #Else
        Private Declare Function FindWindow Lib "USER32" Alias "FindWindowA" _
            (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
        Private m_lhWnd As Long
    #End If

    Demikian yang saya ketahui.

 

atau Mendaftar untuk ikut berdiskusi!