'H ファイルと C/Cpp ファイルの表示切替
Sub OpenCppH()
    sn = ActiveDocument.FullName '現在編集中のファイル名
    cl = len(sn) '現在のファイル名の文字数

    '現在が H なら Cpp を表示
    if right(sn, 2) = ".h" then
        s2 = left(sn, cl - 2) + ".cpp" 'Cpp ファイル名
        Documents.Open s2, "Text" '開く
    end if

    '現在が Cpp なら H を表示
    if right(sn, 4) = ".cpp" then
        s2 = left(sn, cl - 4) + ".h" 'H ファイル名
        Documents.Open s2, "Text" '開く
    end if
End Sub


'H ファイルと C/Cpp ファイルの表示切替 (改良版)
Sub OpenCppH()
    sn = ActiveDocument.FullName '現在編集中のファイル名
    cl = len(sn) '現在のファイル名の文字数
    set fs = CreateObject("Scripting.FileSystemObject") 'FileSystemObject

    '現在が H なら Cpp を表示
    if right(sn, 2) = ".h" then
        s2 = left(sn, cl - 2) + ".cpp" 'Cpp ファイル名
        if fs.FileExists(s2) = false then
            exit Sub 'ファイルが存在しないときは終了
        end if
        Documents.Open s2, "Text" '開く
    end if

    '現在が Cpp なら H を表示
    if right(sn, 4) = ".cpp" then
        s2 = left(sn, cl - 4) + ".h" 'H ファイル名
        set fs = CreateObject("Scripting.FileSystemObject") 'FileSystemObject
        if fs.FileExists(s2) = false then
            exit Sub 'ファイルが存在しないときは終了
        end if
        Documents.Open s2, "Text" '開く
    end if
End Sub


リソースのアクセラレータの ID を IDR_ACCELERATOR1 とすると，

BOOL CTestDlg::TranslateAccelerator(MSG* pMsg)
{
   // アクセラレータを一回だけロードする
   static HACCEL hAccel = HACCEL(0);
   if (hAccel == HACCEL(0)) {
       hAccel = ::LoadAccelerators(::AfxGetApp()->m_hInstance, MAKEINTRESOURCE(IDR_ACCELERATOR1));
       ASSERT(hAccel != HACCEL(0));
   }
   // API の TranslateAccelerator を呼ぶ
   return ::TranslateAccelerator(GetSafeHwnd(), hAccel, pMsg);
}


BOOL CTestDlg::PreTranslateMessage(MSG* pMsg)
{
   if (TranslateAccelerator(pMsg))
       return TRUE;
   return CDialog::PreTranslateMessage(pMsg);
}


const int ID_TEST = 100;


BOOL CTestDlg::OnInitDialog()
{
   CDialog::OnInitDialog();
   ::RegisterHotKey(GetSafeHwnd(), ID_TEST, MOD_CONTROL, UINT('D'));
}


void CTestDlg::OnDestroy()
{
   ::UnregisterHotKey(GetSafeHwnd(), ID_TEST);
   CDialog::OnDestroy();
}


BEGIN_MESSAGE_MAP(CTestDlg, CDialog)
//{{AFX_MSG_MAP(CTestDlg)
   ON_MESSAGE(WM_HOTKEY, OnHotKey)
//}}AFX_MSG_MAP
END_MESSAGE_MAP()

LRESULT CTestDlg::OnHotKey(WPARAM wParam, LPARAM lParam)
{
   if (int(wParam) == ID_TEST &&
       UINT(LOWORD(lParam)) == MOD_CONTROL && UINT(HIWORD(lParam)) == UINT('D')) {
       // 目的の処理を行う
   }
   return LRESULT(0);
}


   virtual void CDocument::UpdateAllViews(CView* pSender, LPARAM lHint = 0L, CObject* pHint = NULL);
   virtual void CView::OnUpdate(CView* pSender, LPARAM lHint, CObject* pHint);


//---------------------------------------------------------------------------
//  CObjectWrapper.h

#ifndef CObjectWrapper_h
#define CObjectWrapper_h

#include <afxwin.h>


template <class Type>
class CObjectWrapper : public CObject
{
public:
   explicit CObjectWrapper(const Type& object)
   : wrapped_(object)
   {}

