三流君 ken3のmemo置き場

三流プログラマーのメモ書きです。主にVBAやWindowsの話題が多いです

挨拶・自己紹介:
失敗続きのAB型の変わり者 :三流プログラマー Ken3です
フリーのエンジニア・個人事業主です・・と書くと聞こえはイイが(それとなくカッコよく聞こえるが)、 現在は小さな案件の受注請負 と 短期派遣 で 日々つつましく?ほそぼそと暮らしてます。

よく検索されるキーワード: [質問回答XXXXさんへ] [CreateObject] [VBA] [JRA競馬オッズ]

Outlook の検索結果:

XXXXXXさんへ Excel VBA コードを VBSで動作させる時にエラーが発生する件

…ol As New Outlook.Application Dim m As mailItem Dim MaxRow: MaxRow = Range("A1").End(xlDown).Row For i = 2 To MaxRow Set m = ol.CreateItemFromTemplate("c:\work\test.oft") m.To = Cells(i, 列.宛先).Value m.Subject = Cells(i, 列.件名).Value m.Attach…

XXXXXXさんへ Outlook 予定表 分類を探る olApptItem.Categories

Outlook 予定表 分類を探りたかったので、Outlook 予定 https://msdn.microsoft.com/ja-jp/library/cc446751.aspx のプロパティから分類 カテゴリー?なんてプロパティがあるので、AppointmentItem.Categories プロパティ (Outlook) https://msdn.microsoft.com/ja-jp/vba/outlook-vba/articles/appointmentitem-ca…

XXXXXXさんへ Outlook サンプルの件 と 他のQAサイトで質問について

> 内容は下記となっております。 > https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q11192362626 detail.chiebukuro.yahoo.co.jp > > > 先に三流君様に許可をいただいてから、やるべきところを、恥ずかしながら回答者様にご指摘いただくまで、コードのライセンスという概念が無く、質問を行わせていただいておりました。 誠に申し訳ございません。 > >つきましては、現状URLの…

XXXXXさんへ outlook 予定表 日本語のプロパティ・メソッドページの紹介ありがとう

…aspx ↑日本語でoutlook予定表 メソッドプロパティの説明が書いてあると 読者様に教えていただきました。みんな、しってて 黙っているのかなあ ぉぃぉぃ 実力者が気持ちよく 活躍できる QAサイトがあるといいのかな?なんてね。 ※おっと、人力検索があるじゃないか・・・VBA Outlook 予定表 日本語のページ https://msdn.microsoft.com/ja-jp/library/office/ff869026.aspx も 参考にしてみてください。XXX…

XXXXXさんへ .Sensitivity = olPrivate VBA Outlook 予定表 非公開設定について

… aITEM As Outlook.AppointmentItem '予定、アポ 'CreateItemで予定の作成 Set aITEM = CreateItem(1) 'olAppointmentItem=1 1予定・アポを指定 aITEM.Display '編集画面表示 aITEM.Sensitivity = olPrivate 'olPrivate=2 非公開 プライベート 簡単な解説は、 Ken3 ライブ VBA Outlook 予定表 非公開設定 テスト中 です・・…

XXXXXさんへ 最近レスポンスが遅かったり、対応できなくてスミマセン

…まりやったことがないOutlookの質問が比較的 多いかなIE操作で ポップアップ OK は APIの PostMessageA FindWindow で探す方法など、 私は詳しくなくて、 適切なアドバイスができなくてすみません。JRA正規のページから 競馬のオッズをEXCELシートへ 上記は 人気が出そうな良いネタ And 私のサイトは土日が弱いので ネタとしてはよさそうなので、 今後少し探ってみようと思います。が、ひっそりと コソコソ 不定期で やりすぎない程度に運営して…

未解決 あとで調べる XXXXXさんへ VBA OUTLOOKの予定表の本文(Body)の一部を太字にしたい

