Jomo

AccessVBA開発

AccessVBA クラスオブジェクト⑤在庫数表示

Option Compare Database Dim zanNuki As Long, zanKomi As Long 'zan1 As Long, zan2 As Long, zan3 As Long, zan4 As Long, za...
AccessVBA開発

AccessVBA クラスオブジェクト④バックアップ

Option Compare Database Private Sub Form_Open(Cancel As Integer) FormSizeSquare Me.PictureType = 0 Me.Picture = BgImageD...
AccessVBA開発

AccessVBA クラスオブジェクト③大会出品用印刷メイン

Option Compare Database '印刷対象のレポート名の変数を定義 Dim RepotMei As String Dim RepotMei2 As String Private Sub cmbレポート選択_Enter() M...
AccessVBA開発

AccessVBA クラスオブジェクト②商品編集

Option Compare Database Private Sub cmbブランドコード_AfterUpdate() Me.txtブランド.Value = Me.cmbブランドコード.Column(1) End Sub Private ...
AccessVBA開発

AccessVBA クラスオブジェクト①商品検索

Option Compare Database '3つの条件の項目を代入する変数を定義 Dim F1 As String, F2 As String, F3 As String '取得した値を代入する変数を定義 Dim J1 As Stri...
AccessVBA開発

AccessVBA 標準モジュール⑩振番設定

AccessVBA開発

AccessVBA 標準モジュール⑨パブリック変数定義

Option Compare Database '******************************************************* '* '* フォーム間、値受け渡しの為、変数をpublicで定義 '* '**...
AccessVBA開発

AccessVBA 標準モジュール⑧FSOフォルダ・ファイル操作

Option Compare Database Function BackUpFile(FolderPath, FileName) '***************フォルダ検索/ファイル検索/ファイルコピー******** ' 'バックアッ...
AccessVBA開発

AccessVBA 標準モジュール⑦画面設定

Option Compare Database Sub リボン非表示() 'リボン非表示 DoCmd.ShowToolbar "Ribbon", acToolbarNo 'ナビゲーションウィンドウを非表示にする DoCmd.SelectOb...
AccessVBA開発

AccessVBA 標準モジュール⑥外部ファイルを操作

Option Compare Database Sub XLSExport(TableName, FilePath) '************************************************ 'エクセルファイルをエ...