備忘録 | 岸本ビジネスサポート株式会社

テーブルのフィールド数を数える

AccessVBAの備忘録記事です。テーブルのフィールド数を数えるには？以下の方法１，２どちらでも可能方法1 Dim pMyTdf As TableDef, pMyDB As Database Set pMyDB = …続きを読む

備忘録記事です。 ExcelVBAで、新規ブックを作成し保存しようとする場合、保存するブックがマクロ付きの場合は要注意。普通のExcelファイルとして保存まずは普通に保存する場合 Dim pStrPath As St …続きを読む

備忘録記事です。多分頻繁に使うことになるだろうと思い・・・「エクスプローラーでフォルダを開く」操作 Dim pStrPath As String pStrPath=”○○○” Application.FollowHyp …続きを読む

備忘録記事です。 AccessのVBAでADOレコードセットを使用し、ループ処理で大量のレコードの更新を行うと「ファイルの共有ロック数が制限を超えています(Error 3052)レジストリエントリMaxLockPerFi …続きを読む

備忘録記事です。Access・ExcelのVBAで二次元配列を宣言するには、例えば Dim MyVar(10,3) As Variant のように宣言する。宣言の後に要素数が変わる場合は「Redim」で定義しなおせるが、 …続きを読む

MS-Accessで追加クエリなどのSQL実行時、「引数が無効です」というエラーメッセージが出てクエリの実行ができない場合があります。 SQL構文に間違いがないという場合、当該テーブルを「XMLファイル」にエクスポートし …続きを読む

備忘録記事です。ヒューレット・パッカードのノートパソコン「HP ProBook」（筆者が今回作業したのは「450 G3」でした）で、内蔵HDDをSSDに換装する作業。 AcronisTrueImage2021を使用して …続きを読む

備忘録記事です。 MicrosoftAccessのテーブルを設計・設定していて保存しようとすると「定義されているフィールドの数が多すぎます」とエラー表示表示されて保存できないことがあります。 Accessのテーブルは …続きを読む

Exceのセルに値ではなく数式を入力して反映させたい場合 C2セルにA2セルの値×B2セルの値を計算する数式を入力する Range(“C2”).Formula = “=A2*B2” A2に「TODAY」関数を入力する R …続きを読む

値を指定して更新するUpdate構文 UPDATE テーブル名 SET 列名1=値1,列名2=値2・・・ WHERE 条件文 Selectしたテーブルの値を利用して更新するUpdate構文 UPDATE テーブル１ IN …続きを読む