ExcelVBA【実践】データの編集や追加が簡単！ユーザーフォームで顧客管理！【解説】
▼動画を見ながら実践できるようにコンテンツを配布中
it-yobi.com/excel-p-no187/?li...
【おすすめの参考書】
it-yobi.com/office-excel/#doc...
+---------------------------+
■IT予備メンバー募集
+---------------------------+
勉強を継続するためのサポートを行います。
その中には、動画内の作品の配布や質問し放題などを用意しています。
▼詳しくはこちら▼
it-yobi.com/member/
+---------------------------+
■目次
+---------------------------+
00:00 挨拶
00:05 完成イメージ
01:45 今回の流れ
02:19 【前半】準備
02:31 【前半】作成（ユーザーフォーム：外部）
10:26 【前半】作成（ユーザーフォーム：内部）
18:01 【前半】作成（更新ボタン：外部）
18:53 【前半】作成（更新ボタン：内部）
22:01 【前半】作成（ダブルクリック）
25:58 【前半】セル内の複数行について
26:38 【前半】完成
27:33 【前半】タブ順について
29:06 【前半】完成（おまけ）
29:36 【前半】プログラムの全体
36:35 作成（ユーザーフォーム：外部）
38:09 作成（ユーザーフォーム：内部）
47:39 完成
49:38 プログラムの全体（追加・修正した内容）
53:51 まとめ
+---------------------------+
■マンツーマンの講座（基礎から業務改善まで）
+---------------------------+
基本的な使い方から、業務相談、開発サポートまで行っています。
【Excel】基本操作からVBAまで
www.street-academy.com/myclas...
【Googleスプレッドシート】基本操作からGASまで
www.street-academy.com/myclas...
+---------------------------+
■開発依頼・相談・その他の仕事の連絡はこちら
+---------------------------+
気になることがあれば、ご連絡ください。
word07q@gmail.com
+---------------------------+
■再生リストはこちら（Excel・Googleスプレッドシート・Pythonなど）
+---------------------------+
タスク管理表やカレンダーなど細かくまとめています。
/ @chanryo_eff
+---------------------------+
■SNS
+---------------------------+
TwitterではKZreadでは発信していない小技などを定期的に配信しています。
【Twitter】効率化の小技を発信
/ chanryo_eff
【Instagram】作品を発信
/ chanryo_eff
【TikTok】Shorts動画を発信
/ program_chanryo
#IT予備にてファイル配布中
Пікірлер: 38
こちらにて配布しています。 it-yobi.com/excel-p-no187/?link=4 色んなコンテンツを準備データとセットで配布しているので、動画を見ながら実践できます！ 再生リストにExcel・Googleスプレッドシート・Python・PADなどをまとめています！ kzread.info/dron/y5cpoeTKqZ2cDzWX8NB3Gg.htmlplaylists
勉強になります。 こちらを参照にいろいろ作れるようになりました。
@chanryo_eff
Жыл бұрын
そのように言っていただきありがとうございます！
このやり方を探していました。 しかも凄くわかりやすいです。
@chanryo_eff
9 ай бұрын
お役に立てて何よりです。 嬉しいコメントありがとうございます！
このマクロもとても面白そうです！これも挑戦してみようと思います。
@chanryo_eff
2 жыл бұрын
ありがとうございます！😆
いつも、勉強させてもらってます。ありがとうございます。 ユーザーフォームの画面って、印刷出来るのでしょうか。その際、印刷設定(サイズやカラー白黒等々)も出来るんでしょうか？？
@chanryo_eff
Жыл бұрын
ありがとうございます！ 試したことはありませんが、PrintFormメソッドで印刷できるみたいです。色やサイズなどは試してみないとわかりません💦
有難うございます、本当に助かりました！私のようなVBA素人にも出来て、感動的でした(笑) これに、日付入力のフォームを入れたいのですが、Accessのような日付選択の方法も教えていただけないでしょうか。 このフォームでは｢ctr＋；｣は使えないようですし、会社ではアプリの追加は出来ません。 日付形式だけで、5箇所必要な上、必ず西暦表記が定められているため、「yyyy/mm/dd｣と10桁を手入力しなければなりません。 どうかご教示のほど宜しくお願い致します｡｡
@chanryo_eff
Жыл бұрын
コメントありがとうございます！ 日付選択のようなものはデフォルトでは用意されていなかったと思います💦 そのため、日付形式の入力の場合は、初期値に「2022/10/08」などとデフォルト値を入力して分かりやすいようにする方法や、年月日を別々のテキストボックスにする、スピンボタンを用いる、入力チェックをするなどと対策する必要があるかと思います！ カスタマイズに関してはストアカにてサポートできるので、ご検討のほどよろしくお願いします。 www.street-academy.com/myclass/69604?conversion_name=direct_message&tracking_code=b2cca6384ff8381a4a8b90d675263f5f
いつも詳しく説明して頂き、ありがとうございます。 とてもわかり易く感謝する次第です。 質問ですが、ユーザーフォームの新規ボタンを押すことによって、ユーザーフォーム内のNo欄に自動で次のNoの値を表示させることは可能でしょうか？ またシートに転記した内容を削除した場合、新たに新規ボタンを押して、自動で次番号の取得はできますか？ どうぞ、ご回答いただけますようお願い致します
@chanryo_eff
Жыл бұрын
コメントありがとうございます！ 自動で番号を入力することは可能になります。 ただ、どのようなルールで採番するのかを決める必要があります。 A列の値の中の最大値に1を加えた値でよければ、 「WorksheetFunction.Max(Range("A:A")) + 1」 だけで取得ができます！
@user-nh9te4ei6i
Жыл бұрын
@@chanryo_eff ご回答頂き、ありがとうございます。早速チャレンジしてみます。 どうぞ、これからもよろしくお願い致します。
まんま作ってみました。 本当にわかりやすくてちゃんと全てにおいて理解しながら作成できました。 次へがどんどん次に行く愛嬌は置いといて、本当に勉強になりました(๑•̀ㅂ•́)و✧ ありがとうございました
@chanryo_eff
Жыл бұрын
お役に立てて何よりです！ コメントありがとうございます😆
横に長いリストの場合、データの内容を見やすくするためだけにユーザーフォーム機能を利用したいのですが、更新や新規のボタンにマスクをかけるか表示しないということもできるのでしょうか？
@chanryo_eff
Жыл бұрын
更新ボタンや新規ボタンが不要ならば、そもそもフォーム作成時に用意しなければいいように感じますが、用意するけど非表示にしたいということでしょうか？？ 単純に用意しない場合は動画をご確認いただければイメージできるかと思います😆
19:07コンボボックスに【with▲cmbSex】三角の部分にユーザーホーム名「Ufset」って入れなくてもいいんですか？ 多分【with UfSet.cmbSex】でなないのでしょうか？
@chanryo_eff
Жыл бұрын
オブジェクト名は省略することができます！ 今回は、ユーザーフォームが1つしかないのと、該当するユーザーフォーム内に記述しているため、省略しても可読性が落ちないと思い省略しています！
@Leon-Leon
Жыл бұрын
@@chanryo_eff 複数の場合with UfSet（ユーザーホーム名）.cmbSexなんですね？？
@chanryo_eff
Жыл бұрын
@@Leon-Leon 複数の場合というか、重複するオブジェクト名の場合は指定が必須ですが、それ以外は好みの問題かもです。
とてもわかり易く、初心者でも作成することが出来き感激です。 金額の混在するフォームを作成したのですが、数字にカンマを付けて右よりにしたいのですが、 どこに何を記述していいのか、お教え願えますでしょうかm(_ _)m
@chanryo_eff
Жыл бұрын
ありがとうございます！ 動画のネタとして検討させていただきます🙇♂️
エクセルVBAの入力フォームの質問です。 例えば、名前で検索して、完全一致のデータをその入力フォームに返すコードを教えてください。 別シートとかに結果表示させるコードはよく載っているのですが…
@chanryo_eff
8 ай бұрын
別シートなどに表示させる際に、検索結果をセルに代入しているコードあるかと思います。 その代入式をセルではなく、フォームのオブジェクト（テキストボックスなど）に入力するように変更することで実現できます。 セル.Value = 検索結果 ↓ オブジェクト.要素 = 検索結果
新規ボタン押した時にNoの値を次の番号にしたいです。 また、次のボタン押したときなどもNoに自動で次の番号を入れたいのですが、どうしたらいいのでしょうか？？
@chanryo_eff
6 ай бұрын
ボタンに割り当てたコードに、そのような指示を記述することで、実現できます！ ※現状の理解度が分からないため、的確な回答が難しいです…
新規登録をしたいのですが、リストをテーブルで作りました。 なので、テーブルに行を追加して新規登録を出来るようにする方法を教えてください。
@chanryo_eff
Жыл бұрын
こちらの内容の表をテーブルにして実際に動かされましたか？？
@user-eo3un4fm4c
Жыл бұрын
@@chanryo_eff すみません！試行錯誤して、出来るようになりました！ その代わり、フォーム中にあるテキストボックスAに生年月日を入れたらテキストボックスBに年齢が反映されて、それを更新時にセルに反映出来る様にする為のコードを教えて欲しいです！！
@chanryo_eff
Жыл бұрын
無事にできたみたいでよかったです！ 年齢を求めるためには、どのような計算式が必要なのかを考えてパーツを組んでいくとできると思います！ ※個々のカスタマイズの対応はストアカもしくはメンバーのみとなっております🙇♂️
もう一つ教えてください、削除ボタンは作れますか？
@chanryo_eff
Жыл бұрын
行を削除するのか、値だけを消して空欄にするのかによりますが、もちろん実装可能です！
ユーザーホームに顔写真を表示される様に出来ると、もっとわかりやすいかな？
@chanryo_eff
11 ай бұрын
そうですね！ 顔写真を表示するパターンの開発も検討してみます！
@Leon-Leon
11 ай бұрын
@@chanryo_eff さまへ これが出来れば、名刺整理もExcelだけで出来るのかな？
@chanryo_eff
11 ай бұрын
@@Leon-Leon 名刺情報のスキャンなどは上手くいかないかもですが、ある程度の名刺管理システムは作れるかもですね！