…LのVBAで生成したOUTLOOKの予定表の本文(Body)の一部を太字にしたいです。 ひと目、HTMLメール リッチテキストメールと勘違いしてしまったが、 予定表なんですよね。。。 ^^^^^^^※メールなら、HTML形式やリッチテキスト形式のサンプルが少しは見つかりますが、少し、予定表やoutlook vba 文字色を探ってみましたが、 よいページをgoole検索などで見つけることができませんでした。AppointmentItem.RTFBody プロパティ (Outlo…

2012年5月 Windows Update 更新でエラー 80072ee2 が 発生して少し焦った・・・

…fice 2003 Outlook 2003 迷惑メール フィルタ更新プログラム: KB2598343 Office 2003 Microsoft Office Excel 2003 セキュリティ更新プログラム: KB2597086 Windows XP Windows XP 用セキュリティ更新プログラム (KB2676562) Windows XP Microsoft .NET Framework 4 用セキュリティ更新プログラム、Windows XP x86、Window…

Outlook VBA .Folders.Foldersと重ねてサブフォルダーを読む

…ルアイテムを取得することもできます。関連するソースコードは http://d.hatena.ne.jp/ken3memo/20120415 を見て、笑ってください・・・動画解説やテスト結果www.youtube.com 動画元: Outlook VBA .Folders.Foldersと重ねてサブフォルダーを読む - YouTube 動画区分でURL:ken3内のリンクを探す 三流君 VBA Outlook .Folders サブフォルダー メールを読む 試行錯誤 テスト動画

XXXXXさんへ Outlook指定したサブ フォルダー名のメールをExcelで取得したい

…さんへ ExcelでOutlookの受信メールを読むサンプル - 三流君 ken3のmemo置き場 http://d.hatena.ne.jp/ken3memo/20120415/1334453463 が失敗した と 感じたので、追加メッセージ・・・(ぉぃぉぃ) >if subFolder.name="****" Then など、処理したいフォルダーの名前がわかっているなら(固定なら) そんな時は、 ドットで重ねてフォルダーを指定するといいかも?'メールアイテムの処理 For…

XXXXXさんへ ExcelでOutlookの受信メールを読むサンプル

…cel2007 と Outlook2007 で テスト '参照設定を してください。 Sub main0415() 'メイン処理 Dim oNamespace As Namespace Dim oFolder As Outlook.Folder 'フォルダー Dim oApp As Outlook.Application Set oApp = CreateObject("Outlook.Application") 'データの表示エリアをクリアする Rows("10:9999"…

Outlook2007 VBA 全てのフォルダーを再帰処理で触ってみた

…。)Folderオブジェクトを受け取ったら、 受け取ったオブジェクトの名前 と フォルダー内のアイテム (ここではメールの件名) を表示してみたいと思います。動画解説やテスト結果www.youtube.com 動画元: Outlook2007 VBA 全てのフォルダーを再帰処理で触ってみた - YouTube 動画区分でURL:ken3内のリンクを探す 三流君 Outlook2007 VBA マクロ フォルダー サブフォルダー 再帰処理 .Folders テスト結果 試行錯誤

VBA マクロ Outlook2007で作成したコードをExcel2007で使う

…て遊んでください。)Outlookで作成したVBA マクロを Excelで動作させたいので、 移植してみます (※移植は大げさですね、移動・微調整してみます。)と言っても、 参照設定に □MicroSoft Outlook を追加して、 CreateObject("Outlook.Application") しただけです。動画解説やテスト結果www.youtube.com 動画元: VBA マクロ Outlook2007で作成したコードをExcel2007で使う - YouT…

Outlook2007で作成したサンプルをExcel2007へ

…332887607 Outlookで受信フォルダーを下の階層まで調べるコード を Excelで動かしたくて、チャレンジしてみました。やりたいこと: Outlookで作成したVBA マクロを Excelで動作させたい 移植してみます (※移植は大げさですね、移動・微調整してみます。)参照設定に □MicroSoft Outlook を追加して、 CreateObject("Outlook.Application") しただけです。怪しい実演動画参照設定を行い、Excelでコード…

Outlook2007 VBA 再帰処理で全てのフォルダーに触ってみる

…身を呼ぶ関数で試しにOutlook2007で作成してみます。folderオブジェクト(As Outlook.Folder)を受け取ったら、 受け取ったオブジェクトの名前 .Name と フォルダー内のアイテム .Items (ここではメールの件名.Subject) を表示してみたいと思います。と言っても、 Sub testFolder(oFolder As Outlook.Folder) で、フォルダーを受け取ったら、 中身のITEMを表示後、 サブフォルダー .Folder…

メールでブックマークが簡単にできるみたいです。

…rim(Range("B3")) & " " & Trim(Cells(yy, "B")) DoEvents objMAIL.body = strMOJI '本文の代入 DoEvents Application.Wait (Now + TimeValue("0:00:02")) objMAIL.send '送信箱へ ※直ちに送信にして、連続で送るoutlook2007 DoEvents Application.Wait (Now + TimeValue("0:00:05"))

