ray88’s diary

お仕事で困ったとき用の自分用の覚書

2020-01-01から1年間の記事一覧

Docmdオブジェクト 警告音を鳴らす

■Beepメソッド 警告音を鳴らす 【書式】 Docmd.Beep (例) Sub Test13() DoCmd.Beep MsgBox "警告音が再生されました" End Sub

Docmdオブジェクト 画面の再描画のオン/オフを切り替える(Echoメソッド)

■Echoメソッドは画面の再描画のオン/オフを切り替える 【書式】 Docmd.Echo TrueまたはFalse True:マクロ実行中に画面を再描画して結果を反映する。 False:画面を再描画しない Sub Test14() DoCmd.Echo False DoCmd.OpenTable "T社員名簿" DoCmd.OpenQuer…

Docmdオブジェクト 指定したオブジェクトを保存・閉じる

■Saveメソッド:指定したオブジェクトを保存する ■Closeメソッド:指定したオブジェクトを閉じる 【書式】 Docmd.Save オブジェクトの種類,オブジェクトの名前 Docmd.Close オブジェクトの種類,オブジェクトの名前,保存方法 (例) Sub Test8() DoCmd.Close a…

Docmdオブジェクト Accessを終了する Quitメソッド

■Quitメソッド:Accessを終了する。終了前にデータベースを保存することもできる 【書式】 Docmd.Quit 保存設定 【引数】 保存設定 説明 acQuitPrompt 変更の保存を確認するダイアログボックスが表示される acQuitSaveAll(既定) ダイアログボックスを表示せ…

Docmdオブジェクト AccessVBA アラートを非表示にする

■SetWarningsメソッド アラートの表示・非表示を切り替える 【書式】 Docmd.SetWarnings True または False (例) Sub Test15() DoCmd.SetWarnings False DoCmd.OpenQuery "Q社員名簿更新" DoCmd.SetWarnings True End Sub

Docmdメソッド レコードの検索

■FindRecordメソッド:指定した条件を満たす最初のレコードを検索する ■FindNextメソッド:FindRecordメソッドで検索した次のレコードを検索する 【書式】 Docmd.FindRecord 検索するデータ,検索条件,文字の区別,検索方向,表示書式による検索,検索対象,最初…

Docmdオブジェクト テーブル・クエリ・フォームにフィルタを設定・解除する。

■ApplyFilterメソッド アクティブなテーブル・クエリ・フォームにフィルタを設定する ■ShowAllRecordsメソッド フィルタの設定を解除する 【書式】 Docmd.ApplyFilter フィルタ名,抽出条件 Docmd.ShowAllRecords 【引数】 ApplyFilterメソッドの引数 ※フィル…

Docmdオブジェクト データベースを様々な形式で出力する(OutputTo)

■OutputToメソッドはテキストを様々な形式で出力できるが、大量データの出力には不向き。 大量データの出力にはTransferTextまたはTransferSpreadsheetメソッドの使用を推奨。■データをExcelファイル形式で出力する場合、OutoputToメソッドで出力すると書式…

Docmdオブジェクト PrintOutメソッド

【書式】 Docmd.PrintOut 印刷範囲,開始ページ,終了ページ,印刷品質,印刷部数,部単位の印刷 (例) Sub Test7() DoCmd.SelectObject acReport, "R社員名簿" DoCmd.PrintOut acPrintAll End Sub (例2)レポートを印刷する場合、以下のコードでも印刷できる。 ※…

Docmdオブジェクト Excelファイルのインポート・エクスポート

【書式】 Docmd.TransferSpreadsheet 変換種類,ファイル形式,テーブル名,ファイル名,フィールド名設定,Range (例) Sub Test9() DoCmd.TransferText acExportDelim, _ , "T社員名簿", "C:\temp\T社員名簿.txt", True DoCmd.TransferText acImportDelim, _ , "…

Docmdオブジェクト テキストファイルをインポート・エクスポートする

【書式】 Docmd.TransferText 変換種類,定義名,テーブル名,ファイル名,フィールド名設定 (例) Sub Test9() DoCmd.TransferText acExportDelim, _ , "T社員名簿", "C:\temp\T社員名簿.txt", True DoCmd.TransferText acImportDelim, _ , "新T社員名簿", "C:\t…

Docmdオブジェクト 指定したオブジェクトの名前を変更する

【書式】 Docmd.Rename 新しい名前,オブジェクトの種類,オブジェクト名 (例) Sub Test6() DoCmd.CopyObject , "F社員名簿コピー", acForm, "F社員名簿" Stop DoCmd.Rename "新F社員名簿", acForm, "F社員名簿コピー" Stop DoCmd.DeleteObject acForm, "新F…

Docmdオブジェクト 指定したオブジェクトを削除する

■Deleteメソッドは指定したオブジェクトを削除する 【書式】 Docmd.DeleteObject オブジェクトの種類,オブジェクト名 (例) Sub Test6() DoCmd.CopyObject , "F社員名簿コピー", acForm, "F社員名簿" Stop DoCmd.Rename "新F社員名簿", acForm, "F社員名簿コ…

Docmdオブジェクト CopyObjectメソッド 指定したオブジェクトをコピーする

■CopyObjectメソッドは指定したオブジェクトをコピーする 【書式】 Docmd.CopyObject コピー先データベース,新しい名前,オブジェクトの種類,オブジェクト名 (例) Sub Test6() DoCmd.CopyObject , "F社員名簿コピー", acForm, "F社員名簿" Stop DoCmd.Rename …

Docmdオブジェクト アクティブウィンドウの移動・サイズ変更

