ExcelVBA【実践】データの編集や追加が簡単!ユーザーフォームで顧客管理!【解説】

แชร์
ฝัง
  • เผยแพร่เมื่อ 27 ต.ค. 2024

ความคิดเห็น • 38

  • @chanryo_eff
    @chanryo_eff  2 ปีที่แล้ว +3

    こちらにて配布しています。
    it-yobi.com/excel-p-no187/?link=4
    色んなコンテンツを準備データとセットで配布しているので、動画を見ながら実践できます!
    再生リストにExcel・Googleスプレッドシート・Python・PADなどをまとめています!
    th-cam.com/channels/y5cpoeTKqZ2cDzWX8NB3Gg.htmlplaylists

  • @user-ug1no2ri9e
    @user-ug1no2ri9e ปีที่แล้ว +2

    勉強になります。
    こちらを参照にいろいろ作れるようになりました。

    • @chanryo_eff
      @chanryo_eff  ปีที่แล้ว

      そのように言っていただきありがとうございます!

  • @zx14r
    @zx14r ปีที่แล้ว

    このやり方を探していました。
    しかも凄くわかりやすいです。

    • @chanryo_eff
      @chanryo_eff  ปีที่แล้ว

      お役に立てて何よりです。
      嬉しいコメントありがとうございます!

  • @スリーゼット-k4m
    @スリーゼット-k4m 2 ปีที่แล้ว +2

    このマクロもとても面白そうです!これも挑戦してみようと思います。

    • @chanryo_eff
      @chanryo_eff  2 ปีที่แล้ว

      ありがとうございます!😆

  • @micobmhbc3659
    @micobmhbc3659 2 ปีที่แล้ว +2

    有難うございます、本当に助かりました!私のようなVBA素人にも出来て、感動的でした(笑)
    これに、日付入力のフォームを入れたいのですが、Accessのような日付選択の方法も教えていただけないでしょうか。
    このフォームでは「ctr+;」は使えないようですし、会社ではアプリの追加は出来ません。
    日付形式だけで、5箇所必要な上、必ず西暦表記が定められているため、「yyyy/mm/dd」と10桁を手入力しなければなりません。
    どうかご教示のほど宜しくお願い致します。。

    • @chanryo_eff
      @chanryo_eff  2 ปีที่แล้ว

      コメントありがとうございます!
      日付選択のようなものはデフォルトでは用意されていなかったと思います💦
      そのため、日付形式の入力の場合は、初期値に「2022/10/08」などとデフォルト値を入力して分かりやすいようにする方法や、年月日を別々のテキストボックスにする、スピンボタンを用いる、入力チェックをするなどと対策する必要があるかと思います!
      カスタマイズに関してはストアカにてサポートできるので、ご検討のほどよろしくお願いします。
      www.street-academy.com/myclass/69604?conversion_name=direct_message&tracking_code=b2cca6384ff8381a4a8b90d675263f5f

  • @Leon-Leon
    @Leon-Leon ปีที่แล้ว +2

    もう一つ教えてください、削除ボタンは作れますか?

    • @chanryo_eff
      @chanryo_eff  ปีที่แล้ว

      行を削除するのか、値だけを消して空欄にするのかによりますが、もちろん実装可能です!

  • @みっつ-u8h
    @みっつ-u8h ปีที่แล้ว +2

    いつも詳しく説明して頂き、ありがとうございます。
    とてもわかり易く感謝する次第です。
    質問ですが、ユーザーフォームの新規ボタンを押すことによって、ユーザーフォーム内のNo欄に自動で次のNoの値を表示させることは可能でしょうか?
    またシートに転記した内容を削除した場合、新たに新規ボタンを押して、自動で次番号の取得はできますか?
    どうぞ、ご回答いただけますようお願い致します

    • @chanryo_eff
      @chanryo_eff  ปีที่แล้ว +1

      コメントありがとうございます!
      自動で番号を入力することは可能になります。
      ただ、どのようなルールで採番するのかを決める必要があります。
      A列の値の中の最大値に1を加えた値でよければ、
      「WorksheetFunction.Max(Range("A:A")) + 1」
      だけで取得ができます!

    • @みっつ-u8h
      @みっつ-u8h ปีที่แล้ว +1

      @@chanryo_eff ご回答頂き、ありがとうございます。早速チャレンジしてみます。
      どうぞ、これからもよろしくお願い致します。

  • @s_2732
    @s_2732 2 ปีที่แล้ว +2

    いつも、勉強させてもらってます。ありがとうございます。
    ユーザーフォームの画面って、印刷出来るのでしょうか。その際、印刷設定(サイズやカラー白黒等々)も出来るんでしょうか??

    • @chanryo_eff
      @chanryo_eff  2 ปีที่แล้ว

      ありがとうございます!
      試したことはありませんが、PrintFormメソッドで印刷できるみたいです。色やサイズなどは試してみないとわかりません💦

  • @さんかめはめ
    @さんかめはめ 10 หลายเดือนก่อน

    新規ボタン押した時にNoの値を次の番号にしたいです。
    また、次のボタン押したときなどもNoに自動で次の番号を入れたいのですが、どうしたらいいのでしょうか??

    • @chanryo_eff
      @chanryo_eff  9 หลายเดือนก่อน

      ボタンに割り当てたコードに、そのような指示を記述することで、実現できます!
      ※現状の理解度が分からないため、的確な回答が難しいです…

  • @Leon-Leon
    @Leon-Leon ปีที่แล้ว

    ユーザーホームに顔写真を表示される様に出来ると、もっとわかりやすいかな?

    • @chanryo_eff
      @chanryo_eff  ปีที่แล้ว +1

      そうですね!
      顔写真を表示するパターンの開発も検討してみます!

    • @Leon-Leon
      @Leon-Leon ปีที่แล้ว

      @@chanryo_eff さまへ
      これが出来れば、名刺整理もExcelだけで出来るのかな?

    • @chanryo_eff
      @chanryo_eff  ปีที่แล้ว +1

      @@Leon-Leon 名刺情報のスキャンなどは上手くいかないかもですが、ある程度の名刺管理システムは作れるかもですね!

  • @Leon-Leon
    @Leon-Leon ปีที่แล้ว +2

    19:07コンボボックスに【with▲cmbSex】三角の部分にユーザーホーム名「Ufset」って入れなくてもいいんですか?
    多分【with UfSet.cmbSex】でなないのでしょうか?

    • @chanryo_eff
      @chanryo_eff  ปีที่แล้ว +1

      オブジェクト名は省略することができます!
      今回は、ユーザーフォームが1つしかないのと、該当するユーザーフォーム内に記述しているため、省略しても可読性が落ちないと思い省略しています!

    • @Leon-Leon
      @Leon-Leon ปีที่แล้ว

      @@chanryo_eff 複数の場合with UfSet(ユーザーホーム名).cmbSexなんですね??

    • @chanryo_eff
      @chanryo_eff  ปีที่แล้ว +1

      @@Leon-Leon 複数の場合というか、重複するオブジェクト名の場合は指定が必須ですが、それ以外は好みの問題かもです。

  • @田中光-y9s
    @田中光-y9s 2 ปีที่แล้ว

    新規登録をしたいのですが、リストをテーブルで作りました。
    なので、テーブルに行を追加して新規登録を出来るようにする方法を教えてください。

    • @chanryo_eff
      @chanryo_eff  2 ปีที่แล้ว +1

      こちらの内容の表をテーブルにして実際に動かされましたか??

    • @田中光-y9s
      @田中光-y9s 2 ปีที่แล้ว

      @@chanryo_eff すみません!試行錯誤して、出来るようになりました!
      その代わり、フォーム中にあるテキストボックスAに生年月日を入れたらテキストボックスBに年齢が反映されて、それを更新時にセルに反映出来る様にする為のコードを教えて欲しいです!!

    • @chanryo_eff
      @chanryo_eff  2 ปีที่แล้ว

      無事にできたみたいでよかったです!
      年齢を求めるためには、どのような計算式が必要なのかを考えてパーツを組んでいくとできると思います!
      ※個々のカスタマイズの対応はストアカもしくはメンバーのみとなっております🙇‍♂️

  • @大屋まりこ
    @大屋まりこ ปีที่แล้ว

    エクセルVBAの入力フォームの質問です。
    例えば、名前で検索して、完全一致のデータをその入力フォームに返すコードを教えてください。
    別シートとかに結果表示させるコードはよく載っているのですが…

    • @chanryo_eff
      @chanryo_eff  ปีที่แล้ว

      別シートなどに表示させる際に、検索結果をセルに代入しているコードあるかと思います。
      その代入式をセルではなく、フォームのオブジェクト(テキストボックスなど)に入力するように変更することで実現できます。
      セル.Value = 検索結果

      オブジェクト.要素 = 検索結果

  • @worldkei
    @worldkei ปีที่แล้ว

    とてもわかり易く、初心者でも作成することが出来き感激です。
    金額の混在するフォームを作成したのですが、数字にカンマを付けて右よりにしたいのですが、
    どこに何を記述していいのか、お教え願えますでしょうかm(_ _)m

    • @chanryo_eff
      @chanryo_eff  ปีที่แล้ว

      ありがとうございます!
      動画のネタとして検討させていただきます🙇‍♂️

  • @猫猫-b5t
    @猫猫-b5t ปีที่แล้ว +2

    まんま作ってみました。
    本当にわかりやすくてちゃんと全てにおいて理解しながら作成できました。
    次へがどんどん次に行く愛嬌は置いといて、本当に勉強になりました(๑•̀ㅂ•́)و✧
    ありがとうございました

    • @chanryo_eff
      @chanryo_eff  ปีที่แล้ว

      お役に立てて何よりです!
      コメントありがとうございます😆

  • @mimineko0618
    @mimineko0618 2 ปีที่แล้ว

    横に長いリストの場合、データの内容を見やすくするためだけにユーザーフォーム機能を利用したいのですが、更新や新規のボタンにマスクをかけるか表示しないということもできるのでしょうか?

    • @chanryo_eff
      @chanryo_eff  2 ปีที่แล้ว

      更新ボタンや新規ボタンが不要ならば、そもそもフォーム作成時に用意しなければいいように感じますが、用意するけど非表示にしたいということでしょうか??
      単純に用意しない場合は動画をご確認いただければイメージできるかと思います😆