はてなブックマーク

すみません、テスト中止してます テスト、中止してます [前のページにもどる] [三流君 www.ken3.org に 戻る] HP リンク [VBA・マクロ プログラミング]の解説 当店の人気はVBA系のCreateObject("XXXXXX.application")で他のアプリケーションを操作するサンプルが人気です [VBA Outlookの操作 CreateObject("Outlook.Application" )]・・・Outlookを使い、メール関係を処理するサンプルです [Access から Excel 連携 CreateObject("Excel.Application")]・・・AccessからExcelを操作したりデータの書き出しサンプル [PowerPointVBA CreateObject("PowerPoint.Application")]・・・パワポをVBA操

私は、Outlook VBAで [メールの作成 や 読み込みを行いたい] / [予定 アポやスケジュールを管理したい] / [仕事・タスクを登録したい] / [アドレス帳や連絡先を管理したい] / [HELPからOutlookのプロパティやメソッドを探りたい] です。※目的の処理を選択してください。 ken3memo : Outlook関係の→ [メモ・記事をチェック] / [アウトルックの動画解説へ] 全ての質問には、答えられませんが、リクエストや質問があったら、[作者(三流君)に質問する] から 気軽に送ってください [三流君(TOP)] / [VBA(TOP)] / [Outlook操作(TOP)] まぁ、そんなに難しく考えないで、ソースを貼り付けて、遊んでみてください。 VBS や Excel など から Set oApp = CreateObject("Outlook.Appli

私は、Outlook VBAで [メールの作成 や 読み込みを行いたい] / [予定 アポやスケジュールを管理したい] / [仕事・タスクを登録したい] / [アドレス帳や連絡先を管理したい] / [HELPからOutlookのプロパティやメソッドを探りたい] です。※目的の処理を選択してください。 ken3memo : Outlook関係の→ [メモ・記事をチェック] / [アウトルックの動画解説へ] 全ての質問には、答えられませんが、リクエストや質問があったら、[作者(三流君)に質問する] から 気軽に送ってください [三流君(TOP)] / [VBA(TOP)] / [Outlook操作(TOP)] まぁ、そんなに難しく考えないで、ソースを貼り付けて、遊んでみてください。 Excel など から Set oApp = CreateObject("Outlook.Application

どうも、三流プログラマーのＫｅｎ３です。 今回は、 BASE64の変換処理にチャレンジしてみます。 http://www.ken3.org/vba/lzh/vba160.lzh にサンプルbase64test.xlsを圧縮しておきます、 Excel2000版ですが使ってみてください。 /* * １．今回のキッカケ */ 前回の No.159 IE 認証ページへのアクセス、basci認証ページって？ http://www.ken3.org/vba/backno/vba159.html で、 設定したユーザーとパスワードの組み合わせ mailmaga:guest をBASE64変換して bWFpbG1hZ2E6Z3Vlc3Q= ヘッダーに指定 "Authorization: Basic bWFpbG1hZ2E6Z3Vlc3Q=" そして開いていました。 今回は、このBASE64のコードを探って

[三流君] －－＞ [ＶＢＡで楽しく] －－＞ [バックナンバー一覧] －－＞ No.068 Excel Formで値を設定、標準モジュールで使用したい メルマガ発行内容 ＜Excel Formで値を設定、標準モジュールで使用したい＞ こんにちは、三流プログラマーＫｅｎ３です。 今回は、ハシ休めで（飛び飛び解説とも言う） Excel UserForm で設定した値を標準モジュールで使用したいと思います。 サンプルファイルは、 http://www.ken3.org/vba/lzh/vba068.lzh にtest068-Book.xlsが保存されています。 /* * １．今回のキッカケ */ ＨＰの問合せフォームを使ってくれて、下記の問合せが来ました。 --- >まささん <*********@hotmail.com > から >こんばんは。はじめまして。 >以下の質問があります。 >メイ

メルマガ発行内容 ＜テキストファイル処理　ファイルからの読み込み＞ こんにちは、三流プログラマーＫｅｎ３です。 今回は、 テキストファイルからのデータ読み込み処理をやってみたいと思います。 あまり自分でテキストファイルを読んで処理する機会は無いと思うので、 （ＣＳＶとかのテキスト読み込みが充実してると思うので） 気楽に読んでください。 /* * １. テキストファイルの仕様 と やりたいこと */ Ｅｘｃｅｌの開くで＊．ＣＳＶとか＊．ＴＸＴ開けるのですが、 今回は自分で開いて読み込んでみます。 やりたいこと、 ログの収集用のファイルが存在して、 下記のようなフォーマットでデータをもらうことができます。 ファイル名はlog.csvで、 中身は、簡単に時間とアクセス場所が入ってます 17/Dec/2002:11:25:33,GET /vba/excel97-vba-test.html HTTP

メルマガ発行内容 ＜Excel ショートカットキーにマクロを割り当てる＞ どうも、三流プログラマーのＫｅｎ３です。 最近、質問もらうけど、 なかなか、解答できてない三流プログラマーのＫｅｎ３です。 ※私のレベルで手に余る高度な質問が多くて。 http://www.ken3.org/p/h/office-028.lzh に今回のサンプル保存されてます。 CTRL+CでAAAのマクロが起動します。 普通に動かして、少し驚いてね（テストしてみてね。） ※通常Ctrl+Cはコピーだけど、横取りして使ってます。 /* * １. 今回のキッカケ */ 読者から、シートにボタンを設置する、 ダブルクリックや右ボタンで、マクロの起動方法はわかったが、 CTRL+Cでコピーのように、キーにマクロを割り当てられないか？ と質問をもらいました。 マクロの起動をCTRL+キーで行う方法を探ってみます。 /* *

[三流君] －－＞ [ＶＢＡで楽しく] －－＞ [バックナンバー一覧] －－＞ No.125 Excel 起動画面を表示しないで、UserFormを開く メルマガ発行内容 ＜Excel 起動画面を表示しないで、UserFormを開く＞ どうも、 最近、質問もらうけど、 なかなか、解答できてない三流プログラマーのＫｅｎ３です。 ※私のレベルで手に余る高度な質問が多くて。 （返信遅いのは、答えられないからで、 お金払えば答える、有料版の読者にしか答えない、そんなことは無いので・・・ 有料版読者の質問に優先的に答えてはいますが、、、、） /* * １. 今回のキッカケ */ 質問のメッセージをもらいました。 ----- In message "QA B-ETC - No.0", >次のようなことは、できるのでしょうか。 >Ｅxcelファイルを開いたときに、Ｅxcel画面を表示させずに、ユーザーホ

[三流君] －－＞ [ＡＳＰで遊ぶ、失敗する] －－＞ [バックナンバー一覧] －－＞ No.080 Microsoft Text Driver (*.txt; *.csv) で接続してみた 本文(発行内容) ＜Microsoft Text Driver (*.txt; *.csv) で接続してみた＞ こんにちは、三流プログラマーのＫｅｎ３です。 今回は、 Driver={Microsoft Text Driver (*.txt; *.csv)} を使って、csvファイルと接続してみました。 /* * １．今回のキッカケ */ csvファイルの中から、指定した行を削除したい。 現在の接続は、 Con = "Driver={Microsoft Text Driver (*.txt; *.csv)};DBQ=" & パス & ";" を使っています。 そんな処理の質問をもらったので、 今回チャ

すみません、テスト中止してます テスト、中止してます [前のページにもどる] [三流君 www.ken3.org に 戻る] HP リンク [VBA・マクロ プログラミング]の解説 当店の人気はVBA系のCreateObject("XXXXXX.application")で他のアプリケーションを操作するサンプルが人気です [VBA Outlookの操作 CreateObject("Outlook.Application" )]・・・Outlookを使い、メール関係を処理するサンプルです [Access から Excel 連携 CreateObject("Excel.Application")]・・・AccessからExcelを操作したりデータの書き出しサンプル [PowerPointVBA CreateObject("PowerPoint.Application")]・・・パワポをVBA操

次は、受信したメールに対して処理を行いたい、そんな流れだと思います。。。 MailItem オブジェクト http://msdn.microsoft.com/ja-jp/library/cc359390.aspx ↑MSDNを参考にして、 'Excel2003 VBA から OutLook2003を起動して 受信メールを1つ1つ取り出す Sub OL_TEST_LOOK_MAIL_0221() Dim oApp As Object 'OutlookのApplication オブジェクトを入れる Dim myNameSpace As Object '名前のスペースと言われても、、 Dim myFolder As Object 'フォルダー指定 'outlook 起動をCreateObjectで ※これだと複数起動してしまうがご勘弁を Set oApp = CreateObject("Outl

[三流君] －－＞ [ＶＢＡで楽しく] －－＞ [バックナンバー一覧] －－＞ No.064 AccessからExcelファイルを開いて・印刷して・閉じたい メルマガ発行内容 こんにちは、三流プログラマーＫｅｎ３です。 ４月新たな環境になった人達は落ち着きましたか？ ＊まだ新入社員君達はＨＰやメルマガみて遊ぶ余裕は無いか（笑） なんて定型の挨拶はこのくらいにして、 ~~~~~~~~~~~~~~~~~~ 今回は、 AccessからExcelファイルを開いて・印刷して・閉じたい です。 /* * １．今回のキッカケ */ 下記の質問を貰いました >現在、access+excelのアプリを開発していて、行き詰まっていることがあります。 >知恵を貸してくれませんか？ >accessVBAの制御下で、excelファイルを開き、それを印刷して、閉じる処理をした >いのです。 ---- と最近設置したＨ

[三流君] －－＞ [ＶＢＡで楽しく] －－＞ [バックナンバー一覧] －－＞ No.139 AccessからExcel出力、複数クエリーを１シートへ メルマガ発行内容 ＜AccessからExcel出力、複数クエリーを１シートへ＞ こんにちは、三流プログラマーのＫｅｎ３です。 郵便番号データの集計処理もいよいよ終盤戦です。 今回の、サンプルファイルは、 http://www.ken3.org/vba/lzh/vba139.lzh にdb139.mdb(Access2000版)が保存されています。 ※クエリーやデータをいじって、遊んでみてください。 Access から Excel 連携 http://www.ken3.org/cgi-bin/group/vba_access_excel.asp も参考にしてください。 /* * １. 今回のキッカケ */ 前回、までで、 ・出力用のデータをそ

[三流君] －－＞ [ＡＳＰで遊ぶ、失敗する] －－＞ [バックナンバー一覧] －－＞ No.063 Application.Lock .Unlockを使ってみた 本文(発行内容) ＜Application.Lock .Unlockを使ってみた＞ こんにちは、三流プログラマーのＫｅｎ３です。 今回は、 同時アクセス、排他制御もどきで、 Application.Lock .Unlockを使ってみた そんなお話です。 /* * １．今回のキッカケ */ ＨＰで訪問者のログを収集してます。 ＤＢに追加されていくので、削除しないとデータが増えてしまいます。 ※当たり前でしょ（笑） 自社のサーバーなら、日替わり処理で、 タスクのスケジュールで、 SQL Delete文を発行すれば、済んでしまうんだけど、 レンタルサーバーだと、そんな処理タイミングを作ることが出来ません。 面倒だけど、削除のSQL文が

すみません、テスト中止してます テスト、中止してます [前のページにもどる] [三流君 www.ken3.org に 戻る] HP リンク [VBA・マクロ プログラミング]の解説 当店の人気はVBA系のCreateObject("XXXXXX.application")で他のアプリケーションを操作するサンプルが人気です [VBA Outlookの操作 CreateObject("Outlook.Application" )]・・・Outlookを使い、メール関係を処理するサンプルです [Access から Excel 連携 CreateObject("Excel.Application")]・・・AccessからExcelを操作したりデータの書き出しサンプル [PowerPointVBA CreateObject("PowerPoint.Application")]・・・パワポをVBA操

[三流君] －－＞ [VBAで楽しく] －－＞ [VBA Outlook 操作] －－＞ No.078 Outlookでファイルを添付するには？.Attachments.Add メルマガ発行内容 ＜Outlookでファイルを添付するには？.Attachments.Add＞ こんにちは、三流プログラマーＫｅｎ３です。 今回は、 VBAでOutlookにファイルを添付するには？ です。 /* * １．今回のキッカケ */ seltaeb@倉敷さん から >はじめまして >検索で「Outlookを操作してメールを送りたい」にたどり着き早速メルマガ登録し >ました > >現在１つのBOOKを業者別に複数のBOOKに分割するところまで作成しております >次のステップとして業者別のBOOKをMailに添付して自動で送ろうと考えています >メルマガを参考とさせていただき作成したいと思います > >あと、

[三流君] －－＞ [ＶＢＡで楽しく] －－＞ [バックナンバー一覧] －－＞ No.028 Excelのグラフをgifへ変換 .Exportメソッド使用 .ExportメソッドでExcelグラフをGIFにできたので、 少し、テストして遊んでみます。 メルマガ発行内容 ↓解説・テスト動画↓ ＜Excelのグラフをgifへ変換 .Exportメソッド使用＞ こんにちは、三流プログラマーＫｅｎ３です。 今回は、 Excelのグラフをgifへ変換 して遊んでみます。 /* * １. ActiveChart.Export ("C:\samp.gif") */ 昔か書いてたメルマガに、 Excelのグラフをgifへ変換 があったので、今回は、これをネタに話を大きくしてみます。 ＊昔のメルマガも整理しないとなぁ Excel97 で、グラフが表示されています。 このグラフを画像ファイルとして保存したいの

Excel から Access 連携 まぁ、通常、Excel から、Accessを立ち上げてコントロールする、そんなことしないのですが、実検でやってみました。 [No.15 ＥｘｃｅｌからＡｃｃｅｓｓのフォームを開いてみました] 'Accessのアプリケーションオブジェクトを作成する Set objACCESS = CreateObject("Access.Application") と、Access.ApplicationをExcelで作成して、 objACCESS.DoCmd.OpenForm "テストフォーム", acNormal なんて感じでフォームを開いてます。 [No.16 ＥｘｃｅｌからＡｃｃｅｓｓのモジュールを呼んでみました] Accessに記述済みのモジュールを使いたかったので、 objACCESS.Run "aaa" '*1モジュール名称を文字列で指定する と、.Run

VBAからIE操作 TABLEの中にTABLE .getElementsByTagNameほか こんにちは。AB型の変わり者 三流プログラマーのＫｅｎ３です。 今回は、 IE 操作系でTABLEの中にTABLEタグが存在する、 よくある話にチャレンジしてみます。 /* * １. 今回のキッカケ */ 最近下記の質問をいただく ---- >[No.119 IEを使用して、Web上の表をExcelへ]において、 >頁によっては表以外の記述にもtableタグを多用しているものがありますが、 >欲しい表のみをExcelへ持ってくる方法(tableの見分け方)はありますか？ > >具体的には、 >以下の例で試すと、メインの表だけでよいところ、workbookが25個もできました。 >http://table.yahoo.co.jp/t?c=2004&a=10&b=4&f=2005&d=10&e=14

楽天Booksのリンク取得が変更になったので、テストプログラムは動作しないです 参考程度に見てください。 IE .getElementsByTagNameでタグ指定 .Quitで閉じる どうも、三流プログラマーのＫｅｎ３です。 今回は、ＩＥでパラメータ入力後に、 新たに開かれた結果ウインドウから情報を抜き出し、 そのウインドウを閉じる、そんなことにチャレンジしてみます。 ※起動したＩＥから広告コードを抜き取って用済みになった（失礼）IEを閉じる。 /* * １．やりたいこと 概要 */ 楽天ブックのリンク作成ページ http://books.rakuten.co.jp/afvc/afinfo/page03.html ここで、 ＩＳＢＮ番号 と 自分の広告コードのSIDとPIDを入力してボタンを押すと ソースが表示される。 この広告コードを取得、そんなプログラムを作ってみたい。 ポイントにな

IE _NewWindow2 別窓で開いたオブジェクトの管理 どうも、三流プログラマーのＫｅｎ３です。 今回は、 リンクを右ボタンで新しいウインドウで開く や Target=_Blank など 親ウインドウから子供のウインドウが開かれた時の管理について少し書きます。 ＩＥ操作で、何かの参考となれば、幸いです。 /* * １．今回のキッカケ */ 右ボタンなどを押して、新しいウインドウをユーザーの意思で開くことができます。 まぁ、マルチにウインドウを開いて処理を行う、普通のことなのですが、 Webコントロールをフォームに貼ったりして作業していると、 自分(自作プログラム)の配下から離れてしまいます。 そんなことをさせなかったり、 されても、作られたオブジェクトを追ってみたいと思います。 WebBrowser1 とWebのコントロールを作ります。 WebBrowser1_NewWindow2で

＜IE _BeforeNavigate2イベントでPostデータを覗き見する＞ どうも、三流プログラマーのＫｅｎ３です。 今回は、読者数６人の有料メルマガから宣伝で１つサンプルを出します。 /* * １. 今回のキッカケ */ 有料版のメルマガ、読者数６人まで減りました。 内容が薄いから？なんだけど・・・（オイオイ） 先週発行したメルマガからサンプルを１つダイジェストで載せます。 気に入ったら、 http://www.ken3.org/pmagmag/office/ から、登録してみてください。 よろしくお願いします。 ----- こんな感じで書いてます ----- [ Microsoft Officeで作るツールと業務システム No.032 ] 2003/09/06 毎週土曜日 ＜IEの送信データを覗き見する＞ こんにちは、三流プログラマーのＫｅｎ３です。 http://www.ken3