VBA : SQLSelectSelected で使用した関数のインターフェース仕様。ワークシート関数として使用可だ。

 前記事で公開した SqlSelectSelected とともに作成された、外部使用可能な関数のインターフェース仕様だ。

変換後SQLの検証、Oracleコンバートの一次変換に使ってくれ。

VBAで作成された Public Function をワークシート関数に使用すると、シート再描画が激遅だ。

concatsep以外の関数、Oracle2MsSql、Oracle2ExcelSqlはブック中での多用回避に留意しろし。

concatsep  汎用関数として使用可

Oracle2MsSqlText  他の自作マクロ等から呼出し可

Oracle2MsSql  Oracle⇒Access(SQLServer)変換の一次加工に使用可

Oracle2ExcelSql  SQLSelectSelectedマクロエラー時のSQL文法チェックに使用

Function concatsep(<セル範囲>[,[<列間セパレータ>][,<行間セパレータ>]]) as string

セル範囲の値をテキストとして結合する

列間、行間セパレータの省略値はセル内改行コード”chr(10)" になる

SQLテキストの場合、列間セパレータを半角スペース、行間セパレータを chr(10) に設定する

例. =concatsep(C13:G23," ",CHAR(10))

Function Oracle2MsSqlText(<SQL文字列>) as string

Oracle用のSQL文をAccess用のSQL文に変換する

(よく使われ、変換が比較的簡単なOracle方言のみ)

例. =Oracle2MsSqlText("select * from TABLE1")

Function Oracle2MsSql(<セル範囲>) as string

セル範囲に記載された、Oracle用のSQL文をAccess用のSQL文に変換する

内部でconcatsep,Oracle2MsSqlTextを呼び出している

例. =Oracle2MsSQL(C13:G23)

Function Oracle2ExcelSql(<セル範囲>) as string

セル範囲に記載された、Oracle用のSQL文を、SQLSelectSelectedマクロが使用するExcel用のSQL文に変換する

内部でOracle2MsSqlを呼び出している

例. =Oracle2ExcelSql(C13:G23)