Jomo

AccessVBA開発

AccessVBA CSVファイルの1行目に不要な文字列がある為、2行目からインポート

※1行目を削除すると、2行目にある見出しの行がそのままフィールド名として使えるようにしたい。 方法はいくつかあるけど、FileSystemObject (MSDN) を使う例だと、 Dim fso, fromFile, toFile    ...
AccessVBA開発

明細フォームとコンボボックスのデータソース変更

コントロール(コンボボックス)のデータソース変更 Private Sub cmb_グループ_AfterUpdate()    Dim str As String    str = Me.cmb_グループ.Text    'コントロール(コン...
AccessVBA開発

フォームデータソースの参照エラー(型が一致しません。フォームが見つかりません。etc.)

【 解決策 】 ①親フォーム名から指定する(サブフォームから指定してもダメ) ②親フォームを開いた状態で、レコードソースの変更コードを当てる 指定した式で、閉じているかまたは存在しないオブジェクトを参照しています ということなので オブジェ...
AccessVBA開発

Access 実行時エラー 3052 ”ファイルの共有ロック数が制限を超えています” ”解決方法

Microsoftの技術情報多数のトランザクション処理中にエラー メッセージ "ファイルの共有ロック数が制限を超えています" が表示される トランザクションとかかけてないし、何??資料見ると「方法 1 : MaxLocksPerFile レ...
AccessVBA開発

AccessVBAでクエリを実行

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

64bit MS-Access 2019をインストールしているのに、SQL-ServerでACE.OLEDB.12.0が使えない

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...