IE11の印刷プレビューウィンドウ内でVBAをクリックする

Question

IE11の印刷プレビューウィンドウ内の印刷アイコン（Alt + P）をクリックするマクロを作成したいと思います。 私はFindWindow、FindWindowEx、SendMessageとPostMessage関数を使用することを考えました。 ウィンドウの情報を確認したところ、印刷アイコンをクリックするボタンが表示されていないようでした。 Print Preview Window Info

ウィンドウ内をクリックするたびに、InternetExplorer_TridentDlgFrameのみがクラスに表示されます。では、印刷アイコンをクリックする必要がありますか？

異なるシステムでこのマクロを使用しているので、Sendkeysを使用したり、場所に基づいてマウスクリックを実行したりしたくありません。

これを行うには適切な方法がありますか？どんなアイデアも非常に便利です。前もって感謝します。

Answer 1

は詳細私は、Webページの自動化をしていて、私はこのコードを使用することはできませんhttps://msdn.microsoft.com/en-us/library/aa752117(v=vs.85).aspx

Option Explicit 

Sub printIE() 

    Const OLECMDID_PRINT = 6   ' declarations needed for late binding only if mnemonics are desired in ExecWB command 
    Const OLECMDID_PRINTPREVIEW = 7 

    Const OLECMDEXECOPT_DODEFAULT = 0 
    Const OLECMDEXECOPT_PROMPTUSER = 1 
    Const OLECMDEXECOPT_DONTPROMPTUSER = 2 
    Const OLECMDEXECOPT_SHOWHELP = 3 

    Dim IE As Object     ' late binding 

' Dim IE As InternetExplorer   ' early binding ... reference microsoft internet controls 

    Set IE = CreateObject("InternetExplorer.Application") 

' IE.Visible = True 
    IE.navigate ("google.co.in") 

    Do Until IE.ReadyState = 4 
    Loop 

    IE.ExecWB OLECMDID_PRINTPREVIEW, OLECMDEXECOPT_DONTPROMPTUSER 

' IE.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER 

End Sub