Jomo

AccessVBA開発

ODBC経由で接続したときのエラー対応

インサートするテーブルとSQLサーバー上のテーブルでテーブル規約に相違がないか調べる。例えば、主キーありの規約があるテーブルに対し、複数の値を更新しようとしていないかなど。。。
AccessVBA開発

重複行のレコードに連番を振る

'同じ製品番号が存在する場合は、行番号のフィールドに連番を振る。(重複なしは"1"とする) strSQL = "SELECT 製品コード, 行番号 FROM W_製品添加物 ORDER BY 製品コード" '製品コードでソートする Set ...
AccessVBA開発

(エラー:3342)サブクエリ ‘<サブクエリ名>‘ のメモ型または OLE オブジェクト型のデータが正しくありません。

サブクエリはメモ型 (Memo) または OLE オブジェクト型 (OLE Object) のデータを返せないため、式の中でメモ型 (Memo) または OLE オブジェクト型 (OLE Object) のデータと比較することはできません。...
AccessVBA開発

ADO Recordset で RecordCount プロパティが -1 を返す場合

参照設定に「Microsoft Active Data Object 2.0 Library」追加 また、デフォルトが以下なので、変更する。 rs.CursorLocation = adUseServer(デフォルト)↓↓↓↓↓↓変更 ↓↓...
AccessVBA開発

SQLServer のリンクテーブルをAccess側で作成

Access で、どこかの SQLServer へリンクテーブルが貼られている際に dsnファイルを利用して、Access側でリンクテーブルを作成する。 dsnファイルの項目> DRIVER UID DATABASE WSID APP SE...
AccessVBA開発

空白文字だけの配列要素を後ろから削除する

'空白文字だけの配列要素を後ろから削除する(配列途中の空白だけの要素(故意に改行した部分)は残す) 最後の空行の改行については削除する (配列から要素を削除) '※空白(半角スペース・全角スペース)は、文字数1、バイト数2でカウントされる ...
AccessVBA開発

Date型とDatetime型の違いに注意する。

DateTime型 (例) : KOUSINBI = #2004/01/14 17:51:00# ※DateTime型=300分の1秒で格納されている ’2009/01/01′の値が入っている該当項目を抽出したいときに hoge_datet...
AccessVBA開発

PageBreak プロパティを設定できません。(AccessVBAでエクセルをコピーするときに、出た)エラーの解消法

解消策としては ・一旦[標準]ビューで処理し、最後に[改ページプレビュー]設定する。 ・ws_sheet2をActiveにして実行する。 ・'* 改ページの挿入の直前に DoEvents を挿入する。 ・Application.Screen...
ExcelVBA

エクセル「(自分)が使用中です」エラーの対処方法

サーバに保管しているエクセルファイルを閉じているにもかかわらず、「○○(自分)が使用中です」というメッセージがでるときがあります。 削除するファイルのあるパスをいつも忘れるので、備忘録として、記録します~ 解決法 WIN+R でコマンドプロ...
AccessVBA開発

サブクエリ

★テーブル名の文字数の最大値は64だそうで、サブクエリをFROM句で使うときに、長さがこれを超えるとエラー(FROM句の構文エラー)になる可能性あり。 ①WHERE句に使用 SELECT 受注IDFROM 受注明細テーブル WHERE 商品...