プレビュー時のズームサイズを設定する |
|
'対象となるレポートを選択します
DoCmd.SelectObject acReport, "rpt社員マスタ"
'ズーム(10%)
DoCmd.RunCommand acCmdZoom10
'ズーム(25%)
DoCmd.RunCommand acCmdZoom25
'ズーム(50%)
DoCmd.RunCommand acCmdZoom50
'ズーム(75%)
DoCmd.RunCommand acCmdZoom75
'ズーム(100%)
DoCmd.RunCommand acCmdZoom100
'ズーム(150%)
DoCmd.RunCommand acCmdZoom150
'ズーム(200%)
DoCmd.RunCommand acCmdZoom200
|
すべてのレコードを選択する |
|
'対象となるフォームを選択します(テーブルやクエリーでもかまいません)
DoCmd.SelectObject acForm, "frm社員マスタ"
'すべてのレコードの選択します
DoCmd.RunCommand acCmdSelectAllRecords
|
アクティブフォームに対してスペルチェックを実行する |
|
DoCmd.RunCommand acCmdSpelling
|
アクティブフォームをデータシートビューに切り替える |
|
'フォームビューの状態のアクティブフォームを、データシートビューに切り替えます
DoCmd.RunCommand acCmdDatasheetView
|
アクティブフォームをデータ入力専用に切り替える |
|
DoCmd.RunCommand acCmdDataEntry
|
テーブルのリンクを実する |
|
'メニューの[外部データの取り込み]-[テーブルのリンク]を実行します
DoCmd.RunCommand acCmdLinkTables
|
テーブル列を編集する |
|
'テーブル列を削除します
DoCmd.RunCommand acCmdDeleteTableColumn
'テーブル列を挿入します
DoCmd.RunCommand acCmdInsertTableColumn
|
アクティブフォームのデータをテキストファイルに出力する |
|
'対象となるフォームを選択します
DoCmd.SelectObject acForm, "frm社員マスタ"
'テキストファイルとして出力します
DoCmd.RunCommand acCmdOutputToText
|
Accessのヘルプの[キーワード]タブを表示する |
|
'トピックの検索を実行します
DoCmd.RunCommand acCmdMicrosoftAccessHelpTopics
|
Accessのバージョン情報を表示する |
|
DoCmd.RunCommand acCmdAboutMicrosoftAccess
|
テキストボックスにハイパーリンクを挿入する |
|
'アクティブなテキストボックスにハイパーリンクを挿入します
DoCmd.RunCommand acCmdInsertHyperlink
|
ハイパーリンクを編集する |
|
'「ハイパーリンクの挿入」ダイアログを表示します
DoCmd.RunCommand acCmdEditHyperlink
|
ハイパーリンクをクリアする |
|
'ハイパーリンクのURLの文字列などを削除します
DoCmd.RunCommand acCmdClearHyperlink
|
ハイパーリンクを開く |
|
'テキストボックスのハイパーリンクに指定されたホームページやファイルを開きます
DoCmd.RunCommand acCmdOpenHyperlink
|
フィルタ/並べ替えの編集を行う |
|
'アクティブフォームに対する「フィルタ/並べ替えの編集」画面を表示します
DoCmd.RunCommand acCmdAdvancedFilterSort
|
フィルタ/並べ替えを実行する |
|
DoCmd.RunCommand acCmdApplyFilterSort
Forms!frm社員マスタ.Filter = "シメイ Like 'ウエノ*'"
DoCmd.RunCommand acCmdApplyFilterSort
|
フィルタ/並べ替えを解除する |
|
'フィルタ/並べ替えを解除してすべてのレコードを表示します
DoCmd.RunCommand acCmdRemoveFilterSort
|
フィルタの実行と解除を交互に行う |
|
現在、フィルタ/並べ替えの条件は設定されているが、まだすべてのレコードが表示されている状態とします。ここで次のコードを実行すると、フィルタが実行されます。
DoCmd.RunCommand acCmdToggleFilter
そのまま次のコードを実行すると、フィルタが解除され、すべてのレコードが表示されます
DoCmd.RunCommand acCmdToggleFilter
|
アクティブフォームをフォームビューに切り替える |
|
'データシートビューの状態のアクティブフォームを、フォームビューに切り替えます
DoCmd.RunCommand acCmdFormView
|
フォームフィルタの設定画面に切り替える |
|
DoCmd.RunCommand acCmdFilterByForm
|
フォームの表示フォントを変更する |
|
DoCmd.RunCommand acCmdFont
|
ページ設定を行う |
|
'アクティブウィンドウの「ページ設定」ダイアログを表示します
DoCmd.RunCommand acCmdPageSetup
|
マクロを実行する |
|
'「マクロの実行」ダイアログを表示します
DoCmd.RunCommand acCmdRunMacro
|
レコードを選択する |
|
'フォームなどで、現在フォーカスのあるレコードの行全体を選択します
DoCmd.RunCommand acCmdSelectRecord
|
レコードを削除する |
|
'削除するレコード(カレントレコード)を選択します
DoCmd.RunCommand acCmdSelectRecord
'レコードを削除します
DoCmd.RunCommand acCmdDeleteRecord
|
レコードを保存する |
|
'編集のレコードを保存します
DoCmd.RunCommand acCmdSaveRecord
|