Office関連

Internet Explorer用OneNoteアドオンを利用して指定したWebページをOneNoteに取り込むマクロ

Evernote Webクリッパーで指定したWebページをEvernoteに取り込む(Office VBA)」でInternet Explorer用Evernoteアドオンを利用して、指定したWebページをEvernoteに取り込むマクロを紹介していますが、今回はMicrosoft OneNoteで同様のことをしてみようと思います。

事前にWebページ取り込み用のセクションを用意しておいて、OneNoteのオプション「OneNote に送る」から、Web コンテンツの取り込み先を「現在のセクションの新しいページ」にしておきます。

この状態で下記マクロを実行すると、指定したセクションに指定したWebページが取り込まれます。

Option Explicit

Public Sub Sample()
  With CreateObject("InternetExplorer.Application")
    .Visible = True
    .Navigate "//www.ka-net.org/office/of59.html"
    
    '表示待ち
    While .Busy Or .ReadyState <> 4&
      DoEvents
    Wend
    
    CreateObject("OneNote.IEAddin").SendToOneNote .document.Parentwindow
    .Quit
  End With
  MsgBox "処理が終了しました。"
End Sub

関連記事

  1. Office関連

    Office 2016関連資料のリンク(2)

    「Office 2016関連資料のリンク」では主にサポートサイトのリン…

  2. アイコン一覧

    Office 365アイコン(imageMso)一覧(S)

    Office 365のデスクトップ版Officeアプリケーション(Wo…

  3. Office関連

    Office 365 APIをVBAから呼び出す(1)

    2015年4月に公開されたOffice Teamのブログ記事「Toda…

  4. Office関連

    UIAutomationClient参照時にDLL読み込みエラーが発生した時の対処法

    マクロでダイアログやボタンの操作を行う時に便利なUI Automati…

  5. Office関連

    Excel 2013版URLエンコードマクロ

    ※ この情報はOffice 2013 カスタマー プレビュー版を元にし…

  6. Office関連

    [PowerShell]iTextSharpを使ってPDFファイルを結合する

    mougにあった質問「2つのPDFファイルを結合するには」の回答用に書…

コメント

  1. この記事へのコメントはありません。

  1. この記事へのトラックバックはありません。

Time limit is exhausted. Please reload CAPTCHA.

最近の記事

アーカイブ

RapidSSL_SEAL-90x50
PAGE TOP