UserForm

前回、商品マスタデータの取得プログラムを作成しました。この記事では、商品在庫画面の商品在庫表 及び 商品検索を作成していきます。 VBA在庫管理システムVer01 商品在庫の在庫表作成 商品在庫表の表示 商品在庫表の表示設定 商品在庫の商品検索作成 変数の設定 詳細情報のリセット設定 商品名称コンボでの名称検索 商品IDコンボでの商品検索 商品在庫リストでの商品検索 リセットボタンの設定 VBA在庫管理システムVer01 商品在庫の在庫表作成 商品在庫表の表示 商品在庫表を表示するプロシージャをサブルーチンとして作成します。 Sub ShowItemStock() Application.Sc…

前回、商品マスタの在庫更新機能の作成をおこないました。この記事では、商品在庫画面のマスタデータ取得のプログラムを作成していきます。 VBA在庫管理システムVer01 商品マスタのマスタデータ取得 変数の設定 データの取り込み データの格納 VBA在庫管理システムVer01 商品マスタのマスタデータ取得 プログラムコードは、商品マスタ画面とほぼ同一ですが、変数の設定・データの格納部分で若干異なります。 変数の設定 商品マスタデータの取り込み用変数の設定をしていきます。 VBEでfrmItenStockを選択し、宣言セクションにデータ取得用配列変数と列挙型変数をPrivateで宣言します。 Opt…

前回、商品在庫画面の画面作成をおこないました。ここからプログラムを作成していきます。この記事では、商品マスタの在庫更新プログラムを作成していきます。 VBA在庫管理システムVer01 在庫更新の準備作業 動的２次元配列変数について 在庫数の取り扱いについて 受払抽出シートの追加 標準モジュールの作成 商品マスタの在庫更新 在庫更新 在庫更新フォームの作成 在庫更新選択画面 在庫更新画面 在庫更新の実行 メニュー画面の商品在庫ボタン 選択画面の"はい"ボタン 選択画面の"いいえ"ボタン VBA在庫管理システムVer01 在庫更新の準備作業 動的２次元配列変数について ここまでVBAでのリストデー…

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) If CloseMode = vbFormControlMenu Then MsgBox "［閉じる］ボタンを使用してください" Cancel = True End If End Sub ネタ元 www.moug.net

Dim start_date, end_date, yyyymmdd yyyymmdd = Format(Now, "yyyy/mm/dd") start_date = CDate(yyyymmdd + " " + UserForm_RetryInfo.TextBox_Start) end_date = CDate(yyyymmdd + " " + UserForm_RetryInfo.TextBox_End) ネタ元 daitaideit.com

状況 user というオブジェクトをAPIの結果から取得したいが、後続処理でその変数名を使いたいので、user という値を tmpUser というような別の名前でAPIの結果から取り出したい 結論 const { 本来のオブジェクト名: 変更後のオブジェクト名 } = object; の形で値を受け取ることで可能 const UserFormKeys = [ "name", "email", "password", ] as const; // APIの戻り値のオブジェクトに存在するのは user だが、tmpUser で受け取ることが出来る const { user: tmpUser } =…

前回、商品出庫画面の画面作成をおこないました。ここからプログラムを作成していきます。この記事では、商品出庫画面のマスタデータ取得のプログラムを作成していきます。 VBA在庫管理システムVer01 コードの検索と置換 商品マスタのマスタデータ取得 変数の設定 データの取り込み データの格納 VBA在庫管理システムVer01 コードの検索と置換 検索と置換機能は、検索範囲を３段階に設定できますので、活用してみましょう。1. カレント プロシージャ現在カーソルのあるプロシージャの 、Sub() ～ End Sub までの範囲。 2. カレント モジュールプロジェクトエクスプローラーの、現在選択されて…

前回、商品入庫画面の修正/削除機能を作成しました。この記事では、受入検査表を例に帳票の出力方法を解説します。 VBA在庫管理システムVer01 帳票出力の準備 出力帳票の作成 出力ボタンの作成 出力フォームの作成 標準モジュールの作成 受入検査表の出力 受入検査表 受入検査表ボタンの設定 受入検査表の出力 VBA在庫管理システムVer01 帳票出力の準備 出力帳票の作成 最初に準備したレポートブック（在庫管理REPORT.xlsx）に受入検査表用のシートを作成します。帳票はヘッダー部のみ作成します。標題はVBAで書き込みますが、サンプルとして入力しています。書式は、左から入庫情報・入庫履歴・受…

こんにちは。 派犬事務員のコロ子です。前回「ユーザーフォームは作った瞬間にインスタンスが生成されてオブジェクトが使えるようになる」の記事を書いたら 「あえてインスタンスを生成することもできるよ」と教えていただいた。 ということは、同じユーザーフォームを複数同時に表示することもできるのか！？ さっそく試してみよう！ 同じユーザーフォームを複数同時に表示させる このユーザーフォームを2つ同時に表示する Sub Test1() Dim uf1 As UserForm1 Dim uf2 As UserForm1 Set uf1 = New UserForm1 Set uf2 = New UserFor…

前回、商品入庫画面の商品検索・入庫入力を作成しました。この記事では、商品入庫画面の入庫リストを作成していきます。 VBA在庫管理システムVer01 商品入庫の入庫リスト作成 入出庫抽出シートの追加 入庫予定リストの表示 商品別リストの表示 入庫リストの表示設定 VBA在庫管理システムVer01 商品入庫の入庫リスト作成 入出庫抽出シートの追加 データブック（在庫管理DATA.xlsx）に入出庫抽出用のシートを追加します。検索条件は４項目、入力しておきます。 商品ID 入出庫日 入出庫区分 削除抽出項目は６項目、入力しておきます。 入出庫ID 入出庫日 商品ID 商品名称 入出庫数 入出庫内訳 …

こんにちは。 派犬事務員のコロ子です。 お久しぶりです。長らくブログを書いてなかったけど、やめたわけじゃないよ～。 最近仕事で変な単調作業をしていて犬小屋に帰ってからぐったり疲れてパソコンを触る元気がなかったので。 VBAを書く仕事は全然疲れないのに単調作業は本当に疲れて困るわぁ～(>_ ユーザーフォームについて、またまた勘違いしてました・・・。何を勘違いしていたかというと、ユーザーフォームって作った瞬間にインスタンスが生成されてオブジェクトが使えるようになるんですね。どーゆーことかというと、 ①「ボタン1」と押すとUserForm1が表示される。 ②TextBox1に数字を入力する。 ③Us…