2008年02月の記事一覧

自分用のナレッジベース。 AccessやExcelのVBA、VB.NET、VBScript、PHPなどのサンプルプログラム、ORACLEやSQL Server、オープンソース系のシステムやフリーソフトに関する情報、iPhone、Androidスマホ便利情報など役立つ情報などを覚書しておくためのブログ。

月別アーカイブ:2008年02月

2008年02月の記事一覧。自分用のナレッジベース。 AccessやExcelのVBA、VB.NET、VBScript、PHPなどのサンプルプログラム、ORACLEやSQL Server、オープンソース系のシステムやフリーソフトに関する情報、iPhone、Androidスマホ便利情報など役立つ情報などを覚書しておくためのブログ。

WIMP
以下にWindows XPにPHP 5.2.5をセットアップする方法について記述する。Step1では、PHPのモジュールのダウンロード、ファイルの展開、配置までを説明。IISの設定および、PHPの設定は、STEP2以降で記述する。以降、具体的な手順を記述。...

記事を読む

No Image

VBA共通
Outlookの受信ボックス内のメールについて、受信時間、送信者(表示名)、件名、送信者アドレス、本文を取得してデバッグウィンドウに出力する簡単なサンプルプログラム。参照設定がされていなくても実行できるようにCreateObjectを使用してオブジェクトを参照する。実行時、セキュリティ上、プログラムがOutlookにアクセスしても良いかどうか確認するメッセージボックスが表示されるので[はい]を選択する。メール1件ごとに確認メッ...

記事を読む

No Image

VBA共通
正規表現を使用した入力データのチェックをするVBAのサンプルプログラム。正規表現の利用については、VBAの標準機能にはないので、「Microsoft VBScript Regular Expressions 5.5」ライブラリを利用して実現する。以下は、ライブラリを参照設定していない場合のサンプルプログラム。...

記事を読む

No Image

VBA共通
入力データに半角カタカナが含まれていないかチェックする関数をVBAで作成したので記録しておく。どういうチェック方法が一番いいか色々考えたあげく、一番シンプルでわかりやすいと思った方法。処理ロジックは、以下の通り。1.チェック対象の文字列を引数として受け取る。2.ユーザー定義関数内に用意した文字列変数に半角カタカナに該当する文字列を列挙した文字列を代入しておく。半角カタカナ文字列 → "アイウエオカキクケコサシスセソタチツテトナニヌ...

記事を読む

VBA:Outolookの受信ボックスのメールをVBAで取得するサンプル

  •  投稿日:2008-02-14
  •  カテゴリ:VBA共通
Outlookの受信ボックス内のメールについて、受信時間、送信者(表示名)、件名、送信者アドレス、本文を取得してデバッグウィンドウに出力する簡単なサンプルプログラム。
参照設定がされていなくても実行できるようにCreateObjectを使用してオブジェクトを参照する。
実行時、セキュリティ上、プログラムがOutlookにアクセスしても良いかどうか確認するメッセージボックスが表示されるので[はい]を選択する。
メール1件ごとに確認メッセージが表示される。
以下にサンプルプログラムを記述。

» 記事の続きを読む

VBA:文字列に半角カタカナが含まれていないかチェックするユーザー定義関数

  •  投稿日:2008-02-13
  •  カテゴリ:VBA共通
入力データに半角カタカナが含まれていないかチェックする関数をVBAで作成したので記録しておく。
どういうチェック方法が一番いいか色々考えたあげく、一番シンプルでわかりやすいと思った方法。
処理ロジックは、以下の通り。
1.チェック対象の文字列を引数として受け取る。
2.ユーザー定義関数内に用意した文字列変数に半角カタカナに該当する文字列を列挙した文字列を代入しておく。
半角カタカナ文字列 → "アイウエオカキクケコサシスセソタチツテトナニヌネノハヒフヘホマミムメモヤユヨラリルレロワヲンァィゥェォッャュョ゙゚ー"
3.チェック対象の文字列から1文字ずつ文字を取り出す。
4.Instr関数を使用して、取り出した文字が半角カタカナを列挙した文字列内の何れかの文字に該当しないかチェック。
5.「Instr関数の戻り値が0以外 = 半角カタカナに該当」となるので、ユーザー定義関数の戻り値としてFalseをセットして処理を終了。
6.最後までInstr関数の戻り値が0だったら半角カタカナは含まれていないことになるのでユーザー定義関数の戻り値としてTrueをセットする。

入力データに半角カタカナが含まれていないかチェックするユーザー定義関数のサンプルプログラムを以下に記述。

» 記事の続きを読む

Copyright © Excel、Access、VBA、ORACLE、iPhone、Android、その他覚書:My Knowledge Base All Rights Reserved.

テキストや画像等すべての転載転用・商用販売を固く禁じます