開発

AccessVBA開発

AccessVBAでクエリを実行

Visual Basic EditorでSQLステートメントを記述する場合、基本構文はSQLビューと同じですが、ステートメントの記述方法が少し違います。SQLステートメントは、VBAでは文字列として扱われます。そのためSQLステートメントを...
ExcelVBA

重複配列の取得と、各配列ごとの平均値取得(動的配列、UBound、Dictionary 使用)

'重複品番のうち、価格が同じはOKと判断する。'配列に重複品番を格納Dim Dic As Object, buf As StringDim Arr() As String: ReDim Arr(0) 'Index 0で初期化Dim sum下...
SQLサーバー

SQL Server にTCP/IP接続する方法

SQL Server 構成マネージャ を起動します。 ※注意:SQL Server 構成マネージャーは Microsoft 管理コンソール プログラムのスナップインであり、スタンドアロン プログラムではないため、新しいバージョンの Wind...
AccessVBA開発

SQLの論理値は3(3値論理)

通常のプログラミング言語の論理値:True,False SQLの論理値           :True,False,Unknown ●SQLは第三の値Unknownを持つ●NULLについては、2種類ある ①未知(Unknown) ⇒値でも変...
AccessVBA開発

既に開いているフォーム(フォーム1)に対し、フォーム2から値を渡す(住所入力補助フォーム)

フォーム1> 'メンバ変数 Private mRetnValue As String 'プロパティ Public Property Let RetnValue(ByVal Value As String) mRetnValue = Valu...
AccessVBA開発

デザインビューではコントロールが表示されるのに フォームビューで表示されない

表示されるレコードがなく、追加もできない(=新規レコードの枠が表示されない)状態の場合、フォームビューの詳細領域にあるコントロールは、全て表示されなくなります。 これはAccessがそういう仕様になっているようなのでどうしようもないのですが...
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(デフォルト)↓↓↓↓↓↓変更 ↓↓...