3

現在実行中の Excel に接続するはずの次のコードを確認してください。

#include <windows.h>
#include <oleacc.h>
#import "C:\Program Files (x86)\Common Files\microsoft shared\OFFICE14\MSO.DLL" no_implementation rename("RGB", "ExclRGB") rename("DocumentProperties", "ExclDocumentProperties") rename("SearchPath", "ExclSearchPath")
#import "C:\Program Files (x86)\Common Files\microsoft shared\VBA\VBA6\VBE6EXT.OLB" no_implementation
#import "C:\Program Files (x86)\Microsoft Office\Office14\EXCEL.EXE" rename("DialogBox", "ExclDialogBox") rename("RGB", "ExclRGB") rename("CopyFile", "ExclCopyFile") rename("ReplaceText", "ExclReplaceText")

BOOL CALLBACK EnumChildProc(HWND hwnd, LPARAM)
{
   WCHAR szClassName[64];
   if(GetClassNameW(hwnd, szClassName, 64))
   {
      if(_wcsicmp(szClassName, L"EXCEL7") == 0)
      {
         //Get AccessibleObject
         Excel::Window* pWindow = NULL;
         HRESULT hr = AccessibleObjectFromWindow(hwnd, OBJID_NATIVEOM, __uuidof(Excel::Window), (void**)&pWindow);
         if(hr == S_OK)
         {
            //Excel object is now in pWindow pointer, from this you can obtain the document or application
            Excel::_Application* pApp = NULL;
            pApp = pWindow->GetApplication();
            pWindow->Release();
         }
         return false;     // Stops enumerating through children
      }
   }
   return true;
}

int main( int argc, CHAR* argv[])
{
    //The main window in Microsoft Excel has a class name of XLMAIN
    HWND excelWindow = FindWindow(L"XLMAIN", NULL);
    //Use the EnumChildWindows function to iterate through all child windows until we find _WwG
    EnumChildWindows(excelWindow, (WNDENUMPROC) EnumChildProc, (LPARAM)1);
    return 0;
}

真実は、現時点で Excel が実際に実行されていることですが、AccessibleObjectFromWindow は E_FAIL を返します。また、このコードをループで実行し、Excel に切り替えてアプリケーションに焦点を合わせようとしました。同じ話、AccessibleObjectFromWindow は E_FAIL を返します。私は今インターネットで答えを探していますが、以前に見つかったものはすべて何もくれませんでした。したがって、誰かが説明を提供できれば、それは大歓迎です。

4

1 に答える 1

2

いくつかのコード例から答えが見つかりました:

int main( int argc, CHAR* argv[])
{
    CoInitialize( NULL );
    ...

この問題は、他のオブジェクトで作業を開始する前に CoInitialize(NULL) を呼び出すことで解決されます。

于 2011-12-23T15:13:52.243 に答える