Access AccessVBA入門⑨SQL
あいまい検索Sub Test1() Dim StrSQL As String StrSQL = "SELECT 社員番号, 社員名 " & _ "FR0M T社員名簿 " & _ "WHERE 社員名 Like '*藤*';...
Access
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...
Access AccessVBA入門②DAO(Data Access Object)
DAOは、JETデータベースエンジンに直接接続するため、他のDBとの接続はできませんが、ACCESS単体での処理に迅速に対応できます。SQL実行Sub SQL実行() Dim DB As DAO.Database Set DB = Curr...
Access AccessVBA入門①ADO(ActiveX Data Object)
世間一般では、Excelに比べると、Accessはあまり使用されていないようです。ただ、Accessには、Excelでは処理しきれないような大量のデータを扱うことが出来ます。また、何かと自由度が高いExcelでの構築物に比べて、プログラムの...