Access AccessVBA入門⑨SQL
あいまい検索Sub Test1() Dim StrSQL As String StrSQL = "SELECT 社員番号, 社員名 " & _ "FR0M T社員名簿 " & _ "WHERE 社員名 Like '*藤*';...
2023-07
Access Access AccessVBA入門⑧フォーム・レポートの応用操作
KeyPressPrivate Sub txt1_KeyPress(KeyAscii As Integer) Select Case KeyAscii Case 8,9,13 Exit Sub Case Else IF KeyAscii >...
Access AccessVBA入門⑦フォーム間連携
今回は、フォーム間での操作です。フォームからフォームを開くPrivate Sub btn1_Click() If Not IsNull(Me.社員番号.Value) Then DoCmd.OpenForm "Fフォームを開く2", , , ...
Access AccessVBA入門⑥フォーム・レポート操作
今回からフォーム・レポートについてコードを紹介します。フォーム・レポートの操作Sub FormTest() Dim c As Object Forms("Fフォーム").txt3.Value = "標準モジュール" MsgBox "標準モジ...
Access AccessVBA入門⑤OLEオートメーション
今回は、ExcelなどのAccessとは別のアプリケーションを操作できるようにするOLEオートメーション（Object Linking and Embedding オートメーション）について紹介します。Accessを操作していて、Excel...
Access AccessVBA入門④FileDialog
今回は、前回のFileSystemObjectに引き続き、MicroSoftOfficeのダイアログボックスの操作ができるFileDialogオブジェクトを紹介します。Sub Test() Dim MyDialog As fileDialo...
Access AccessVBA入門③FileSystemObject
今回は、AccessVBAの便利な機能で、FileSystemObjectを紹介します。Microsoft Scripting Runtimeライブラリで、ドライブ・フォルダ・ファイルを操作できるようになります。◉FileSystemObj...