Excel

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

[Mayhem]RSSフィードが更新されたら最新記事をEvernoteに取り込む。前のページ

MayhemのOfficeModulesが更新されました。次のページ

関連記事

  1. Excel

    名前付きセル(範囲)にコメントを付けるVBAマクロ

    Excelでマニュアルを作成する際、名前付きセル範囲を明記する必要があ…

  2. Office関連

    [VBA]自動的にフォントサイズを調整する疑似テキストボックス

    前回と同様、環境依存つながりでmougの給湯室に書いたコードを載せてお…

  3. Office関連

    パスワード付のPDFファイルを作成するExcelマクロ

    2019/8/16 追記:WordやPowerPointにも対応し…

  4. Office関連

    RSSの日付を変換するVBAマクロ

    RSSから取得した日付(「Wed, 20 Dec 2017 00:02…

  5. アイコン一覧

    Office 2013 アイコン一覧(E)

    ・Office 2013 アイコン一覧 NUM…

コメント

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

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

Time limit is exhausted. Please reload CAPTCHA.

※本ページはプロモーションが含まれています。

Translate

最近の記事

アーカイブ

PAGE TOP