AccessVBA開発 AccessVBA【SQL】Like演算子であいまい検索してレコード抽出 Sub set_○△□品番inSTOCK()'ストックにある品番で、○△□に含まれる品番を抽出'→ T_○△□品番 作成Call clear_table("T_○△□品番")Dim strSQL As String, str As Stri... 2021.10.22 AccessVBA開発
未分類 ADODB.Recordsetが開いているか判定して閉じる Dim cn As New ADODB.ConnectionDim rs As New ADODB.RecordsetIf rs.State = adStateOpen Then rs.CloseIf cn .State = adState... 2021.10.06 未分類
AccessVBA開発 SQL 片方のTableのみにある行を抽出(LEFT JOIN) strSQL = ""strSQL = strSQL & " SELECT"strSQL = strSQL & " tb1.商品ID AS 商品ID"strSQL = strSQL & " ,tb1.商品管理番号 AS 商品管理番号"str... 2021.08.03 AccessVBA開発
AccessVBA開発 Access VBA SQL 3つのテーブルを結合してデータを抽出する SQL「LEFT JOIN」を使って、3つ以上の表を結合させる方法AccessVBA で普通に join を使うと、2つまでしか結合できません。が、下のように結合した表を括弧で囲んでやり、それを1つの表としてやると、3つ以上の表を結合できま... 2021.07.15 AccessVBA開発
ExcelVBA Selenium4のスクレイピング getElementByID(“id”) getElementByID("id")・・・要素のIDを指定して単一の要素を取得getElementsByName("name")・・・要素のNameを指定して単一の要素を取得getElementsByTagName("タグ名")・・・要... 2021.02.04 ExcelVBA
AccessVBA開発 AccessVBA CSVファイルの1行目に不要な文字列がある為、2行目からインポート ※1行目を削除すると、2行目にある見出しの行がそのままフィールド名として使えるようにしたい。方法はいくつかあるけど、FileSystemObject (MSDN) を使う例だと、 Dim fso, fromFile, toFile S... 2021.01.30 AccessVBA開発
AccessVBA開発 明細フォームとコンボボックスのデータソース変更 コントロール(コンボボックス)のデータソース変更Private Sub cmb_グループ_AfterUpdate() Dim str As String str = Me.cmb_グループ.Text 'コントロール(コンボボック... 2020.12.08 AccessVBA開発
AccessVBA開発 フォームデータソースの参照エラー(型が一致しません。フォームが見つかりません。etc.) 【 解決策 】①親フォーム名から指定する(サブフォームから指定してもダメ) ②親フォームを開いた状態で、レコードソースの変更コードを当てる指定した式で、閉じているかまたは存在しないオブジェクトを参照していますということなのでオブジェクト=フ... 2020.10.09 AccessVBA開発
AccessVBA開発 Access 実行時エラー 3052 ”ファイルの共有ロック数が制限を超えています” ”解決方法 Microsoftの技術情報多数のトランザクション処理中にエラー メッセージ "ファイルの共有ロック数が制限を超えています" が表示されるトランザクションとかかけてないし、何??資料見ると「方法 1 : MaxLocksPerFile レジ... 2020.10.09 AccessVBA開発
AccessVBA開発 AccessVBAでクエリを実行 Visual Basic EditorでSQLステートメントを記述する場合、基本構文はSQLビューと同じですが、ステートメントの記述方法が少し違います。SQLステートメントは、VBAでは文字列として扱われます。そのためSQLステートメントを... 2020.10.06 AccessVBA開発未分類