Outlook VBA .SaveAsで連絡先を書き出すテスト

…(テスト動画です) Outlook VBA .SaveAsでアイテムを書き出す www.youtube.com 下記のコードと合わせてみてください。テストで使用したコード 'アイテムの書き出し .SaveAs ファイルの場所, olmsg で書き出す Sub write_msg_test() Dim oNamespace As NameSpace Dim oFolder As Outlook.Folder 'フォルダー Dim cITEM As Outlook.Contact…

Outlook VBA .msg ファイル を .OpenSharedItem で 取り込み

… http://www.ken3.org/cgi-bin/group/vba_outlook.asp で、細々解説しているので、良かったらのぞきにきてください。動画解説やテスト結果www.youtube.com 動画元: Outlook VBA .msg ファイル を .OpenSharedItem で 取り込み - YouTube 動画区分でURL:ken3内のリンクを探す 三流君 Outlook VBA .msg .OpenSharedItem 取り込み テスト 試行錯誤

失敗サンプル Outlook VBA .msg ファイル を .OpenSharedItem で 取り込み

…子が .msg の Outlookアイテムファイル を .OpenSharedItem("ファイル名")で取り込みました。読み込み後、フォルダーの指定でエラーが発生してしまう。。。 そんな失敗サンプルです。※苦肉の策・強引に On Error Resume Next ですすめてますが・・・テスト結果下記、テスト結果の動画です Outlook VBA OpenSharedItemで取り込みテスト www.youtube.com使用したコードOutlook2007起動後、VBAで…

Outlookを手で操作 アイテムをドラックandドロップで投げると.msgが作られる

…解説動画の簡単な説明Outlookのアイテムをドラックandドロップでデスクトップに投げると、 XXXX.msg と ファイルが作られます。 拡張子は全て.msg?で紛らわしいけど少量なら簡単にデータの受け渡しができそうです。メール、連絡先、予定表、仕事...が全て 拡張子.msg なので、 わかりにくいのですが(なぜアイコンだけが変化・区別しているのか不明だけど)動画解説やテスト結果www.youtube.com 動画元: Outlookを手で操作 アイテムをドラックand…

Outlook VBA Folderの下 に ITEMとFolder が 存在します

…解説動画の簡単な説明Outlookのアイテム(メール、連絡先、仕事、予定...) は、 フォルダーの下にぶら下がってます。.GetDefaultFolder で 既定のフォルダーを指定すると便利です.Display で 画面に表示します。.Items.Count でアイテム数 .Items(n) で取り出したり、.Folders("名前") で サブフォルダーを指定したり、 .Folders.Count で サブフォルダーの数がわかるので、 ループで回して、 .Folders…

Outlook アイテムをドラックandドロップで投げると.msgが作られる

…動のシーズンですね。Outlook アイテムの拡張子が全て.msg?で紛らわしいけど、面白い操作方法があります。Outlookのアイテムをドラックandドロップでデスクトップに投げると、 XXXX.msg と ファイルが作られます。これ↑を逆にデスクトップからoutlookに ドラックandドロップで投げると、 アイテムが追加されます。メール、連絡先、予定表、仕事...が全て 拡張子.msg なので、 わかりにくいのですが(なぜアイコンだけが変化・区別しているのか不明だけど)…

Outlookのフォルダー を 探ってみた アイテムとサブフォルダー

Outlookのアイテム(メール、連絡先、仕事、予定...) は、 フォルダーの下にぶら下がってます。.GetDefaultFolder で 既定のフォルダーを指定すると便利ですOlDefaultFolders 列挙 をヘルプで見ると、 現在の Outlook プロファイルで扱うフォルダ タイプを指定します。 名前 値 説明 olFolderCalendar 9 予定表フォルダ。 olFolderConflicts 19 競合フォルダ (同期の失敗フォルダのサブフォルダ)。E…

回答下書き VBSからOutlook 連絡先を探す で いいなら....

…定?) 'VBSからOutlook 連絡先を探す 'Outlook.Applicationの起動 Dim oApp 'As Outlook.Application OutlookのApplication オブジェクトを入れる Dim oNameSpace 'As Outlook.NameSpace 名前のスペースと言われても、、 Dim oFolder 'As Outlook.Folder フォルダー指定 'outlook 起動をCreateObjectで ※これだと複数起動…