■MoveSizeメソッドはアクティブウィンドウの移動やサイズ変更を行う。 【書式】 ※最低1つは引数を指定する必要がある。省略した引数はウィンドウの現在の設定値が使用される。 Docmd.MoveSize 水平位置,垂直位置,ウィンドウ幅,ウィンドウ高さ ■引数の単位に…

Docmdオブジェクト ウィンドウの表示方法を指定する

■Maximizeメソッド アクティブウィンドウを最大化して表示する■Minimizeメソッド アクティブウィンドウを最小化して表示する■Renameメソッド アクティブウィンドウを元のサイズで表示する【書式】 Docmd.Maximize Docmd.Minimize Docmd.Restore (例) Sub Te…

Docmdオブジェクト GotoControlメソッド

■GoToControlメソッドは指定したフィールド、またはコントロールにフォーカスを移動する。 【書式】 DoCmd.GoToControl コントロール名 (例) Sub Test3() DoCmd.SelectObject acForm, "F社員名簿" DoCmd.GoToControl "社員名" MsgBox "[社員名]コントロ…

Docmdオブジェクト SelectObjectメソッド

■SelectObjectメソッドは指定したデータベースのオブジェクトを選択し、アクティブにする 【書式】 Docmd.SelectObject オブジェクトの種類,オブジェクト名,ナビゲーションでの選択 引数 定数 説明 オブジェクトの種類 acTable テーブルを対象とする acQuery…

OpenReportメソッドの引数

引数 定数 説明 レポート名 開くレポート名 ビュー(省略可) acViewNomal(既定) データシートビューで開く acViewDesign デザインビューで開く acViewPreview 印刷プレビュー acViewReport レポートビューで開く acViewLayout レイアウトビューで開く フィ…

OpenFormメソッドの引数

引数 定数 説明 フォーム名 開くフォーム名 ビュー(省略可) acNomal(既定) データシートビューで開く acDesign デザインビューで開く acPreview 印刷プレビュー acFormDS データシートビューで開く acLayout レイアウトビューで開く フィルタ名(省略可) ク…

OpenQueryメソッドの引数

引数 定数 説明 テーブル名 開くクエリ名 ビュー(省略可) acViewNomal(既定) データシートビューで開く acViewDesign デザインビューで開く acViewPreview 印刷プレビュー データモード(省略可) acAdd 追加モードで開く acEdit(既定) 編集モードで開く acR…

OpenTableメソッドの引数

引数 定数 説明 テーブル名 開くテーブル名 ビュー(省略可) acViewNomal(既定) データシートビューで開く acViewDesign デザインビューで開く acViewPreview 印刷プレビュー データモード(省略可) acAdd 追加モードで開く acEdit(既定) 編集モードで開く a…

Docmdオブジェクト Open系メソッド

【書式】 Docmd.OpenTable テーブル名,ビュー,データモード OpenTableメソッドの引数 - ray88’s diary Docmd.OpenQuery クエリ名,ビュー,データモード OpenQueryメソッドの引数 - ray88’s diary Docmd.OpenForm フォーム名,ビュー,フィルタ名,フィルタ条件式…

AccessVBA 指定したフォーム・コントロールにフォーカスを移動する

■SetFocusメソッドは指定したフォームやコントロールにフォーカスを移動する。 【書式】 コントロール.SetFocus (例) Private Sub btn15_Click() '[SetFocus]ボタン Me.txt4.SetFocus End Sub ray88.hatenablog.com

AccessVBA フォームのレコードセレクタの表示有無を設定する

■RecordSelectorsプロパティはフォームにレコードセレクタを表示するかどうかを設定する。 【書式】 オブジェクト.RecordSelectors = True または False (例) Private Sub btn14_Click() '[レコードセレクタの表示]ボタン If Me.RecordSelectors Then Me.…

AccessVBA リストボックス・コンボボックスの連結列を設定する(どの列の値を使用するか)

■BoundColumnプロパティはリストボックスの連結列(どの列をコントロールの値として使用するか)を設定する 【書式】 コントロール.BoundColumn = 列番号 (例) Private Sub btn12_Click() '[値にする列を変更]ボタン If Me.list1.BoundColumn = 1 Then Me…

AccessVBA リスト・コンボボックスの項目の選択・非選択を設定する

■Selectedプロパティは、リストやコンボボックスの項目の選択・非選択を設定します。 【書式】 コントロール.Selected(項目番号) = True または False (例) Private Sub btn11_Click() '[選択された項目をクリア]ボタン Dim MyLng As Long MyLng = Me.lis…

AccessVBA リスト・コンボボックスで選択された項目の番号を取得する

■ListIndexプロパティはリスト・コンボボックスで選択された項目の番号を返します 行番号は「0」からスタートし、何も選択されていないときは「-1」を返します。 【書式】 選択された項目番号 = コントロール.ListIndex (例) Private Sub btn10_Click() '[…

AccessVBA リスト・コンボボックスに表示される列数を設定する

■ColumnCountプロパティはリスト・コンボボックスに表示される列数を設定します。 【書式】 コントロール.ColumnCount = 列数 (例) Private Sub btn9_Click() '[リストの列数の変更]ボタン Me.list1.ColumnCount = 2 Me.list1.RowSourceType = "Table/Quer…

AccessVBA リストボックス・コンボボックスに表示される列数を設定する

【書式】 コントロール.ColumnCount = 列数 (例) Private Sub btn9_Click() '[リストの列数の変更]ボタン Me.list1.ColumnCount = 2 Me.list1.RowSourceType = "Table/Query" Me.list1.RowSource = "T部署マスタ" End Sub