   operator const Type&() const
   { return wrapped_; }

private:
   Type    wrapped_;
};


#endif  //  CObjectWrapper_h

//---------------------------------------------------------------------------
// CObjectWrapperTestView.h

#ifndef CObjectWrapperTestView_h
#define CObjectWrapperTestView_h

#include "CObjectWrapper.h"


class CCObjectWrapperTestView : public CView
{
   DECLARE_DYNCREATE(CCObjectWrapperTestView)

   virtual void OnUpdate(CView* pSender, LPARAM lHint, CObject* pHint);
   virtual void OnDraw(CDC*) {}

   afx_msg void OnTest();
   DECLARE_MESSAGE_MAP()

   enum // for lHint
   {
       UPDATE_RECT = 1
   };

   // Wrapper
   typedef CObjectWrapper<CRect> Wrapper;

   static void TestResult(const CRect& updateRect);
};


#endif  //  CObjectWrapperTestView_h

//---------------------------------------------------------------------------
//  CObjectWrapperTestView.cpp

#include "CObjectWrapperTestView.h"
#include "resource.h" // for ID_TEST


IMPLEMENT_DYNCREATE(CCObjectWrapperTestView, CView)

BEGIN_MESSAGE_MAP(CCObjectWrapperTestView, CView)
   ON_COMMAND(ID_TEST, OnTest)
END_MESSAGE_MAP()

void CCObjectWrapperTestView::OnUpdate(CView* /* pSender */,
                                      LPARAM lHint, CObject* pHint)
{
   switch (lHint) {
       case UPDATE_RECT:
           TestResult(*(Wrapper*)pHint);
           break;
   }
}

void CCObjectWrapperTestView::OnTest()
{
   const CRect updateRect(10, 20, 30, 40); // Dummy Data for Test

   // 他のビューへ更新領域を通知するテスト
   GetDocument()->UpdateAllViews(this, UPDATE_RECT,
                                 &Wrapper(updateRect));
}

void CCObjectWrapperTestView::TestResult(const CRect& updateRect)
{
   // 結果の確認
   TRACE(_T("CCObjectWrapperTestView::TestResult(%d, %d, %d, %d)\n"),
         updateRect.left , updateRect.top   ,
         updateRect.right, updateRect.bottom);
}


#include <tchar.h>
#include <crtdbg.h> /* _RPT0，_RPT1，_RPT2，_RPT3，_RPT4 には必要 */

/* デバッグ出力                                                    */
/* Just-In-Time (JIT) デバッグが有効な場合はデバッガに文字列を出力 */
/* (C/C++ 用，Microsoft Visual C++ 依存)                           */
void Trace(const TCHAR* messageText /* デバッグ出力する文字 */)
{
   _RPT0(_CRT_WARN, messageText);
}


// MemoryLeakTest.h
#ifndef MemoryLeakTest_h
#define MemoryLeakTest_h

#ifdef  _DEBUG
#define _CRTDBG_MAP_ALLOC
#include <crtdbg.h>
#endif  // _DEBUG

#ifndef DEBUG_NEW
#ifdef  _DEBUG
#define DEBUG_NEW   ::new(_NORMAL_BLOCK, __FILE__, __LINE__)
#else   // _DEBUG
#define DEBUG_NEW   new
#endif  // _DEBUG
#endif  // DEBUG_NEW

#define new DEBUG_NEW

// アプリケーションの開始時に呼ぶ
inline void CheckMemoryLeaksStart()
{
#ifdef  _DEBUG
   _CrtSetDbgFlag(_CrtSetDbgFlag(_CRTDBG_REPORT_FLAG) | _CRTDBG_LEAK_CHECK_DF);
#endif  // _DEBUG
}

#endif  // MemoryLeakTest_h

// Main.cpp
#include <iostream>
// 各ソースやヘッダーで "MemoryLeakTest.h" をインクルード
#include "MemoryLeakTest.h"

int Sub();

int main()
{
   CheckMemoryLeaksStart();

   // …省略…
   Sub();
   // …省略…

   return 0;
}

// Sub.cpp
#include <iostream>
// 各ソースやヘッダーで "MemoryLeakTest.h" をインクルード
#include "MemoryLeakTest.h"

int Sub()
{
   // …省略…
}