2012-03-06 22 views
0

これが機能しない理由はわかりません。プロセスパフォーマンスカウンターが無効になっているため、要求された操作は実行できません。

私はレジストリに入り、以下のレジストリキーを削除したが、まだ喜んでいません。このエラーはFor Each Loopで発生します。もし誰かがそれを助けることができればそれは評価されるでしょう 私は、これがアクセス許可の問題かもしれないと思うの.NET Framework 1.1 ます。HKEY_LOCAL_MACHINE \ System \ CurrentControlSet \ Servicesの\ PerfProc \パフォーマンス\無効にパフォーマンスカウンタ

If System.IO.File.Exists(path) Then 
    System.IO.File.Delete(path) 
    ExcelApp.DisplayAlerts = False 
    ExcelApp.ActiveWorkbook.SaveAs(path) 
    ExcelApp.DisplayAlerts = True 

    ExcelApp.Quit() 
    MessageBox.Show("File Exported to: " & path) 

    Dim proc As System.Diagnostics.Process 
    For Each proc In System.Diagnostics.Process.GetProcessesByName("EXCEL") 
     'Debug.Print(Now() & " - Killing process ID " & proc.Id) 
     proc.Kill() 
    Next 



Else 
    'saves the file 
    ExcelApp.DisplayAlerts = False 
    ExcelApp.ActiveWorkbook.SaveAs(path) 
    ExcelApp.DisplayAlerts = True 
    ExcelApp.Quit() 

    Dim proc As System.Diagnostics.Process 
    For Each proc In System.Diagnostics.Process.GetProcessesByName("EXCEL") 
     'Debug.Print(Now() & " - Killing process ID " & proc.Id) 
     proc.Kill() 
+0

私は問題なくコードを実行できます。あなたが得ているエラーは何ですか?また、Dim ExcelAppを新しいExcel.Applicationとして想定しています –

答えて

0

を見て、これは私の経営者のPC上で動作します。管理者アカウントに登録されていません。

関連する問題