Microsoft Office Accessのファイル(.mdb)の中のテーブル定義一覧を、 Oracle用のテーブル定義に変換して、一覧で出力するコードを紹介します。
概要
- Excel と VBA を使用します。
- VBA の 関数
GetTableDefinitions
を実行すると、 開いているエクセルのシートにアクセスファイル内のテーブル定義を一覧出力します。 - テーブル定義書(.xls)に貼り付けることを想定してテキストデータを作ります。
- Access のテーブルを Oracle 用 にするので、 例えばテキストのカラムは
VARCHAR2
として表示されます。 - システムテーブルは出力しません(コードを一部変更すれば出力できます)。
- リンクテーブルは、リンクの内容を表示します。 リンク先のテーブルの定義は出力しません。
使い方
- Excel を開きます。
- 開発ツール Visual Basic Editor を開きます。
- モジュールを追加します。
- ツールの参照設定から Microsoft DAO にチェックを入れます。
- 下のコードを貼り付けます。
- 関数
GetTableDefinitions
を実行します。