Outlook VBA 連絡先 更新方法 と アドレスでITEMを検索する方法

…group/vba_outlook_Contact.asp を見てください。 . アウトルックの連絡先データを更新する方法を探ってみました。 小鳥遊 が 読めない おっさん(おいたん?)らしく、 右往左往している酔っ払い動画ですが、よろしくお願いします。 気分は灰色?な前置きは置いといて、 更新は、 .Display で 表示させ .Items(i).プロパティ = "小鳥遊" .Items(i).プロパティ = "zzzzzz" で更新したい項目に値をセットして、 .Ite…

XXXXXさんへ Outlook VBA 連絡先 更新方法 と アドレスでITEMを検索する方法

…でマクロを起動して、Outlookの連絡先をエクセルに落としデータをそのままエクセル上で編集し、 編集したものをまたOutlookの連絡先に書きに行きたいのです。 Outlook機能のエクスポートとインポートをすると手順がいっぱいあって時間が掛かるので、 マクロで、決まった項目だけ抜き出して編集し、それをまた戻すことをしたいです。 中略 実演にはInputboxから入力したものを連絡先に【追加】でしたが、既に存在する連絡先を特定セルのValueで書き換えたいです。 ただ、条件…

Outlook VBA As Office.CommandBar から 送受信を探し .Execute で実行

…02/22_vba_outlook_4a33.html です。↑こっちも、.FindControlで 1 からTo 35000 件 総当たりで探していたり笑ってしまいますが・・・何かの参考となれば(反面教師となれば)幸いです。動画解説やテスト結果www.youtube.com 動画元: Outlook VBA As Office.CommandBar から 送受信を探し .Execute で実行 - YouTube 動画区分・リンク 三流君 これはひどい 脳内垂れ流し Out…

XXXXXさんへ Outlook VBA メニュー・コマンド から すべて送受信を探し 実行

…EXCELのVBAでOutLookを起動し未受信のメールをサーバーから受信した後に >未読のメールをエクセルに転記、その後OutLookを終了するVBAを作りたいの >ですが、 >起動後のOutLookでメールサーバから自動的に新規メールを受信する >部分ができません。 起動後に受信したいので、 送受信のコマンドを実行させてみます。と思ったら、追記 .Session.SendAndReceive(True) で 送信OKと連絡をもらう質問者自身から別回答をもらってしまった(笑…

Outlook CreateItem(2) olContactItem=2 連絡先のアイテムを作成

…//www.ken3.org/cgi-bin/group/vba_outlook_Contact.asp#CreateItem を見てください。動画解説やテスト結果www.youtube.com 動画元: Outlook CreateItem(2) olContactItem=2 連絡先のアイテムを作成 - YouTube 動画区分・リンク 三流君 Outlook CreateItem(2) olContactItem 連絡先の作成 メール帳 VBS VBA テスト 試行錯誤

Outlook CreateItem(1) olAppointmentItem=1 予定のアイテムを作成

…/cgi-bin/group/vba_outlook_Appointment.asp#CreateItem を見てください。動画解説やテスト結果www.youtube.com 動画元: Outlook CreateItem(1) olAppointmentItem=1 予定のアイテムを作成 - YouTube 動画区分・リンク 三流君 Outlook CreateItem(1) olAppointmentItem 予定の作成 アポイントメント VBS VBA テスト 試行錯誤

Ken3 ホームページ 目次

分類:HPを大きく分けると4つの柱(分類)です。

  1. [VBA・マクロ プログラミング]の解説
    当店の人気はVBA系のCreateObject("XXXXXX.application")で他のアプリケーションを操作するサンプルが人気です
  2. [プログラマーの愚痴]では、あまり見せたくない三流プログラマーの内面かな。
    三流君を踏み台にする
  3. [古いクラシック ASP(Active Server Pages)]の解説。
  4. [元コンビニ店長時代の話]が弟に巻き込まれ、失敗した脱サラ、畑違い?の仕事で失敗。
主に上記4つの分類でHP作成やメルマガの発行を行ってます。
※更新頻度が落ちていて情報の鮮度が悪いです。



本当に三流なんです(笑):たまにスゴイですねなんて言われることもありますが、
真実は→ [三流君の真実は...] ←を初めに見てくださるとわかると思います。
(からくりは、成功例↑しか載せてなくて ヒドイ失敗例はお蔵入り迷宮入りが多かったりします)